• 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

CityOfTerrorII_1.2j_protected.w3x
Variables
Variables
Editing
TEST skipcinematic
TEST zombies
TEST guns
TEST set wave
TEST spawn player2marine
TEST InfectionLevel
TEST fadefilter
Get Animation Index
CopyPaste
Main
Init
Init Allies
Init Preload
Init Ranks
Init Hash Main
Add CrowForm DmgTake
Player Selected Unit
Player Leaves
GetPlayerCount RecreateMB
Remove Dead Units
Remove Dead Units Countdown
Burning
GetPoint AwayFromMarines
GetPoint CloseToMarines
GetPoint VeryCloseToMarines
GetPoint VeryCloseToUG2
Effects
Blood DmgTake
Blood Death
Blinking Lights Init
Blinking Lights Blink
Fire & Explosions
Create Explosion
Explosive Destructibles Init
Explosive Destructibles Detonate
Catch Fire
Sounds
Init Sound
Sound Play xSoundPlay
Ladders
Ladder Init
Ladder Select
Ladder ClimbUp
Ladder ClimbDown
Survival Events
Tutorial
E Tutorial Start
E Tutorial VillagerFloats
E Tutorial VillagerDeath
E Tutorial EnterNextArea
E Tutorial Over
E Tutorial Over 2
E Spawn Starting Weapons
Scientist
E Scientist Psst
E Scientist Message
E Scientist TakeBlood
E Scientist SerumUse
E Scientist Follow
E Scientist Help NPCs
E Forest Ranger
E ForestRanger Activate
E ForestRanger Follow
Sentry Bots
E Rejected Death
E Sentry Bot Activate
E Sentry Bot AI
E Sentry Bot Smart Order
E Sentry Bot HealDmgTaken
E Sentry Bot Pause
Tank
E Tank Item Drop
E Tank Fix
E Tank Load
E Tank Unload and Damage
E Tank Death
End
E GameEnd
E GameEnd LightFlash
Modes
Mod Init
Mod Select
Mod Select Guns
AM Init
AM RecreateWeapons
AM Monster Spawn
AM Victory and Warning
AM DroppedWeaponRemove
AM OrderZombie
Marines
Item Management
Weapon Init
Weapon Aquire
Weapon AquireMeele
Weapon AquireSpecial
Weapon UseItem
Weapon UseItemMeele
Weapon UseItemSpecial
Weapon Drop
Nade Aquire
Nade UseItem
Ammo Aquire
Ammo UseItem
Marine Armor Aq
Marine Armor LQS Spell
Stacking
StackingItem Init
StackingItem Aq
StackingItem Drop
StackingItem Drop ChangeType
Marine Action Management
Marine Init
Marine ToggleClickAction
Marine SetMonsterOrder
Marine ResetMonsterOrder
doubleclickshoot init
doubleclickshoot onMouseDown
doubleclickshoot onMouseDown Code
doubleclickshoot onMouseMove
doubleclickshoot onMouseMove Code
doubleclickshoot onMouseUp
doubleclickshoot onMouseUp Code
reselect marine init
reselect marine onMouseDown
reselect marine when selecting
Marine Smart Order
Marine Order Stop
Marine FireWhenAngleOk
Marine ExecFire
Marine ExecMeele
Marine SpawnBullets
Marine Reload
Marine Reload CheckForEmptyAmmo
Marine Reload WeaponReloadSingle
Marine Reload Custom
Marine Nade Throw
Marine Nade Death
Missle Management
Missle Init
Missle Fly
Missle Fly DamageUnits
Missle BFG RL
Missle Chlorine
Missle Chlorine Dmg
Missle BFG Alt
Various
Marine Set Movement Speed
Marine Select Class
Marine Death
Marine Revive
Marine DmgTake
Marine Infection Main
Marine DontAttTransformed
Marine Flashlight Move
SMG
SMG Init
SMG Smart Order
SMG Select
SMG Ammo Float
SMG Heat
SMG Refill
SMG WithinRange
Marine Spells
MS Infection Remove
MS NightvisionToggle
MS Nightvision NoMana
Medic
MS Heal
MS Combat Cocktail
MS Revive
MS Revive 1sec check
Explosives
MS Place Mine Barricade
MS Mine AutoDetonate
MS Mine Death
Engineer
MS MG PackUp TargetCheck
MS MG PackUp
MS MG SetUp
Operator
MS Ping Dropoff Point
MS Track Enemies
MS Airstrike Cast FirstPoint
MS Airstrike Cast Destination
MS Airstrike Main
EliteFighter
MS Concentrate
MS ScarifyBullets Begin
MS ScarifyBullets Finish
MS Leap
Items
MS Medic Items
MS LQS Shockwave
MS Plant Explosives Flares
MS FlareDeath
Jetpack & Velocity
Jet Pack Init
Jet Pack Toggle
Jet Pack SteerON Left
Jet Pack SteerON Right
Jet Pack SteerON Up
Jet Pack SteerON Down
Jet Pack SteerOFF Left
Jet Pack SteerOFF Right
Jet Pack SteerOFF Up
Jet Pack SteerOFF Down
Jet Pack Main
Jet Pack TurnOff JetPack unit
Velocity
Velocity PowerPush PPunit
Velocity PowerPush PPPoint
Monsters
Spawn
MonsterType Init
MonsterType Init Relaxed
MonsterType Init Training
Monster Spawn
Monster Spawn Items
Monster Spawn Items Get P2
Monster Spawn GetPoint 1st
Monster Spawn GetPoint 2nd
Monster Spawn GetPoint 3rd
Monster Spawn GetPoint 4th
Monster AttackOrder
Monster Spawn Heretics
Monster Spawn Effects Events
Special
Monster FlyingAddToAdjustUG
Monster FlyingRemFromAdjustUG
Monster SpellCooldown
Monster WithinRange Spells Far
Monster WithinRange Spells Close
Monster CrawlUpDown Start
Monster CrawlUp
Monster Heretic Summon
Monster Abom Death
Monster Abom Blow
Monster Abom Death Infection
Monster Acid Spit
Monster Stampede
Monster SuturedCadavre Blow
Monster Carnivore SpawnBreed Order
Monster Carnivore SpawnBreed Cast
Monster Carnivore SpawnBreed Main
Monster Black Hole Cast
Monster Black Hole Main
Monster MindFlayer Death
Music Weather and Commands
Music
Music Init
Music Play
Weather
Weather Main
Command System
Command Init
Command Input
Camera
Camera SetForPlayer PlayerCamSet
Camera SetForPlayer Nightvision
Difficulty
Difficulty Set Chooser
Auto-Attack
AutoAttack MoveDummy
AutoAttack AttackUnit
AutoAttack DmgTake
Multiboard
MB Create
MB Create Zombie
MB Refresh
AnimatedBars & SMG Ammo
HealthBar Init
HealthBar AddUnit
HealthBar RemoveUnit
HealthBar Loop
HeatlhBar LoopVisibility
Name Type is_array initial_value
AM_CreditLimitVictory integer No
AM_GameWinner player No PlayerNP
AM_MaxMonsterSpawn integer No
AM_MonsterSpawn_IconPath string Yes
AM_MonsterSpawn_Itemtypes itemcode Yes
AM_MonsterSpawn_TypeCount integer No
AM_MonsterSpawn_Unittypes unitcode Yes
AM_MonsterSpawnTable hashtable No
AM_Player_VictoryWarningShow boolean Yes
AM_WeaponSpawn_Count integer No
AM_WeaponSpawn_Origin location Yes
AM_WeaponSpawn_SpawnedAmmo item Yes
AM_WeaponSpawn_SpawnedGun item Yes
AM_WeaponSpawn_Type integer Yes
AttackOrderCheck_A integer No
AttackOrderCheck_P location No
AttackOrderCheck_r real No
AttackOrderCheck_r2 real No
AttackOrderCheck_UG group No
AttackOrderCheck_unit unit No
AttackOrderCheck_x integer No
AutoAttack_key integer No
AutoAttack_Unit unit No
b boolean No
BlinkingLights_Count integer No
BlinkingLights_Points location Yes
BlinkingLights_UG group No
BlinkingLights_Units unit Yes
BloodDmgTake_P location No
dest destructable No
Event_ForestRanger unit No
Event_ForestRanger_Index integer No
Event_Scientist_Index integer No
Explosion_A integer No
Explosion_Caster unit No
Explosion_MaxDmg real No
Explosion_Origin location No
Explosion_OriginTarget location No
Explosion_r real No
Explosion_Range real No
Explosion_Target unit No
Explosion_TargetZ real No
Explosion_Type integer No
Explosion_UG group No
Explosion_x integer No
Explosion_Z real No
Game_ActivePlayerCount integer No
Game_AdminPlayer player No Player00
Game_BaseCliffLevel integer No
Game_BaseTerrainHeight real No
Game_Difficulty integer No
Game_FlyBoundsBottom real No
Game_FlyBoundsLeft real No
Game_FlyBoundsRight real No
Game_FlyBoundsTop real No
Game_Mod integer No
Game_Options_MissleDmgFactor real No
Game_Options_NoJetpack boolean No
Game_Over boolean No
Game_WorldDamage unit No
Gravity real No 5.00
Hash_Main hashtable No
HealthBar texttag No
HealthBar2 texttag No
HealthBar_UG group No
HealthHash hashtable No
HealthPGThatCanSee force No
HealthStatus real No
IsTriggerOrder boolean No
item item No
ItemsToMakeStack item Yes
ItemsToMakeStackCount integer No
JetPack_MaxTotalHeight real No
JetPack_Speed real No
JetPack_SteerSensivity real No 0.10
JetPackOff_unit unit No
JetPackOff_x integer No
LadderClimb_Point location No
LadderClimb_UG group No
LastClickedPoint location Yes
LastClickedTime real Yes
lightning lightning No
Marine_DmgTake_r real No
Marine_Fire_Item item No
Marine_Fire_ItemKey integer No
Marine_Fire_P location No
Marine_Fire_P_md location No
Marine_Fire_Target location No
Marine_Fire_Target_md location No
Marine_Fire_Unit unit No
Marine_Fire_Unit_md unit No
Marine_Fire_UnitKey integer No
Marine_Fire_UnitKey_md integer No
Marine_Fire_WeaponTypeIndex integer No
Marine_Hash hashtable No
Marine_Infection_x integer No
Marine_Nade_Target location No
Marine_Nade_ThrowDummy unit No
Marine_Reload_2ndTry boolean No
Marine_Reload_Item item No
Marine_Reload_ItemKey integer No
Marine_Reload_rWait real No
Marine_Reload_Unit unit No
Marine_Reload_UnitKey integer No
Marine_Revive_P location No
Marine_Revive_Unit unit No
Marine_Revive_x integer No
MarineDeath_A integer No
MarineSetMMSpeed_Factor real No
MarineSetMMSpeed_Item item No
MarineSetMMSpeed_r real No
MarineSetMMSpeed_unit unit No
MarineSetMMSpeed_x integer No
Maxplayers integer No 6
MB_Marines multiboard No
MB_ToggleState integer No
MB_Zombies multiboard No
Missle_angle real No
Missle_BulletSource unit No
Missle_CollisionCheckInterval integer No
Missle_currheight real No
Missle_Hash hashtable No
Missle_key integer No
Missle_PreviousHitUnit unit No
Missle_Speed real No
Missle_unit unit No
Missle_unitshit integer No
Missle_utype unitcode No
Missles_CriticalNumberForFrags integer No 40
Monster_Carnivore unit No
Monster_Carnivore_AllowSpawn boolean No
Monster_EndBoss unit No
MonsterType_1st unitcode Yes
MonsterType_1st_SpawnDist integer Yes
MonsterType_1stMaxCount integer Yes
MonsterType_1stSpawnedCount integer Yes
MonsterType_2nd unitcode Yes
MonsterType_2nd_SpawnDist integer Yes
MonsterType_2nd_X1stFirst integer Yes
MonsterType_2ndMaxCount integer Yes
MonsterType_2ndSpawnedCount integer Yes
MonsterType_3rd unitcode Yes
MonsterType_3rd_SpawnDist integer Yes
MonsterType_3rd_X2ndFirst integer Yes
MonsterType_3rdMaxCount integer Yes
MonsterType_3rdSpawnedCount integer Yes
MonsterType_4th unitcode Yes
MonsterType_4th_SpawnDist integer Yes
MonsterType_4th_X4rdFirst integer Yes
MonsterType_4thMaxCount integer Yes
MonsterType_4thSpawnedCount integer Yes
MonsterType_TypeCount integer Yes
MonsterType_WaveCount integer No
MonsterType_WaveIndex integer No
MonsterType_WaveMsg string Yes
MouseTimer timer No
Music_CurrentTrackIndex integer No
Music_PlayerOn boolean Yes
Music_RndSoundList sound Yes
Music_RndSoundList_Count integer No
Music_Soundlist sound Yes
Music_Soundlist_Count integer No
Music_Soundlist_Duration real Yes
Music_Soundlist_Pitch real Yes
Music_TimePassed real No
NPCSmartOrder_AllowFire boolean No
NPCSmartOrder_key integer No
NPCSmartOrder_P location No
NPCSmartOrder_r real No
NPCSmartOrder_r2 real No
NPCSmartOrder_Target location No
P location No
P2 location No
P3 location No
P_BloodUnitDeath location No
P_PlaceStuff location No
P_SoundPlay location No
P_ZombieEnterMap location No
PG force No
player player No
Player_AllowSelectClass boolean Yes
Player_AutoAttackDummy unit Yes
Player_AutoAttackON boolean Yes
Player_AutouseMG boolean Yes
Player_Bounty integer Yes
Player_CamDistance real Yes
Player_CamLock boolean Yes
Player_CamSet player No
Player_CamSet_r real No
Player_CamSetx integer No
Player_CamSetx2 integer No
Player_ColorCode string Yes
Player_JetPack_Steer_DownON boolean Yes
Player_JetPack_Steer_LeftON boolean Yes
Player_JetPack_Steer_RightON boolean Yes
Player_JetPack_Steer_UpON boolean Yes
Player_Kills integer Yes
Player_Marine unit Yes
Player_Monsterowner player No Player11
Player_MouseDownAfterDblClick boolean Yes
Player_MouseDownCount integer Yes
Player_MouseUpCount integer Yes
Player_NPCAllies player No Player09
Player_SelectedUnit unit Yes
Player_TutorialStep integer Yes
PowerPush_AngleXY real No
PowerPush_Key integer No
PowerPush_P location No
PowerPush_PowerXY real No
PowerPush_PowerZ real No
PowerPush_r real No
PowerPush_r2 real No
PowerPush_Target location No
PowerPush_Unit unit No
r real No
r2 real No
r2_md real No
r3 real No
r4 real No
r5 real No
r6 real No
r7 real No
r_md real No
r_x real No
r_x2 real No
r_y real No
r_y2 real No
r_ZombieEnterMap real No
RankNameFull string Yes
RankShortcut string Yes
RankXPReq integer Yes
region rect No
s string No
Selection_unit unit No
SentryBotOrigin location Yes
SMG_Ammo integer Yes
SMG_Count integer No
SMG_DefaultAngle real Yes
SMG_Float texttag Yes
SMG_FloatCreated boolean Yes
SMG_FloatUpdateA integer No
SMG_Heat integer Yes
SMG_HeatCritical integer No
SMG_Unit unit Yes
Sound_Hash hashtable No
StackableItem_Charges integer No
StackableItem_Count integer No
StackableItem_intA integer No
StackableItem_Name string No
StackableItem_StackCount integer Yes
StackableItem_Type integer No
StackableItem_TypeInventory itemcode Yes
StackableItem_TypePowerUp itemcode Yes
StackableItem_x integer No
StateString string No
Tank_ItemsDelivered integer No
Tank_ItemsDropped integer No
UG group No
UG2 group No
UG_AirstrikeCasters group No
UG_AliveMarines group No
UG_AliveZombies group No
UG_BlackHole group No
UG_Burning group No
UG_ChainsawCooldownUnits group No
UG_CrawlUpMonsters group No
UG_DeadUnits group No
UG_EnemyAliveMarines group Yes
UG_FireWhenAngleOk group No
UG_FlashlightUnits group No
UG_FlyingAdjustHeight group No
UG_Heretics group No
UG_md group No
UG_Missles group No
UG_Monster_AbomBlow group No
UG_MonsterSpellCooldown group No
UG_OrderStop group No
UG_RecentlyClimbed group No
UG_RemoveInfection group No
UG_RemoveLightning group No
UG_SentryBotTargets group Yes
UG_SpawnBullets group No
UG_Stampede group No
UG_SuturedCadavreBlow group No
UG_TutorialVillagers group No
UG_UnitsThatAreAttacking group No
UG_Velocity group No
UG_ZombiesAttackOrder group No
unit unit No
unit2 unit No
unit_Climb unit No
unit_md unit No
unittype unitcode No
Velocity_IsDroppedOffGhoul boolean No
Velocity_Maximum real No 100.00
Velocity_Minimum real No -100.00
Velocity_MoveOffObstacle boolean No
vX real No
vY real No
vZ real No
Wave_WeaponDropPoint location No
WeaponAquire_Item item No
WeaponAquire_Unit unit No
WeaponAquire_UnitKey integer No
WeaponAquire_x integer No
WeaponData_Count integer No
WeaponData_GunSpawnCount integer No
WeaponData_GunSpawnList integer Yes
WeaponData_Hash hashtable No
WeaponData_ItemType itemcode Yes
WeaponData_ItemTypeAmmo itemcode Yes
WeaponData_ItemTypeAmmoAlt itemcode Yes
WeaponData_ItemTypeAmmoAltStck itemcode Yes
WeaponData_ItemTypeAmmoStck itemcode Yes
WeaponData_MissleType unitcode Yes
WeaponData_WeightSlowFactor real No
WeaponData_WeightSlowFactorEF real No
Weather_FilterIndex real No
x integer No
x2 integer No
x3 integer No
x4 integer No
x5 integer No
x_EnterStatMG integer No
x_md integer No
x_SoundPlay integer No
x_SoundPlay2 integer No
x_ZombieEnterMap integer No
y integer No
z1 real No
z2 real No
TEST skipcinematic
Events
Player - Player 1 (Red) types a chat message containing go (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Set Variable Set x = "0"
Set Variable Set MonsterType_WaveIndex = x
Set Variable Set MonsterType_1stMaxCount[x] = "0"
Set Variable Set MonsterType_2ndMaxCount[x] = "0"
Set Variable Set MonsterType_3rdMaxCount[x] = "0"
Set Variable Set MonsterType_4thMaxCount[x] = "0"
Trigger - Turn on Monster_Spawn <gen>
Trigger - Run Monster_Spawn <gen> (checking conditions)
Unit - Move Player_Marine[1] instantly to (Center of WeaponSpawn01 <gen>)
Set Variable Set unit = Player_Marine[1]
Unit - Add Sprint to unit
Unit - Add Nightvision to unit
Unit - Add Reload to unit
Unit - Add Select Class to unit
-------- Starting Items --------
Set Variable Set x = "10"
Item - Create WeaponData_ItemType[x] at P
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to 200
Hero - Give (Last created item) to unit
Item - Create WeaponData_ItemTypeAmmo[x] at P
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to 999
Hero - Give (Last created item) to unit
TEST zombies
Events
Player - Player 1 (Red) types a chat message containing z (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Set Variable Set P = ((Position of Player_Marine[1]) offset by 800.00 towards (Facing of Player_Marine[1]) degrees.)
For each (Integer A) from 1 to 10 , do (Actions)
Loop - Actions
Unit - Create 1 . Zombie (Slow) for Player_Monsterowner at P facing (Random angle) degrees
Unit - Create 1 . Flesh Thing for Player_Monsterowner at P facing (Random angle) degrees
TEST guns
Events
Player - Player 1 (Red) types a chat message containing guns (Unexpected type: 'stringnoformat') as An exact match
Time - Elapsed game time is 3.00 seconds
Conditions
Actions
-------- Starting Items --------
For each (Integer B) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer B))) slot status) Equal to Is playing
Then - Actions
Set Variable Set P2 = (Position of Player_Marine[(Integer B)])
Item - Create |cff7DBEF1Weapon [|rChainsaw|cff7DBEF1] at P2
For each (Integer A) from 1 to WeaponData_Count , do (Actions)
Loop - Actions
Set Variable Set P = (P2 offset by (((Real((Integer A))) x 64.00), 0))
Item - Create WeaponData_ItemType[(Integer A)] at P
Item - Set the custom value of (Last created item) to (Integer A)
Item - Set charges remaining in (Last created item) to (Load 6 of (Integer A) from WeaponData_Hash.)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P = (P2 offset by (((Real((Integer A))) x 64.00), -64.00))
Item - Create WeaponData_ItemTypeAmmoStck[(Integer A)] at P
Item - Set the custom value of (Last created item) to (Integer A)
Item - Set charges remaining in (Last created item) to 99
Custom script: call RemoveLocation(udg_P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponData_ItemTypeAmmoAlt[(Integer A)] Not equal to |cff7DBEF1Magazine [|r9mm (for USP)|cff7DBEF1]
Then - Actions
Set Variable Set P = (P2 offset by (((Real((Integer A))) x 64.00), -128.00))
Item - Create WeaponData_ItemTypeAmmoAltStck[(Integer A)] at P
Item - Set the custom value of (Last created item) to (Integer A)
Item - Set charges remaining in (Last created item) to 99
Custom script: call RemoveLocation(udg_P)
Else - Actions
Set Variable Set P = (P2 offset by (0.00, 128.00))
Item - Create |cff7DBEF1HE-Nades at P
Item - Set charges remaining in (Last created item) to 6
Custom script: call RemoveLocation(udg_P)
Set Variable Set P = (P2 offset by (64.00, 128.00))
Item - Create |cff7DBEF1Frags at P
Item - Set charges remaining in (Last created item) to 6
Custom script: call RemoveLocation(udg_P)
Custom script: call RemoveLocation(udg_P2)
Else - Actions
TEST set wave
Events
Player - Player 1 (Red) types a chat message containing wave (Unexpected type: 'stringnoformat') as A substring
Conditions
(Substring((Entered chat string), 1, 4)) Equal to wave
Actions
Set Variable Set x = (Integer((Substring((Entered chat string), 5, (Length of (Entered chat string))))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Less than 1
Then - Actions
Set Variable Set x = "1"
Else - Actions
Game - Display to (All players) for 1.00 seconds the text: (wave + (String(x)))
Set Variable Set x = (x - 1)
Set Variable Set MonsterType_WaveIndex = x
Set Variable Set MonsterType_1stMaxCount[x] = "0"
Set Variable Set MonsterType_2ndMaxCount[x] = "0"
Set Variable Set MonsterType_3rdMaxCount[x] = "0"
Set Variable Set MonsterType_4thMaxCount[x] = "0"
Trigger - Turn on Monster_Spawn <gen>
Trigger - Run Monster_Spawn <gen> (checking conditions)
TEST spawn player2marine
Events
Player - Player 1 (Red) types a chat message containing k (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Unit - Create 1 . Marine for Player 2 (Blue) at (Position of Player_Marine[1]) facing Default building facing degrees
Set Variable Set Player_Marine[2] = (Last created unit)
Animation - Change (Last created unit) flying height to 500.00 at 0.00
Player - Make Player 1 (Red) treat Player 2 (Blue) as an Enemy
Player - Make Player 2 (Blue) treat Player 1 (Red) as an Enemy
Unit - Kill (Last created unit)
Visibility - Create an initially Enabled visibility modifier for Player 1 (Red) emitting Visibility across (Playable map area)
TEST InfectionLevel
Events
Player - Player 1 (Red) types a chat message containing aa (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Set Variable Set unit = Player_Marine[1]
Custom script: set udg_x = GetHandleId(udg_unit)
Set Variable Set Marine_Infection_x = "50"
Hashtable - Save Marine_Infection_x as 27 of x in Marine_Hash .
Hero - Add 50 experience to unit , Hide level-up graphics
TEST fadefilter
Events
Player - Player 1 (Red) types a chat message containing nv (Unexpected type: 'stringnoformat') as A substring
Conditions
(Substring((Entered chat string), 1, 2)) Equal to nv
Actions
Set Variable Set x = (Integer((Substring((Entered chat string), 3, (Length of (Entered chat string))))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Less than or equal to 0
Then - Actions
Cinematic - Hide filter
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 1
Then - Actions
Cinematic - Apply a filter over 9999.00 seconds using Additive blending on texture White Mask , starting with color ( 0.00 %, 100 %, 0.00 %) and 80.00 % transparency and ending with color ( 0 %, 100.00 %, 0 %) and 80.00 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 2
Then - Actions
Cinematic - Apply a filter over 9999.00 seconds using Modulated blending on texture White Mask , starting with color ( 50.00 %, 100.00 %, 50.00 %) and 80.00 % transparency and ending with color ( 0 %, 100.00 %, 0 %) and 80.00 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 3
Then - Actions
Cinematic - Apply a filter over 9999.00 seconds using Modulated 2x blending on texture White Mask , starting with color ( 50.00 %, 100 %, 50.00 %) and 80.00 % transparency and ending with color ( 0 %, 100.00 %, 0 %) and 80.00 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 4
Then - Actions
Cinematic - Apply a filter over 9999.00 seconds using Key alpha blending on texture White Mask , starting with color ( 0.00 %, 100 %, 0.00 %) and 0.00 % transparency and ending with color ( 0 %, 100.00 %, 0 %) and 0.00 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 5
Then - Actions
Cinematic - Apply a filter over 9999.00 seconds using Normal blending on texture White Mask , starting with color ( 0.00 %, 100 %, 0.00 %) and 80.00 % transparency and ending with color ( 0 %, 100.00 %, 0 %) and 80.00 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 6
Then - Actions
Cinematic - Apply a filter over 9999.00 seconds using Additive blending on texture White Mask , starting with color ( 0.00 %, 100 %, 0.00 %) and 20.00 % transparency and ending with color ( 0 %, 100.00 %, 0 %) and 20.00 % transparency
Environment - Set fog to style Linear , z-start 2000.00 , z-end 5000.00 , density 0.50 and color ( 8.00 %, 5.00 %, 10.00 %)
Set Variable Set player = Player 1 (Red)
Unit Group - Pick every unit in UG_AliveZombies and do (Actions)
Loop - Actions
Custom script: if GetLocalPlayer( ) == udg_player then
Animation - Change (Picked unit) 's vertex coloring to ( 100 %, 50.00 %, 50.00 %) with 0 % transparency
Custom script: endif
Unit Group - Pick every unit in UG_TutorialVillagers and do (Actions)
Loop - Actions
Custom script: if GetLocalPlayer( ) == udg_player then
Animation - Change (Picked unit) 's vertex coloring to ( 100 %, 50.00 %, 50.00 %) with 0 % transparency
Custom script: endif
Else - Actions
Get Animation Index
Events
Player - Player 1 (Red) types a chat message containing - (Unexpected type: 'stringnoformat') as A substring
Conditions
Actions
Set Variable Set unit = (Random unit from (Units currently selected by (Triggering player)))
Set Variable Set x = (Integer((Substring((Entered chat string), 2, (Length of (Entered chat string))))))
Custom script: call SetUnitAnimationByIndex(udg_unit,udg_x)
bj_forLoopAIndex
bj_forLoopBIndex
CopyPaste
Events
Conditions
Actions
Custom script: local effect eff
Custom script: local lightning lightn
Custom script: local unit tempunit
Custom script: local destructable tempdest
Custom script: local item tempitem
Custom script: set tempitem = GetManipulatedItem()
Custom script: set tempunit = GetTriggerUnit()
Custom script: set tempunit = GetSpellTargetUnit()
Custom script: set tempunit = GetKillingUnit()
Custom script: set tempunit = GetEventDamageSource()
Custom script: set tempunit = GetEnumUnit()
Custom script: set tempunit = bj_lastReplacedUnit
Custom script: set tempunit = bj_lastCreatedUnit
Custom script: set tempdest = GetDyingDestructable()
Wait 1.00 seconds
Custom script: set udg_item = tempitem
Custom script: set udg_unit = tempunit
Custom script: set udg_dest = tempdest
Custom script: set eff = bj_lastCreatedEffect
Custom script: set lightn = bj_lastCreatedLightning
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Custom script: call DestroyLightning(lightn)
-------- Custom functions --------
Custom script: if GetLocalPlayer( ) == udg_player then
Custom script: endif
Custom script: set udg_r5 = GetLocationZ(udg_P2)
Custom script: set udg_x = GetHandleId(udg_unit)
Custom script: set udg_r = GetLocationZ(udg_P)
Custom script: call SetUnitX (udg_unit, udg_r_x)
Custom script: call SetUnitY (udg_unit, udg_r_y)
Custom script: call SetDayNightModels("","")
Custom script: set udg_UG = CreateGroup ()
-------- Anti_Leak --------
Set Variable Set UG = (Units within 150.00 of P matching ((((Matching unit) is alive) Equal to True) and (((Owner of (Triggering unit)) is an enemy of (Owner of (Matching unit)).) Equal to True)).)
Custom script: call DestroyGroup(udg_UG)
Set Variable Set UG2 = (Units of type Chicken)
Custom script: call DestroyGroup(udg_UG2)
Set Variable Set P = (Position of (Triggering unit))
Set Variable Set P = (Position of (Picked unit))
Custom script: call RemoveLocation(udg_P)
Set Variable Set P2 = (Position of (Picked unit))
Custom script: call RemoveLocation(udg_P2)
Set Variable Set P3 = (Position of (Picked unit))
Custom script: call RemoveLocation(udg_P3)
Set Variable Set PG = (Player group((Owner of (Triggering unit))))
Custom script: call DestroyForce(udg_PG)
Set Variable Set region = (Region centered at P2 with size (, ))
Custom script: call RemoveRect(udg_region)
Player10: NPC Allies
Player12: Monsterowner

Armor types:
Unarmored = Flesh: 100% from all
Heavy: 100% from explosions, rest 50%
Fortified = Hardened Skin: 50% from bullets, rest 100%
Normal/Medium = Kevlar: 70% from bullets and explosions, rest 100%
Light/Small (Ethereal): 100% from fire, rest 30%

pierce = bullets
magic = fire
spells = chemicals
siege = explosions
normal = meele
Init
Events
Map initialization
Conditions
Actions
-------- General --------
Set Variable Set Game_Difficulty = "1"
Set Variable Set Game_BaseCliffLevel = "8"
Set Variable Set Game_BaseTerrainHeight = "768.00"
Set Variable Set Game_Options_MissleDmgFactor = "1.00"
Set Variable Set Game_FlyBoundsLeft = "-5350.00"
Set Variable Set Game_FlyBoundsRight = "5310.00"
Set Variable Set Game_FlyBoundsBottom = "-5600.00"
Set Variable Set Game_FlyBoundsTop = "9170.00"
Game - Disable drag-selection functionality ( Disable drag-selection box)
Game - Set the time of day to 24.00
Game - Set game speed to Fastest
Game - Disable ally color button and Disable creep camp button
Game - Hide creep camps on the minimap .
Quest - Create a Optional quest titled Commands with the description Player commands:|cffff0000-aa|r Toggles automatic attacking.|cffff0000-m|r Toggles background music.|cffff0000-clock|r Locks the camera to your marine.|cffff0000-c close/medium/far/[2000<x<3300]|r Set camera distance.|cffff0000-class|r Change your class (Arena and Training Mode only).Admin commands: (The first active player is admin)|cffff0000-nj|r No jetpack mode.|cffff0000-hd|r Missles & explosions deal only half the damage to Marines (Arena Mode only).|cffff0000-limit x|r Set credit limit for victory to x (Arena Mode only). , using icon path ReplaceableTextures\CommandButtons\BTNSpellBookBLS.blp
Quest - Create a Optional quest titled Credits with the description Map created by kleinerhauck.Visit www.christopherhauck.de or www.hiveworkshop.com for the latest version.Thanks to |cffff0000frostloh|r and |cffff0000AngelCarnage|r for ideas and motivation.Thanks to |cffff0000Frotty|r for the idea to detonate remotes with hero icons.Thanks to the following people for their great models/skins!|cffff0000Kofi_Banan|r Buildings & Phone Booth|cffff0000Deolrin|r Crate|cffff0000Dionesiist|r Creature from wave 2|cffff0000L_Lawliet|r Blood splatters|cffff0000Thrikodius|r Ammo Box|cffff0000Happy Tauren|r Medkit|cffff0000Death_Minion_|r (Chlorine) Gas Cloud|cffff0000The_Silent|r Installation Computer|cffff0000Scythy Dervish|r Laboratory ground tile|cffff0000Mr. Bob|r Spider Bob|cffff0000chilla_killa|r Laptop|cffff0000WILL THE ALMIGHTY|r Mind Flayer (End Boss)|cffff0000Illidan(Evil)X|r Tank and Containers|cffff0000MassiveMaster|r Street Tiles|cffff0000Trollschnitzel|r Oil Drum|cffff0000anarchianbedlam|r Danger Zone Post|cffff0000crl|r Blood Plague Cloud|cffff0000tee.dubs|r Bloody Chainsaw|cffff0000modafoka|r Resident Evil UISounds:|cffff0000Cobbot|r Marine Soundset|cffff0000CSS & Quake3|r Weapon Sounds|cffff0000Blizzard|r Music (Low-pitched)|cffff0000Free-sound-sites|r Others , using icon path ReplaceableTextures\CommandButtons\BTNSpellBookBLS.blp
Custom script: call SetDayNightModels("","")
Environment - Set fog to style Linear , z-start 2300.00 , z-end 3400.00 , density 0.50 and color ( 8.00 %, 5.00 %, 10.00 %)
Destructible - Pick every destructible in (Playable map area) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Destructible-type of (Picked destructible)) Equal to OTip (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to OTis (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTlb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to Ytlc (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to B000 (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTpb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTpc (Unexpected type: 'destructablecode')
Then - Actions
Destructible - Make (Picked destructible) Invulnerable
Else - Actions
-------- Colors --------
Set Variable Set Player_ColorCode[1] = "|cffFF0202"
Set Variable Set Player_ColorCode[2] = "|cff0041FF"
Set Variable Set Player_ColorCode[3] = "|cff1BE6B8"
Set Variable Set Player_ColorCode[4] = "|cff530080"
Set Variable Set Player_ColorCode[5] = "|cffFFFC00"
Set Variable Set Player_ColorCode[6] = "|cffFE890D"
-------- Players --------
Player - Turn Gives bounty Off for Player_Monsterowner
Player - Change color of Player_Monsterowner to Maroon , Changing color of existing units
Player - Set name of Player_Monsterowner to |cffff0000Unidentified|r
Player - Set name of Player_NPCAllies to |cff7DBEF1Allied Forces|r
Player - Make Player_Monsterowner treat Player_NPCAllies as an Enemy
Player - Make Player_NPCAllies treat Player_Monsterowner as an Enemy
Visibility - Create an initially Enabled visibility modifier for Player_Monsterowner emitting Visibility across (Playable map area)
Set Variable Set Game_ActivePlayerCount = "0"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set Player_AllowSelectClass[(Integer A)] = "false"
Set Variable Set Game_ActivePlayerCount = (Game_ActivePlayerCount + 1)
Trigger - Add to Player_Selected_Unit <gen> the event ((Player((Integer A))) Selects a unit)
Trigger - Add to SMG_Select <gen> the event ((Player((Integer A))) Selects a unit)
Trigger - Add to Ladder_Select <gen> the event ((Player((Integer A))) Selects a unit)
Player - Disable True Sight SpellBook for (Player((Integer A)))
Trigger - Add to Player_Leaves <gen> the event ((Player((Integer A))) leaves the game)
Set Variable Set Player_CamLock[(Integer A)] = "false"
Set Variable Set Player_CamDistance[(Integer A)] = "2900.00"
Camera - Set (Player((Integer A))) 's camera Distance to target to Player_CamDistance[(Integer A)] over 0 seconds
Set Variable Set Player_AutoAttackON[(Integer A)] = "false"
Else - Actions
-------- Various --------
Set Variable Set UG = (Units of type Sentry Bot)
Set Variable Set x = "0"
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Animation - Change (Picked unit) 's animation speed to 0.00 % of its original speed
Unit - Make (Picked unit) Invulnerable
Unit - Pause (Picked unit)
Set Variable Set x = (x + 1)
Unit - Set the custom value of (Picked unit) to x
Set Variable Set SentryBotOrigin[x] = (Position of (Picked unit))
Custom script: call DestroyGroup(udg_UG)
Unit - Turn collision for Scientist 0028 <gen> Off .
Set Variable Set P = (Point(2654.00, -4144.00))
Unit - Move Scientist 0028 <gen> instantly to P
Custom script: call RemoveLocation(udg_P)
-------- No MouseHover Tooltips --------
Set Variable Set UG = (Units in NoSpawn <gen>)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Custom script: call UnitAddAbility(GetEnumUnit(), 'Aloc')
Unit - Hide (Picked unit)
Custom script: call UnitRemoveAbility(GetEnumUnit(), 'Aloc')
Unit - Unhide (Picked unit)
Custom script: call DestroyGroup(udg_UG)
Init Allies
Events
Time - Elapsed game time is 0.01 seconds
Conditions
Actions
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
Player - Make Player_NPCAllies treat (Player((Integer A))) as an Ally
Player - Make (Player((Integer A))) treat Player_NPCAllies as an Ally
For each (Integer B) from 1 to Maxplayers , do (Actions)
Loop - Actions
Player - Make (Player((Integer B))) treat (Player((Integer A))) as an Ally
Player - Make (Player((Integer A))) treat (Player((Integer B))) as an Ally
Init Preload
Events
Map initialization
Conditions
Actions
Set Variable Set unit = Ladder, Bottom 0016 <gen>
Unit - Add Sprint to unit
Unit - Add Nightvision to unit
Unit - Add Reload to unit
Unit - Add Select Class to unit
Unit - Add Airstrike to unit
Unit - Add Airstrike Target to unit
Unit - Add Ping Dropoff Point to unit
Unit - Add Motivation Aura to unit
Unit - Add Construct Barricade to unit
Unit - Add Pack Up Stationary MG to unit
Unit - Add Setup Stationary MG to unit
Unit - Add First Aid Treatment to unit
Unit - Add Inject Combat Cocktail to unit
Unit - Add Revive to unit
Unit - Add Place Anti-Person Mine to unit
Unit - Add Place Anti-Tank Mine to unit
Unit - Add Place Remote-Controlled Mine to unit
Unit - Add Leap to unit
Unit - Add Concentrate to unit
Unit - Add Scarify Bullets to unit
Unit - Remove Sprint from unit
Unit - Remove Nightvision from unit
Unit - Remove Reload from unit
Unit - Remove Select Class from unit
Unit - Remove Airstrike from unit
Unit - Remove Airstrike Target from unit
Unit - Remove Ping Dropoff Point from unit
Unit - Remove Motivation Aura from unit
Unit - Remove Construct Barricade from unit
Unit - Remove Setup Stationary MG from unit
Unit - Remove Pack Up Stationary MG from unit
Unit - Remove First Aid Treatment from unit
Unit - Remove Inject Combat Cocktail from unit
Unit - Remove Revive from unit
Unit - Remove Place Anti-Person Mine from unit
Unit - Remove Place Anti-Tank Mine from unit
Unit - Remove Place Remote-Controlled Mine from unit
Unit - Remove Leap from unit
Unit - Remove Concentrate from unit
Unit - Remove Scarify Bullets from unit
Init Ranks
Events
Map initialization
Conditions
Actions
-------- Ranks --------
Set Variable Set x = "1"
Set Variable Set RankXPReq[x] = "0"
Set Variable Set RankShortcut[x] = "PVT"
Set Variable Set RankNameFull[x] = "Private"
Set Variable Set x = "2"
Set Variable Set RankXPReq[x] = "500"
Set Variable Set RankShortcut[x] = "PFC"
Set Variable Set RankNameFull[x] = "Private First Class"
Set Variable Set x = "3"
Set Variable Set RankXPReq[x] = (RankXPReq[(x - 1)] x 2)
Set Variable Set RankShortcut[x] = "Cpl"
Set Variable Set RankNameFull[x] = "Corporal"
Set Variable Set x = "4"
Set Variable Set RankXPReq[x] = (RankXPReq[(x - 1)] x 2)
Set Variable Set RankShortcut[x] = "Sgt"
Set Variable Set RankNameFull[x] = "Sergeant"
Set Variable Set x = "5"
Set Variable Set RankXPReq[x] = "3000"
Set Variable Set RankShortcut[x] = "SSgt"
Set Variable Set RankNameFull[x] = "Staff Sergeant"
Set Variable Set x = "6"
Set Variable Set RankXPReq[x] = "5000"
Set Variable Set RankShortcut[x] = "SgtFC"
Set Variable Set RankNameFull[x] = "Sergeant First Class"
Set Variable Set x = "7"
Set Variable Set RankXPReq[x] = "10000"
Set Variable Set RankShortcut[x] = "MSgt"
Set Variable Set RankNameFull[x] = "Master Sergeant"
Set Variable Set x = "8"
Set Variable Set RankXPReq[x] = "15000"
Set Variable Set RankShortcut[x] = "1Sgt"
Set Variable Set RankNameFull[x] = "First Sergeant"
Set Variable Set x = "9"
Set Variable Set RankXPReq[x] = "20000"
Set Variable Set RankShortcut[x] = "SgtM"
Set Variable Set RankNameFull[x] = "Sergeant Major"
Set Variable Set x = "10"
Set Variable Set RankXPReq[x] = "25000"
Set Variable Set RankShortcut[x] = "CSM"
Set Variable Set RankNameFull[x] = "Command Sergeant Major"
Set Variable Set x = "11"
Set Variable Set RankXPReq[x] = "30000"
Set Variable Set RankShortcut[x] = "2Lt"
Set Variable Set RankNameFull[x] = "Second Lieutenant"
Set Variable Set x = "12"
Set Variable Set RankXPReq[x] = "40000"
Set Variable Set RankShortcut[x] = "1Lt"
Set Variable Set RankNameFull[x] = "First Lieutenant"
Set Variable Set x = "13"
Set Variable Set RankXPReq[x] = "50000"
Set Variable Set RankShortcut[x] = "Cpt"
Set Variable Set RankNameFull[x] = "Captain"
Set Variable Set x = "14"
Set Variable Set RankXPReq[x] = "65000"
Set Variable Set RankShortcut[x] = "Maj"
Set Variable Set RankNameFull[x] = "Major"
Set Variable Set x = "15"
Set Variable Set RankXPReq[x] = "75000"
Set Variable Set RankShortcut[x] = "LtC"
Set Variable Set RankNameFull[x] = "Lieutenant Colonel"
Set Variable Set x = "16"
Set Variable Set RankXPReq[x] = "100000"
Set Variable Set RankShortcut[x] = "Col"
Set Variable Set RankNameFull[x] = "Colonel"
Set Variable Set x = "17"
Set Variable Set RankXPReq[x] = "150000"
Set Variable Set RankShortcut[x] = "BG"
Set Variable Set RankNameFull[x] = "Brigadier General"
Set Variable Set x = "18"
Set Variable Set RankXPReq[x] = "200000"
Set Variable Set RankShortcut[x] = "MG"
Set Variable Set RankNameFull[x] = "Major General"
Set Variable Set x = "19"
Set Variable Set RankXPReq[x] = "250000"
Set Variable Set RankShortcut[x] = "LtG"
Set Variable Set RankNameFull[x] = "Lieutenant General"
Set Variable Set x = "20"
Set Variable Set RankXPReq[x] = "300000"
Set Variable Set RankShortcut[x] = "Gen"
Set Variable Set RankNameFull[x] = "General"
Set Variable Set x = "21"
Set Variable Set RankXPReq[x] = "500000"
Set Variable Set RankShortcut[x] = "|cffffcc00GA|r"
Set Variable Set RankNameFull[x] = "General of the Army"
00: Remove Corpse Countdown
01: Right Nade Thrower Unit
02: Burning effect
03: Burning time (real)
04: Weapon Empty (bool) (gegen bug dass bei 1 charge bei click waffe leer wird)
05: Weapon Ammo type (ammo in weapon)
06: Velocity X
07: Velocity Y
08: Velocity Z
09: Dust Effect created (bool)
10: Dust Effect L
11: Dust Effect R
12: ZombieIsAttackingUnit (integer, für Vorhalten bei SmartOrder)
13: Mine flare effect
14: Mine light effect
15: Heretic SummonProgress
16: Heretic SummonProgress TogetherKey
17: Heretic Summon Point
18: CrawlUp Angle (Facing muss +90° gedreht werden)
19: MonsterSpellCooldown (real)
20: Scavenger Ghouls Carried Count
21: Scavenger Ghoul Effect 1
22: Scavenger Ghoul Effect 2
23: FlyingUnitAdjustHeight - Previous Terrain Height
24: MonsterSpellCooldown alternate (real)
25: Stampede counter (real)
26: Stampede Angle
27: SuturedCadavreBlow index
28: Flare light effect
29: SentryBotAI missle has hit unit (bool)
30: AM: Burning caster

100: Abom Blow index
101...105: Abom Blow effect

201...203 or 208: Ammo type in chamber 1..3 or 8 (ammo in weapon)
Init Hash Main
Events
Map initialization
Conditions
Actions
Hashtable - Create a hashtable
Set Variable Set Hash_Main = (Last created hashtable)
Add CrowForm DmgTake
Events
Unit - A unit enters (Playable map area)
Conditions
Actions
Unit - Add Crow Form to (Triggering unit)
Unit - Remove Crow Form from (Triggering unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Triggering unit)) Not equal to Orc
Then - Actions
Trigger - Add to Catch_Fire <gen> the event ((Triggering unit) Takes damage)
Trigger - Add to Missle_Chlorine_Dmg <gen> the event ((Triggering unit) Takes damage)
Trigger - Add to E_Sentry_Bot_HealDmgTaken <gen> the event ((Triggering unit) Takes damage)
Trigger - Add to AutoAttack_DmgTake <gen> the event ((Triggering unit) Takes damage)
-------- Blood effect --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Not equal to Souldrainer
(Unit-type of (Triggering unit)) Not equal to Mind Flayer
((Triggering unit) is Mechanical) Equal to False
Then - Actions
Trigger - Add to Blood_DmgTake <gen> the event ((Triggering unit) Takes damage)
Else - Actions
-------- No MouseHover Tooltips --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Not equal to Marine
(Owner of (Triggering unit)) Not equal to Player_NPCAllies
Then - Actions
Custom script: call UnitAddAbility(GetTriggerUnit(), 'Aloc')
Unit - Hide (Triggering unit)
Custom script: call UnitRemoveAbility(GetTriggerUnit(), 'Aloc')
Unit - Unhide (Triggering unit)
Else - Actions
Else - Actions
Player Selected Unit
Events
Conditions
(Owner of (Triggering unit)) Equal to (Triggering player)
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to Detonate remote-controlled mines
(Unit-type of (Triggering unit)) Equal to Toggle Flashlight
(Player_Marine[(Player number of (Triggering player))] is alive) Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Detonate remote-controlled mines
Then - Actions
Set Variable Set P = (Position of Player_Marine[(Player number of (Triggering player))])
Set Variable Set UG = (Units within 1800.00 of P matching ((((Matching unit) is alive) Equal to True) and ((Unit-type of (Matching unit)) Equal to Remote-Controlled Mine)).)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Unit - Kill (Picked unit)
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Toggle Flashlight
Then - Actions
Set Variable Set unit2 = Player_Marine[(Player number of (Triggering player))]
Custom script: set udg_x = GetHandleId(udg_unit2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(unit2 is in UG_FlashlightUnits.) Equal to True
Then - Actions
Unit Group - Remove unit2 from UG_FlashlightUnits .
Set Variable Set unit = (Load 39 of x in Marine_Hash.)
Unit - Remove unit from the game
Else - Actions
Unit Group - Add unit2 to UG_FlashlightUnits
Set Variable Set P = (Position of Player_Marine[(Player number of (Triggering player))])
Unit - Create 1 . Flashlight for (Triggering player) at P facing Default building facing degrees
Custom script: call RemoveLocation(udg_P)
Hashtable - Save Handle Of (Last created unit) as 39 of x in Marine_Hash .
Else - Actions
Trigger - Turn off (This trigger)
Selection - Select Player_SelectedUnit[(Player number of (Triggering player))] for (Triggering player)
Trigger - Turn on (This trigger)
Else - Actions
Set Variable Set Selection_unit = Player_SelectedUnit[(Player number of (Triggering player))]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Selection_unit Not equal to (Triggering unit)
(Unit-type of Selection_unit) Equal to Stationary MG
(Owner of Selection_unit) Equal to (Triggering player)
Then - Actions
Unit - Change ownership of Selection_unit to Neutral Passive and Change color
Else - Actions
Set Variable Set Player_SelectedUnit[(Player number of (Triggering player))] = (Triggering unit)
Player Leaves
Events
Conditions
Actions
Game - Display to (All players) for 5.00 seconds the text: (Player_ColorCode[(Player number of (Triggering player))] + ((Name of (Triggering player)) + |r chickened out.))
Set Variable Set Player_MouseDownAfterDblClick[(Player number of (Triggering player))] = "false"
Set Variable Set Player_TutorialStep[(Player number of (Triggering player))] = "99"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Set Difficulty for Player_Marine[(Player number of (Triggering player))]) Equal to 1
Then - Actions
Trigger - Turn on Difficulty_Set_Chooser <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of Tank 0005 <gen>) Equal to (Triggering player)
Then - Actions
Set Variable Set P = (Position of Tank 0005 <gen>)
Unit - Order Tank 0005 <gen> to Unload All At . P
Custom script: call RemoveLocation(udg_P)
Set Variable Set PG = (All players matching ((((Matching player) is an ally of Player 1 (Red).) Equal to True) and (((Matching player) slot status) Equal to Is playing)).)
Unit - Change ownership of Tank 0005 <gen> to (Player((Player number of (Random player from PG)))) and Retain color
Custom script: call DestroyForce(udg_PG)
Else - Actions
Trigger - Run GetPlayerCount_RecreateMB <gen> (checking conditions)
For each (Integer A) from 1 to 6 , do (Actions)
Loop - Actions
Hero - Drop the item from slot (Integer A) of Player_Marine[(Player number of (Triggering player))] .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Triggering player) Equal to Game_AdminPlayer
Then - Actions
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set Game_AdminPlayer = (Player((Integer A)))
Custom script: exitwhen true
Else - Actions
Else - Actions
GetPlayerCount RecreateMB
Events
Time - Elapsed game time is 1.00 seconds
Conditions
Actions
Wait 0.10 seconds
Set Variable Set Game_ActivePlayerCount = "0"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set Game_ActivePlayerCount = (Game_ActivePlayerCount + 1)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_ActivePlayerCount Less than or equal to 2
Then - Actions
Set Variable Set AM_MaxMonsterSpawn = "50"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_ActivePlayerCount Equal to 3
Then - Actions
Set Variable Set AM_MaxMonsterSpawn = "40"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_ActivePlayerCount Equal to 4
Then - Actions
Set Variable Set AM_MaxMonsterSpawn = "35"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_ActivePlayerCount Equal to 5
Then - Actions
Set Variable Set AM_MaxMonsterSpawn = "30"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_ActivePlayerCount Greater than or equal to 6
Then - Actions
Set Variable Set AM_MaxMonsterSpawn = "25"
Else - Actions
Else - Actions
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
Player - Set (Player((Integer A))) . Food max to AM_MaxMonsterSpawn
Trigger - Run MB_Create <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
Trigger - Run MB_Create_Zombie <gen> (checking conditions)
Else - Actions
Remove Dead Units
Events
Unit - A unit Dies
Conditions
((Dying unit) is A Hero) Equal to False
Actions
Unit Group - Add (Triggering unit) to UG_DeadUnits
Unit Group - Remove (Triggering unit) from UG_AliveZombies .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) is A flying unit) Equal to True
Then - Actions
Unit Group - Remove (Triggering unit) from UG_FlyingAdjustHeight .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Light Red (Nades)
Then - Actions
-------- Effekt von Mine entfernen --------
Special Effect - Destroy (Load 13 of (Key (Triggering unit).) in Hash_Main.)
Unit - Remove (Triggering unit) from the game
Skip remaining actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player number of (Owner of (Killing unit))) Less than or equal to Maxplayers
(Player number of (Owner of (Killing unit))) Greater than 0
(Owner of (Triggering unit)) Equal to Player_Monsterowner
Then - Actions
Set Variable Set Player_Kills[(Player number of (Owner of (Killing unit)))] = (Player_Kills[(Player number of (Owner of (Killing unit)))] + 1)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Triggering unit)) Equal to Orc
Then - Actions
Hashtable - Save 15 as 0 of (Key (Triggering unit).) in Hash_Main .
Else - Actions
Hashtable - Save 60 as 0 of (Key (Triggering unit).) in Hash_Main .
Remove Dead Units Countdown
Events
Time - Every 10.00 seconds of game time
Conditions
Actions
Unit Group - Pick every unit in UG_DeadUnits and do (Actions)
Loop - Actions
Set Variable Set x = (Load 0 of (Key (Picked unit).) from Hash_Main.)
Set Variable Set x = (x - 10)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Less than 0
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Missle (BFG)
Then - Actions
Special Effect - Destroy (Load 6 of (Key (Picked unit).) in Missle_Hash.)
Special Effect - Destroy (Load 7 of (Key (Picked unit).) in Missle_Hash.)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Not equal to Heretic Spawn Placeholder
Then - Actions
-------- Bei Placeholder nicht löschen weil auf seinem Key Summontarget usw gespeichert ist --------
Hashtable - Clear all child hashtables of child (Key (Picked unit).) in Hash_Main .
Else - Actions
Hashtable - Clear all child hashtables of child (Key (Picked unit).) in Marine_Hash .
Hashtable - Clear all child hashtables of child (Key (Picked unit).) in Missle_Hash .
Unit Group - Remove (Picked unit) from UG_DeadUnits .
Unit - Remove (Picked unit) from the game
Else - Actions
Hashtable - Save x as 0 of (Key (Picked unit).) in Hash_Main .
Burning
Events
Time - Every 1.00 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_Burning) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
Unit Group - Pick every unit in UG_Burning and do (Actions)
Loop - Actions
Set Variable Set r = (Load 3 of (Key (Picked unit).) from Hash_Main.)
Set Variable Set r = (r - 1)
Hashtable - Save r as 3 of (Key (Picked unit).) in Hash_Main .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
((Picked unit) is alive) Equal to False
r Less than or equal to 0.00
((Picked unit) is Mechanical) Equal to True
Then - Actions
Set Variable Set r = "0.00"
Unit Group - Remove (Picked unit) from UG_Burning .
Special Effect - Destroy (Load 2 of (Key (Picked unit).) in Hash_Main.)
Else - Actions
Set Variable Set r2 = ((Max life of (Picked unit)) x 0.05)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Less than 25.00
Then - Actions
Set Variable Set r2 = "25.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Greater than 75.00
Then - Actions
Set Variable Set r2 = "75.00"
Else - Actions
Set Variable Set unit = No unit
Set Variable Set unit = (Load 30 of (Key (Picked unit).) in Hash_Main.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unit Equal to No unit
Then - Actions
Set Variable Set unit = (Picked unit)
Else - Actions
Unit - Cause unit to damage (Picked unit) , dealing r2 damage of attack type Magic and damage type Normal
uses P, P2, x, UG, r6
GetPoint AwayFromMarines
Events
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Greater than 15
Then - Actions
Set Variable Set P = (Center of Tutorial_OverMarineEnd <gen>)
Skip remaining actions
Else - Actions
Custom script: set udg_r6 = GetLocationZ(udg_P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Terrain cliff level at P) Not equal to Game_BaseCliffLevel
r6 Less than Game_BaseTerrainHeight
(NoSpawn <gen> contains P) Equal to True
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P = (Random point in (Playable map area))
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
Destructible - Pick every destructible within 256.00 of P and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked destructible) is alive) Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Destructible-type of (Picked destructible)) Equal to OTip (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to OTis (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTlb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to Ytlc (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTpb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTfb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to JTtw (Unexpected type: 'destructablecode')
(Substring((Name of (Picked destructible)), 1, 7)) Equal to Blocker
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P = (Random point in (Playable map area))
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
Else - Actions
Unit Group - Pick every unit in UG_AliveMarines and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is alive) Equal to True
Then - Actions
Set Variable Set P2 = (Position of (Picked unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P2) Less than 2000.00
Then - Actions
Custom script: call RemoveLocation(udg_P2)
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P = (Random point in (Playable map area))
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Else - Actions
uses P, P2, x, x2, UG, loopint B, r6
GetPoint CloseToMarines
Events
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
x Greater than 15
(Number of units in UG_AliveMarines) Equal to 0
Then - Actions
Set Variable Set P = (Center of Tutorial_OverMarineEnd <gen>)
Skip remaining actions
Else - Actions
Custom script: set udg_r6 = GetLocationZ(udg_P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Terrain cliff level at P) Not equal to Game_BaseCliffLevel
r6 Less than Game_BaseTerrainHeight
(NoSpawn <gen> contains P) Equal to True
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P2 = (Position of (Random unit from UG_AliveMarines))
Set Variable Set P = (P2 offset by (Random real number between 1200.00 and 1700.00) towards (Random angle) degrees.)
Custom script: call RemoveLocation(udg_P2)
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
-------- Mehr Platz für Heretics --------
For each (Integer B) from 1 to 10 , do (Actions)
Loop - Actions
Set Variable Set P2 = (P offset by 256 towards ((Real((Integer B))) x 36.00) degrees.)
Custom script: set udg_r6 = GetLocationZ(udg_P2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Terrain cliff level at P2) Not equal to Game_BaseCliffLevel
((Playable map area) contains P2) Equal to False
r6 Less than Game_BaseTerrainHeight
(NoSpawn <gen> contains P2) Equal to True
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Custom script: call RemoveLocation(udg_P2)
Set Variable Set P2 = (Position of (Random unit from UG_AliveMarines))
Set Variable Set P = (P2 offset by (Random real number between 1200.00 and 1700.00) towards (Random angle) degrees.)
Custom script: call RemoveLocation(udg_P2)
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Destructible - Pick every destructible within 256.00 of P and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked destructible) is alive) Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Destructible-type of (Picked destructible)) Equal to OTip (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to OTis (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTlb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to Ytlc (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTpb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTfb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to JTtw (Unexpected type: 'destructablecode')
(Substring((Name of (Picked destructible)), 1, 7)) Equal to Blocker
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P2 = (Position of (Random unit from UG_AliveMarines))
Set Variable Set P = (P2 offset by (Random real number between 1200.00 and 1700.00) towards (Random angle) degrees.)
Custom script: call RemoveLocation(udg_P2)
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
Else - Actions
Set Variable Set x2 = "0"
Unit Group - Pick every unit in UG_AliveMarines and do (Actions)
Loop - Actions
Set Variable Set P2 = (Position of (Picked unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P2) Greater than or equal to 1200.00
(Distance between P and P2) Less than or equal to 1700.00
Then - Actions
Set Variable Set x2 = "1"
Else - Actions
Custom script: call RemoveLocation(udg_P2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Equal to 0
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P2 = (Position of (Random unit from UG_AliveMarines))
Set Variable Set P = (P2 offset by (Random real number between 1200.00 and 1700.00) towards (Random angle) degrees.)
Custom script: call RemoveLocation(udg_P2)
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
uses P, P2, x, x2, UG, r6
GetPoint VeryCloseToMarines
Events
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
x Greater than 15
(Number of units in UG_AliveMarines) Equal to 0
Then - Actions
Set Variable Set P = (Center of Tutorial_OverMarineEnd <gen>)
Skip remaining actions
Else - Actions
Custom script: set udg_r6 = GetLocationZ(udg_P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Terrain cliff level at P) Not equal to Game_BaseCliffLevel
r6 Less than Game_BaseTerrainHeight
(NoSpawn <gen> contains P) Equal to True
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P2 = (Position of (Random unit from UG_AliveMarines))
Set Variable Set P = (P2 offset by (Random real number between 100.00 and 500.00) towards (Random angle) degrees.)
Custom script: call RemoveLocation(udg_P2)
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
Destructible - Pick every destructible within 196.00 of P and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked destructible) is alive) Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Destructible-type of (Picked destructible)) Equal to OTip (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to OTis (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTlb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to Ytlc (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTpb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTfb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to JTtw (Unexpected type: 'destructablecode')
(Substring((Name of (Picked destructible)), 1, 7)) Equal to Blocker
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P2 = (Position of (Random unit from UG_AliveMarines))
Set Variable Set P = (P2 offset by (Random real number between 100.00 and 500.00) towards (Random angle) degrees.)
Custom script: call RemoveLocation(udg_P2)
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
Else - Actions
Set Variable Set x2 = "0"
Unit Group - Pick every unit in UG_AliveMarines and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Equal to 0
Then - Actions
Set Variable Set P2 = (Position of (Picked unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P2) Greater than or equal to 100.00
(Distance between P and P2) Less than or equal to 500.00
Then - Actions
Set Variable Set x2 = "1"
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Equal to 0
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P2 = (Position of (Random unit from UG_AliveMarines))
Set Variable Set P = (P2 offset by (Random real number between 100.00 and 500.00) towards (Random angle) degrees.)
Custom script: call RemoveLocation(udg_P2)
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
uses P, P2, x, x2, UG, r6, UG2 (possible targets)
GetPoint VeryCloseToUG2
Events
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
x Greater than 15
(Number of units in UG_AliveMarines) Equal to 0
Then - Actions
Set Variable Set P = (Center of Tutorial_OverMarineEnd <gen>)
Skip remaining actions
Else - Actions
Custom script: set udg_r6 = GetLocationZ(udg_P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Terrain cliff level at P) Not equal to Game_BaseCliffLevel
r6 Less than Game_BaseTerrainHeight
(NoSpawn <gen> contains P) Equal to True
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P2 = (Position of (Random unit from UG_AliveMarines))
Set Variable Set P = (P2 offset by (Random real number between 100.00 and 500.00) towards (Random angle) degrees.)
Custom script: call RemoveLocation(udg_P2)
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
Destructible - Pick every destructible within 196.00 of P and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked destructible) is alive) Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Destructible-type of (Picked destructible)) Equal to OTip (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to OTis (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTlb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to Ytlc (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTpb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTfb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to JTtw (Unexpected type: 'destructablecode')
(Substring((Name of (Picked destructible)), 1, 7)) Equal to Blocker
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P2 = (Position of (Random unit from UG_AliveMarines))
Set Variable Set P = (P2 offset by (Random real number between 100.00 and 500.00) towards (Random angle) degrees.)
Custom script: call RemoveLocation(udg_P2)
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
Else - Actions
Set Variable Set x2 = "0"
Unit Group - Pick every unit in UG2 and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Equal to 0
Then - Actions
Set Variable Set P2 = (Position of (Picked unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P2) Greater than or equal to 100.00
(Distance between P and P2) Less than or equal to 500.00
Then - Actions
Set Variable Set x2 = "1"
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Equal to 0
Then - Actions
Set Variable Set x = (x + 1)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P2 = (Position of (Random unit from UG_AliveMarines))
Set Variable Set P = (P2 offset by (Random real number between 100.00 and 500.00) towards (Random angle) degrees.)
Custom script: call RemoveLocation(udg_P2)
Trigger - Run (This trigger) (checking conditions)
Skip remaining actions
Else - Actions
Blood DmgTake
Events
Conditions
(Damage taken) Greater than 2.00
Actions
Custom script: local effect bloodeff
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Damage source)) Equal to The Crusher
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Damage source) is in UG_Stampede.) Equal to True
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Other\Stampede\StampedeMissileDeath.mdl
Set Variable Set PowerPush_PowerXY = "5.00"
Else - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Weapons\HydraliskImpact\HydraliskImpact.mdl
Set Variable Set PowerPush_PowerXY = "15.00"
Set Variable Set PowerPush_Unit = (Triggering unit)
Set Variable Set PowerPush_AngleXY = (Facing of (Damage source))
Set Variable Set PowerPush_PowerZ = "0.00"
Trigger - Run Velocity_PowerPush_PPunit <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 4) Equal to 1
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Objects\Spawnmodels\Critters\Albatross\CritterBloodAlbatross.mdl
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Weapons\HydraliskImpact\HydraliskImpact.mdl
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Special Effect - Create a special effect attached to the hand (Unexpected type: 'attachpoint') of (Triggering unit) using Objects\Spawnmodels\Critters\Albatross\CritterBloodAlbatross.mdl
Else - Actions
Special Effect - Create a special effect attached to the head (Unexpected type: 'attachpoint') of (Triggering unit) using Objects\Spawnmodels\Critters\Albatross\CritterBloodAlbatross.mdl
Custom script: set bloodeff = bj_lastCreatedEffect
Wait 2.00 seconds
Custom script: call DestroyEffectBJ(bloodeff)
Blood Death
Events
Unit - A unit Dies
Conditions
(Race of (Triggering unit)) Not equal to Orc
(Unit-type of (Triggering unit)) Not equal to Villager (Infected)
(Unit-type of (Triggering unit)) Not equal to Souldrainer
(Unit-type of (Triggering unit)) Not equal to Mind Flayer
((Triggering unit) is Mechanical) Equal to False
Actions
Custom script: local effect bloodeff
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Not equal to Maggot
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Current flying height of (Triggering unit)) Less than 100.00
Then - Actions
Set Variable Set P_BloodUnitDeath = (Position of (Triggering unit))
Special Effect - Create a special effect at P_BloodUnitDeath using Blood Burst.mdx
Custom script: call RemoveLocation(udg_P_BloodUnitDeath)
Custom script: set bloodeff = bj_lastCreatedEffect
Wait 300.00 seconds
Custom script: call DestroyEffectBJ(bloodeff)
Else - Actions
Else - Actions
Animation - Change (Triggering unit) 's vertex coloring to ( 70.00 %, 30.00 %, 45.00 %) with 30.00 % transparency
Blinking Lights Init
Events
Time - Elapsed game time is 0.01 seconds
Conditions
Actions
Set Variable Set BlinkingLights_UG = (Units owned by Neutral Passive of type Flashlight)
Unit Group - Pick every unit in BlinkingLights_UG and do (Actions)
Loop - Actions
Set Variable Set BlinkingLights_Count = (BlinkingLights_Count + 1)
Set Variable Set BlinkingLights_Points[BlinkingLights_Count] = (Position of (Picked unit))
Set Variable Set unit = (Picked unit)
Custom script: call UnitAddAbility(udg_unit, 'Aloc')
Set Variable Set BlinkingLights_Units[BlinkingLights_Count] = (Picked unit)
Blinking Lights Blink
Events
Time - Every 0.30 seconds of game time
Conditions
Actions
For each (Integer A) from 1 to BlinkingLights_Count , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
BlinkingLights_Units[(Integer A)] Equal to No unit
Then - Actions
Unit - Create 1 . Flashlight for Neutral Passive at BlinkingLights_Points[(Integer A)] facing Default building facing degrees
Set Variable Set unit = (Last created unit)
Custom script: call UnitAddAbility(udg_unit, 'Aloc')
Set Variable Set BlinkingLights_Units[(Integer A)] = (Last created unit)
Else - Actions
Unit - Remove BlinkingLights_Units[(Integer A)] from the game
Set Variable Set BlinkingLights_Units[(Integer A)] = No unit
Else - Actions
input:
Explosion_Origin
Explosion_Type (integer; 1: normal, 2: fragment, 3: normal (red. range) & fragment, 4: wie 3, aber nur ein missle)
Explosion_Range (real)
Explosion_MaxDmg (real)
Explosion_Caster
Create Explosion
Events
Conditions
Actions
Custom script: local effect eff
Custom script: local location loc
Custom script: set loc = OffsetLocation (udg_Explosion_Origin, 0.1, 0)
Custom script: set udg_Explosion_Z = GetLocationZ(udg_Explosion_Origin)
-------- Light --------
Unit - Create 1 . Light Red (Nades) for Neutral Passive at Explosion_Origin facing Default building facing degrees
Unit - Add a 1.00 second Generic expiration timer to (Last created unit)
-------- Fragment Explosion --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Explosion_Type Equal to 2
Explosion_Type Equal to 3
Explosion_Type Equal to 4
Then - Actions
-------- Explosion damage --------
Set Variable Set Explosion_UG = (Units within Explosion_Range of Explosion_Origin matching (((Matching unit) is alive) Equal to True).)
Set Variable Set Explosion_x = (Number of units in Explosion_UG)
For each (Integer Explosion_A ) from 1 to Explosion_x , do (Actions)
Loop - Actions
Set Variable Set Explosion_Target = (Random unit from Explosion_UG)
Unit Group - Remove Explosion_Target from Explosion_UG .
Set Variable Set Explosion_OriginTarget = (Position of Explosion_Target)
Custom script: set udg_Explosion_TargetZ = GetLocationZ(udg_Explosion_OriginTarget)
Set Variable Set Explosion_TargetZ = (Abs((Explosion_Z - Explosion_TargetZ)))
Set Variable Set Explosion_TargetZ = (Explosion_TargetZ / Explosion_Range)
Set Variable Set Explosion_TargetZ = (1.00 - Explosion_TargetZ)
Set Variable Set Explosion_r = (Distance between Explosion_Origin and Explosion_OriginTarget)
Set Variable Set Explosion_r = (Explosion_r / Explosion_Range)
Set Variable Set Explosion_r = (1.00 - Explosion_r)
Set Variable Set Explosion_r = (Explosion_TargetZ x Explosion_r)
Set Variable Set Explosion_r = (Explosion_MaxDmg x Explosion_r)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Explosion_Type Equal to 3
Explosion_Type Equal to 4
Then - Actions
Set Variable Set Explosion_r = (Explosion_r x 0.67)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of Explosion_Target) Equal to Marine
Then - Actions
Set Variable Set Explosion_r = (Explosion_r x Game_Options_MissleDmgFactor)
Else - Actions
Unit - Cause Explosion_Caster to damage Explosion_Target , dealing Explosion_r damage of attack type Pierce and damage type Normal
Custom script: call RemoveLocation(udg_Explosion_OriginTarget)
Custom script: call DestroyGroup(udg_Explosion_UG)
-------- Fragments --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Explosion_Type Not equal to 4
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_Missles) Less than Missles_CriticalNumberForFrags
Then - Actions
For each (Integer Explosion_A ) from 1 to 7 , do (Actions)
Loop - Actions
Unit - Create 1 . Missle (Standard Rifle) for (Owner of Explosion_Caster) at Explosion_Origin facing (Random angle) degrees
-------- z facing --------
Hashtable - Save (Random real number between 0.10 and 2.00) as 2 of (Key (Last created unit).) in Missle_Hash .
-------- WeaponType --------
Hashtable - Save 2 as 0 of (Key (Last created unit).) in Missle_Hash .
Unit Group - Add (Last created unit) to UG_Missles
Else - Actions
For each (Integer Explosion_A ) from 1 to 4 , do (Actions)
Loop - Actions
Unit - Create 1 . Missle (Standard Rifle) for (Owner of Explosion_Caster) at Explosion_Origin facing (Random angle) degrees
-------- z facing --------
Hashtable - Save (Random real number between 0.05 and 0.40) as 2 of (Key (Last created unit).) in Missle_Hash .
-------- WeaponType --------
Hashtable - Save 2 as 0 of (Key (Last created unit).) in Missle_Hash .
Unit Group - Add (Last created unit) to UG_Missles
Else - Actions
Unit - Create 1 . Missle (Standard Rifle) for (Owner of Explosion_Caster) at Explosion_Origin facing (Random angle) degrees
-------- z facing --------
Hashtable - Save (Random real number between 0.10 and 2.00) as 2 of (Key (Last created unit).) in Missle_Hash .
-------- WeaponType --------
Hashtable - Save 2 as 0 of (Key (Last created unit).) in Missle_Hash .
Unit Group - Add (Last created unit) to UG_Missles
Trigger - Turn on Missle_Fly <gen>
Special Effect - Create a special effect at Explosion_Origin using Abilities\Spells\Other\TinkerRocket\TinkerRocketMissile.mdl
Special Effect - Destroy (Last created special effect)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Explosion_Type Not equal to 3
Explosion_Type Not equal to 4
Then - Actions
Custom script: call RemoveLocation(udg_Explosion_Origin)
Else - Actions
Else - Actions
-------- Normale Explosion nach Fragments! (weg. range red. und effekt wait) --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Explosion_Type Equal to 1
Explosion_Type Equal to 3
Explosion_Type Equal to 4
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Explosion_Type Equal to 3
Explosion_Type Equal to 4
Then - Actions
Set Variable Set Explosion_MaxDmg = (Explosion_MaxDmg x 0.33)
Set Variable Set Explosion_Range = (Explosion_Range x 0.66)
Else - Actions
Set Variable Set Explosion_UG = (Units within Explosion_Range of Explosion_Origin matching (((Matching unit) is alive) Equal to True).)
Set Variable Set Explosion_x = (Number of units in Explosion_UG)
For each (Integer Explosion_A ) from 1 to Explosion_x , do (Actions)
Loop - Actions
Set Variable Set Explosion_Target = (Random unit from Explosion_UG)
Unit Group - Remove Explosion_Target from Explosion_UG .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of Explosion_Target) Equal to Explosives
(Unit-type of Explosion_Target) Equal to Remote-Controlled Mine
(Unit-type of Explosion_Target) Equal to Anti-Tank Mine
(Unit-type of Explosion_Target) Equal to Anti-Person Mine
Then - Actions
Unit - Add a 0.10 second Generic expiration timer to Explosion_Target
Else - Actions
Set Variable Set Explosion_OriginTarget = (Position of Explosion_Target)
Custom script: set udg_Explosion_TargetZ = GetLocationZ(udg_Explosion_OriginTarget)
Set Variable Set Explosion_TargetZ = (Abs((Explosion_Z - Explosion_TargetZ)))
Set Variable Set Explosion_TargetZ = (Explosion_TargetZ / Explosion_Range)
Set Variable Set Explosion_TargetZ = (1.00 - Explosion_TargetZ)
Set Variable Set Explosion_r = (Distance between Explosion_Origin and Explosion_OriginTarget)
Set Variable Set Explosion_r = (Explosion_r / Explosion_Range)
Set Variable Set Explosion_r = (1.00 - Explosion_r)
Set Variable Set Explosion_r = (Explosion_TargetZ x Explosion_r)
Set Variable Set Explosion_r = (Explosion_MaxDmg x Explosion_r)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of Explosion_Target) Equal to Marine
Then - Actions
Set Variable Set Explosion_r = (Explosion_r x Game_Options_MissleDmgFactor)
Else - Actions
Unit - Cause Explosion_Caster to damage Explosion_Target , dealing Explosion_r damage of attack type Siege and damage type Normal
Custom script: call RemoveLocation(udg_Explosion_OriginTarget)
Custom script: call DestroyGroup(udg_Explosion_UG)
Special Effect - Create a special effect at Explosion_Origin using Abilities\Weapons\DemolisherFireMissile\DemolisherFireMissile.mdl
Special Effect - Destroy (Last created special effect)
Special Effect - Create a special effect at Explosion_Origin using Abilities\Spells\Other\Doom\DoomDeath.mdl
Custom script: set eff = bj_lastCreatedEffect
Custom script: call RemoveLocation(udg_Explosion_Origin)
Else - Actions
Wait 0.10 seconds
Custom script: set udg_P = loc
-------- Blow up destructibles --------
Set Variable Set Explosion_x = "0"
Destructible - Pick every destructible within 300.00 of P and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Destructible-type of (Picked destructible)) Equal to B00F (Unexpected type: 'destructablecode')
((Picked destructible) is alive) Equal to True
Explosion_x Equal to 0
Then - Actions
Set Variable Set Explosion_x = "1"
Destructible - Kill (Picked destructible)
Else - Actions
Wait 2.00 seconds
Custom script: call DestroyEffectBJ(eff)
Explosive Destructibles Init
Events
Map initialization
Conditions
Actions
Set Variable Set Game_WorldDamage = Dummy 0004 <gen>
Destructible - Pick every destructible in (Playable map area) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Destructible-type of (Picked destructible)) Equal to B00F (Unexpected type: 'destructablecode')
Then - Actions
Trigger - Add to Explosive_Destructibles_Detonate <gen> the event ((Picked destructible) dies)
Else - Actions
Explosive Destructibles Detonate
Events
Conditions
Actions
Custom script: local location loc
Custom script: local destructable tempdest
Custom script: set tempdest = GetDyingDestructable()
Set Variable Set Explosion_Caster = Game_WorldDamage
Set Variable Set Explosion_Origin = (Position of (Dying destructible))
Custom script: set loc = OffsetLocation (udg_Explosion_Origin, 0.1, 0)
Set Variable Set Explosion_Range = "500.00"
Set Variable Set Explosion_MaxDmg = "400.00"
Set Variable Set Explosion_Type = "1"
Trigger - Run Create_Explosion <gen> (checking conditions)
Wait 0.10 seconds
Custom script: set udg_dest = tempdest
Trigger - Turn off (This trigger)
Destructible - Remove dest
Trigger - Turn on (This trigger)
-------- Flames --------
Wait 0.50 seconds
Custom script: set udg_P = loc
For each (Integer A) from 1 to (Random integer number between 4 and 8) , do (Actions)
Loop - Actions
Set Variable Set P2 = (P offset by (Random real number between 48.00 and 128.00) towards (Random angle) degrees.)
Unit - Create 1 . Burning Oil for Neutral Hostile at P2 facing (Random angle) degrees
Custom script: call RemoveLocation(udg_P2)
Unit - Add a (Random real number between 30.00 and 45.00) second Generic expiration timer to (Last created unit)
Wait 0.50 seconds
Custom script: set udg_P = loc
For each (Integer A) from 1 to (Random integer number between 3 and 6) , do (Actions)
Loop - Actions
Set Variable Set P2 = (P offset by (Random real number between 96.00 and 256.00) towards (Random angle) degrees.)
Unit - Create 1 . Burning Oil for Neutral Hostile at P2 facing (Random angle) degrees
Custom script: call RemoveLocation(udg_P2)
Unit - Add a (Random real number between 30.00 and 45.00) second Generic expiration timer to (Last created unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
Wait 60.00 seconds
Custom script: set udg_P = loc
Destructible - Create a B00F (Unexpected type: 'destructablecode') at P facing (Random angle) with scale 0.80 and variation 0
Trigger - Add to Explosive_Destructibles_Detonate <gen> the event ((Last created destructible) dies)
Else - Actions
Custom script: call RemoveLocation(udg_P)
Catch Fire
Events
Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Damage source)) Equal to Road Flare
(Unit-type of (Damage source)) Equal to Burning Oil
Actions
Set Variable Set P2 = (Position of (Triggering unit))
Set Variable Set P3 = (Position of (Damage source))
Custom script: set udg_r = GetLocationZ(udg_P2)
Custom script: set udg_r2 = GetLocationZ(udg_P3)
Set Variable Set r = (r + (Current flying height of (Triggering unit)))
Set Variable Set r2 = (r2 + (Current flying height of (Damage source)))
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P3)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((r - r2))) Less than 96.00
Then - Actions
Hashtable - Save 2.00 as 3 of (Key (Triggering unit).) in Hash_Main .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) is in UG_Burning.) Equal to False
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Environment\LargeBuildingFire\LargeBuildingFire2.mdl
Hashtable - Save Handle Of (Last created special effect) as 2 of (Key (Triggering unit).) in Hash_Main .
-------- Burning caster für kill (arena mod) --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player number of (Owner of (Damage source))) Less than or equal to Maxplayers
Then - Actions
Hashtable - Save Handle Of Player_Marine[(Player number of (Owner of (Damage source)))] as 30 of (Key (Triggering unit).) in Hash_Main .
Else - Actions
Unit Group - Add (Triggering unit) to UG_Burning
Else - Actions
Trigger - Turn on Burning <gen>
Else - Actions
Damit der gleiche Sound mehrfach abgespielt werden kann gleichzeitig

0: Anzahl Kopien des Sounds
1-9: Sounds
10: Zuletzt abgespielte Kopie
Init Sound
Events
Map initialization
Conditions
Actions
Hashtable - Create a hashtable
Set Variable Set Sound_Hash = (Last created hashtable)
Set Variable Set x = "1"
Hashtable - Save 4 as 0 of x in Sound_Hash .
Hashtable - Save Handle Of m3_insertshell <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of m3_insertshell01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of m3_insertshell02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of m3_insertshell03 <gen> as 4 of x in Sound_Hash .
Set Variable Set x = "2"
Hashtable - Save 2 as 0 of x in Sound_Hash .
Hashtable - Save Handle Of singlegunshot <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of singlegunshot01 <gen> as 2 of x in Sound_Hash .
Set Variable Set x = "3"
Hashtable - Save 3 as 0 of x in Sound_Hash .
Hashtable - Save Handle Of ClipEmpty_Pistol <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of ClipEmpty_Pistol01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of ClipEmpty_Pistol02 <gen> as 3 of x in Sound_Hash .
Set Variable Set x = "4"
Hashtable - Save 6 as 0 of x in Sound_Hash .
Hashtable - Save Handle Of chainsaw <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of chainsaw01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of chainsaw02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of chainsaw03 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of chainsaw04 <gen> as 5 of x in Sound_Hash .
Hashtable - Save Handle Of chainsaw05 <gen> as 6 of x in Sound_Hash .
Set Variable Set x = "5"
Hashtable - Save 5 as 0 of x in Sound_Hash .
Hashtable - Save Handle Of chainsaw_gauntlet_hit <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of chainsaw_gauntlet_hit01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of chainsaw_gauntlet_hit02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of chainsaw_gauntlet_hit03 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of chainsaw_gauntlet_hit04 <gen> as 5 of x in Sound_Hash .
For each (Integer A) from 1 to x , do (Actions)
Loop - Actions
Hashtable - Save 1 as 10 of (Integer A) in Sound_Hash .
-------- Weapons: 100 + WeaponTypeIndex --------
Set Variable Set x = "101"
Hashtable - Save Handle Of usp <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of usp01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of usp02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of usp03 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of usp04 <gen> as 5 of x in Sound_Hash .
Set Variable Set x = (x + 1)
Hashtable - Save Handle Of m3 <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of m301 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of m302 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of m303 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of m304 <gen> as 5 of x in Sound_Hash .
Set Variable Set x = (x + 1)
Hashtable - Save Handle Of mp5 <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of mp501 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of mp502 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of mp503 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of mp504 <gen> as 5 of x in Sound_Hash .
Set Variable Set x = (x + 1)
Hashtable - Save Handle Of awp <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of awp01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of awp02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of awp03 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of awp04 <gen> as 5 of x in Sound_Hash .
Set Variable Set x = (x + 1)
Hashtable - Save Handle Of m249 <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of m24901 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of m24902 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of m24903 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of m24904 <gen> as 5 of x in Sound_Hash .
Set Variable Set x = (x + 1)
Hashtable - Save Handle Of rl <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of rl01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of rl02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of rl03 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of rl04 <gen> as 5 of x in Sound_Hash .
Set Variable Set x = (x + 1)
Hashtable - Save Handle Of bfg <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of bfg01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of bfg02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of bfg03 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of bfg04 <gen> as 5 of x in Sound_Hash .
Set Variable Set x = (x + 1)
Hashtable - Save Handle Of flame_loop <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of flame_loop01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of flame_loop02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of flame_loop03 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of flame_loop04 <gen> as 5 of x in Sound_Hash .
Set Variable Set x = (x + 1)
Hashtable - Save Handle Of railgun <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of railgun01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of railgun02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of railgun03 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of railgun04 <gen> as 5 of x in Sound_Hash .
Set Variable Set x = (x + 1)
Hashtable - Save Handle Of LightningShieldTarget <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of LightningShieldTarget01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of LightningShieldTarget02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of LightningShieldTarget03 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of LightningShieldTarget04 <gen> as 5 of x in Sound_Hash .
Set Variable Set x = (x + 1)
Hashtable - Save Handle Of deagle <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of deagle01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of deagle02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of deagle03 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of deagle04 <gen> as 5 of x in Sound_Hash .
Set Variable Set x = (x + 1)
Hashtable - Save Handle Of m3_nopump <gen> as 1 of x in Sound_Hash .
Hashtable - Save Handle Of m3_nopump01 <gen> as 2 of x in Sound_Hash .
Hashtable - Save Handle Of m3_nopump02 <gen> as 3 of x in Sound_Hash .
Hashtable - Save Handle Of m3_nopump03 <gen> as 4 of x in Sound_Hash .
Hashtable - Save Handle Of m3_nopump04 <gen> as 5 of x in Sound_Hash .
For each (Integer A) from 101 to x , do (Actions)
Loop - Actions
Hashtable - Save 5 as 0 of (Integer A) in Sound_Hash .
Hashtable - Save 1 as 10 of (Integer A) in Sound_Hash .
Sound Play xSoundPlay
Events
Conditions
Actions
Set Variable Set x_SoundPlay2 = (Load 10 of x_SoundPlay from Sound_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x_SoundPlay2 Equal to (Load 0 of x_SoundPlay from Sound_Hash.)
Then - Actions
Set Variable Set x_SoundPlay2 = "1"
Else - Actions
Set Variable Set x_SoundPlay2 = (x_SoundPlay2 + 1)
Hashtable - Save x_SoundPlay2 as 10 of x_SoundPlay in Sound_Hash .
Sound - Stop (Load x_SoundPlay2 of x_SoundPlay in Sound_Hash.) Immediately
Sound - Play (Load x_SoundPlay2 of x_SoundPlay in Sound_Hash.) at 100 % volume, located at P_SoundPlay with Z offset 0
Custom script: call RemoveLocation(udg_P_SoundPlay)
Ladder Init
Events
Map initialization
Conditions
Actions
Set Variable Set UG = (Units of type Ladder, Bottom)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Trigger - Add to Ladder_ClimbUp <gen> the event (A unit comes within 32.00 of (Picked unit))
Animation - Change (Picked unit) 's vertex coloring to ( 100 %, 100 %, 100 %) with 99.90 % transparency
Custom script: call DestroyGroup(udg_UG)
Set Variable Set UG = (Units of type Ladder, Top)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Trigger - Add to Ladder_ClimbDown <gen> the event (A unit comes within 32.00 of (Picked unit))
Animation - Change (Picked unit) 's vertex coloring to ( 100 %, 100 %, 100 %) with 99.90 % transparency
Custom script: call DestroyGroup(udg_UG)
Ladder Select
Events
Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to Ladder, Bottom
(Unit-type of (Triggering unit)) Equal to Ladder, Top
Actions
Custom script: local unit tempunit
Set Variable Set P = (Position of Player_Marine[(Player number of (Triggering player))])
Set Variable Set P2 = (Position of (Triggering unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P2) Less than 200.00
Then - Actions
Custom script: call RemoveLocation(udg_P)
Custom script: call RemoveLocation(udg_P2)
Selection - Select Player_Marine[(Player number of (Triggering player))] for (Triggering player)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Ladder, Bottom
Then - Actions
Set Variable Set LadderClimb_UG = (Units within 256.00 of P2 matching ((Unit-type of (Matching unit)) Equal to Ladder, Top).)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Ladder, Top
Then - Actions
Set Variable Set LadderClimb_UG = (Units within 256.00 of P2 matching ((Unit-type of (Matching unit)) Equal to Ladder, Bottom).)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in LadderClimb_UG) Greater than 0
Then - Actions
Trigger - Turn off Ladder_ClimbDown <gen>
Trigger - Turn off Ladder_ClimbUp <gen>
Set Variable Set LadderClimb_Point = (Position of (Random unit from LadderClimb_UG))
Set Variable Set unit = Player_Marine[(Player number of (Triggering player))]
Custom script: set tempunit = udg_unit
Unit - Move unit instantly to LadderClimb_Point
Unit Group - Add unit to UG_RecentlyClimbed
Custom script: call RemoveLocation(udg_LadderClimb_Point)
Custom script: call DestroyGroup(udg_LadderClimb_UG)
Trigger - Turn on Ladder_ClimbDown <gen>
Trigger - Turn on Ladder_ClimbUp <gen>
Wait 1.00 seconds
Custom script: set udg_unit = tempunit
Unit Group - Remove unit from UG_RecentlyClimbed .
Else - Actions
Custom script: call DestroyGroup(udg_LadderClimb_UG)
Else - Actions
Custom script: call RemoveLocation(udg_P)
Custom script: call RemoveLocation(udg_P2)
Selection - Select Player_Marine[(Player number of (Triggering player))] for (Triggering player)
Ladder ClimbUp
Events
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
((Triggering unit) is in UG_RecentlyClimbed.) Equal to False
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Trigger - Turn off Ladder_ClimbDown <gen>
Trigger - Turn off Ladder_ClimbUp <gen>
Set Variable Set LadderClimb_Point = (Position of (Triggering unit))
Set Variable Set LadderClimb_UG = (Units within 64.00 of LadderClimb_Point matching ((Unit-type of (Matching unit)) Equal to Ladder, Bottom).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in LadderClimb_UG) Greater than 0
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(((Current flying height of (Triggering unit)) - (Current flying height of (Random unit from LadderClimb_UG))))) Less than 50.00
Then - Actions
Custom script: call DestroyGroup(udg_LadderClimb_UG)
Set Variable Set LadderClimb_UG = (Units within 256.00 of LadderClimb_Point matching ((Unit-type of (Matching unit)) Equal to Ladder, Top).)
Set Variable Set LadderClimb_Point = (Position of (Random unit from LadderClimb_UG))
Unit - Move (Triggering unit) instantly to LadderClimb_Point
Unit Group - Add (Triggering unit) to UG_RecentlyClimbed
Custom script: call RemoveLocation(udg_LadderClimb_Point)
Custom script: call DestroyGroup(udg_LadderClimb_UG)
Else - Actions
Else - Actions
Custom script: call DestroyGroup(udg_LadderClimb_UG)
Custom script: call RemoveLocation(udg_LadderClimb_Point)
Trigger - Turn on Ladder_ClimbDown <gen>
Trigger - Turn on Ladder_ClimbUp <gen>
Wait 1.00 seconds
Custom script: set udg_unit = tempunit
Unit Group - Remove unit from UG_RecentlyClimbed .
Ladder ClimbDown
Events
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
((Triggering unit) is in UG_RecentlyClimbed.) Equal to False
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Trigger - Turn off Ladder_ClimbDown <gen>
Trigger - Turn off Ladder_ClimbUp <gen>
Set Variable Set LadderClimb_Point = (Position of (Triggering unit))
Set Variable Set LadderClimb_UG = (Units within 64.00 of LadderClimb_Point matching ((Unit-type of (Matching unit)) Equal to Ladder, Top).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in LadderClimb_UG) Greater than 0
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(((Current flying height of (Triggering unit)) - (Current flying height of (Random unit from LadderClimb_UG))))) Less than 50.00
Then - Actions
Custom script: call DestroyGroup(udg_LadderClimb_UG)
Set Variable Set LadderClimb_UG = (Units within 256.00 of LadderClimb_Point matching ((Unit-type of (Matching unit)) Equal to Ladder, Bottom).)
Set Variable Set LadderClimb_Point = (Position of (Random unit from LadderClimb_UG))
Unit - Move (Triggering unit) instantly to LadderClimb_Point
Unit Group - Add (Triggering unit) to UG_RecentlyClimbed
Custom script: call RemoveLocation(udg_LadderClimb_Point)
Custom script: call DestroyGroup(udg_LadderClimb_UG)
Else - Actions
Else - Actions
Custom script: call DestroyGroup(udg_LadderClimb_UG)
Custom script: call RemoveLocation(udg_LadderClimb_Point)
Trigger - Turn on Ladder_ClimbDown <gen>
Trigger - Turn on Ladder_ClimbUp <gen>
Wait 1.00 seconds
Custom script: set udg_unit = tempunit
Unit Group - Remove unit from UG_RecentlyClimbed .
E Tutorial Start
Events
Conditions
Actions
Trigger - Turn on Difficulty_Set_Chooser <gen>
Wait 0.50 seconds
Set Variable Set UG = (Units of type Medic (Shop))
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Unit - Remove (Picked unit) from the game
Custom script: call DestroyGroup(udg_UG)
Set Variable Set UG = (Units of type Zombie Master (Shop))
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Unit - Remove (Picked unit) from the game
Custom script: call DestroyGroup(udg_UG)
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Camera - Pan camera for (Player((Integer A))) to (Position of Player_Marine[(Integer A)]) over 0 seconds
Unit - Unpause Player_Marine[(Integer A)]
Selection - Select Player_Marine[(Integer A)] for (Player((Integer A)))
Else - Actions
Cinematic - Fade in over 2.00 seconds using texture Black Mask and color ( 0 %, 0 %, 0 %) with 0 % transparency
Set Variable Set UG_TutorialVillagers = (Units of type Villager (Infected))
Unit Group - Pick every unit in UG_TutorialVillagers and do (Actions)
Loop - Actions
Unit - Set life of (Picked unit) to (Random real number between 15.00 and 50.00)
Wait 2.00 seconds
Floating Text - Create floating text that reads Okay, time to move in. Use your jetpack to fly over the barricades.Press |cffff0000E|r to start it, then use arrow keys or right clicks to fly. above Marine 0039 <gen> with Z offset 0 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 0 % transparency
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Not equal to Is playing
Then - Actions
Set Variable Set Player_TutorialStep[(Integer A)] = "99"
Else - Actions
Set Variable Set P = (Center of Tutorial_ArrowKeysImg <gen>)
Image - Create an image using AllArrowKeys.blp of size 128.00 at P with Z offset 0.00 using image type Selection
Custom script: call RemoveLocation(udg_P)
Image - Change the height state of (Last created image) to Enable at 800.00
Image - Change (Last created image) : Enable render always state
Image - Show (Last created image)
Trigger - Turn on E_Tutorial_EnterNextArea <gen>
E Tutorial VillagerFloats
Events
Time - Every 1.00 seconds of game time
Conditions
Actions
Custom script: local texttag tempfloat
Unit Group - Pick every unit in UG_TutorialVillagers and do (Actions)
Loop - Actions
Unit - Set life of (Picked unit) to ((Life of (Picked unit)) - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Set Variable Set x = (Random integer number between 1 and 10)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 1
Then - Actions
Floating Text - Create floating text that reads Uah I'm feeling sick. above (Random unit from UG_TutorialVillagers) with Z offset 0 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 2
Then - Actions
Floating Text - Create floating text that reads Hey, can you help me? above (Random unit from UG_TutorialVillagers) with Z offset 0 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 3
Then - Actions
Floating Text - Create floating text that reads Better stay away from me, you'll catch the flu... above (Random unit from UG_TutorialVillagers) with Z offset 0 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 4
Then - Actions
Floating Text - Create floating text that reads How did I get out here..? above (Random unit from UG_TutorialVillagers) with Z offset 0 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 5
Then - Actions
Floating Text - Create floating text that reads My vision is blurry above (Random unit from UG_TutorialVillagers) with Z offset 0 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 6
Then - Actions
Floating Text - Create floating text that reads Brains.... braiiiiiins... above (Random unit from UG_TutorialVillagers) with Z offset 0 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 7
Then - Actions
Floating Text - Create floating text that reads Wait.. what? above (Random unit from UG_TutorialVillagers) with Z offset 0 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 8
Then - Actions
Floating Text - Create floating text that reads Must.... feed.... above (Random unit from UG_TutorialVillagers) with Z offset 0 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 9
Then - Actions
Floating Text - Create floating text that reads Can you call a doctor? above (Random unit from UG_TutorialVillagers) with Z offset 0 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 10
Then - Actions
Floating Text - Create floating text that reads Some crazyman bit me! What's going on? above (Random unit from UG_TutorialVillagers) with Z offset 0 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 0 % transparency
Else - Actions
Floating Text - Show (Last created floating text) for (All players)
Floating Text - Set the velocity of (Last created floating text) to 8.00 towards 90 degrees
Floating Text - Change the lifespan of (Last created floating text) to 5.00 seconds
Floating Text - Change (Last created floating text) : Disable permanence
Floating Text - Change the fading age of (Last created floating text) to 0.01 seconds
Custom script: set tempfloat = GetLastCreatedTextTag()
Wait 6.00 seconds
Custom script: call DestroyTextTagBJ( tempfloat )
Else - Actions
E Tutorial VillagerDeath
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Villager (Infected)
Actions
Unit Group - Remove (Triggering unit) from UG_TutorialVillagers .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Killing unit) Not equal to Game_WorldDamage
Then - Actions
Wait 2 seconds
Unit - Replace (Triggering unit) with a Zombie (Slow) using The new unit's max life and mana
Unit - Change ownership of (Last replaced unit) to Player_Monsterowner and Change color
Animation - Play (Last replaced unit) 's birth animation
Animation - Queue (Last created unit) 's stand animation
Else - Actions
E Tutorial EnterNextArea
Events
Time - Every 1.00 seconds of game time
Conditions
Actions
Set Variable Set P = (Player 1 (Red) start location)
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set unit = Player_Marine[(Integer A)]
Custom script: set udg_x = GetHandleId(udg_unit)
Unit - Set mana of unit to 100.00
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Tutorial_CompleteArea <gen> contains unit) Equal to False
Player_TutorialStep[(Integer A)] Equal to 0
Then - Actions
Trigger - Turn on E_Tutorial_VillagerFloats <gen>
Set Variable Set Player_TutorialStep[(Integer A)] = "1"
Set Variable Set player = (Player((Integer A)))
Unit - Add Sprint to unit
Unit - Add Nightvision to unit
Unit - Add Reload to unit
Unit - Add Select Class to unit
Set Variable Set PG = (Player group((Player((Integer A)))))
Game - Display to PG for 15.00 seconds the text: |cffff0000Double-Click|r or |cffff0000Q+Click|r to shoot enemies.(Or type |cffff0000-aa|r to turn on auto-attacking.)
Custom script: call DestroyForce(udg_PG)
Custom script: call EnableUserUI(true)
-------- Starting Items --------
Item - Create |cff7DBEF1Weapon [|rUSP|cff7DBEF1] at P
Item - Set the custom value of (Last created item) to 1
Item - Set charges remaining in (Last created item) to 12
Hero - Give (Last created item) to unit
Item - Create |cff7DBEF1Magazine [|r9mm (for USP)|cff7DBEF1] at P
Item - Set the custom value of (Last created item) to 1
Item - Set charges remaining in (Last created item) to 6
Hero - Give (Last created item) to unit
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P)
E Tutorial Over
Events
Unit - A unit enters Tutorial_Over <gen>
Conditions
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Wait 0.10 seconds
Custom script: set udg_unit = tempunit
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of unit) Equal to Villager (Infected)
(Unit-type of unit) Equal to Zombie (Slow)
Then - Actions
Set Variable Set P = (Random point in NoSpawn <gen>)
Trigger - Turn off Marine_Smart_Order <gen>
Unit - Order unit to Move To . P
Trigger - Turn on Marine_Smart_Order <gen>
Custom script: call RemoveLocation(udg_P)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Marine
Then - Actions
Trigger - Turn off (This trigger)
Trigger - Turn off E_Tutorial_EnterNextArea <gen>
Trigger - Turn off E_Tutorial_VillagerFloats <gen>
Trigger - Turn off E_Tutorial_VillagerDeath <gen>
Image - Destroy (Last created image)
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set unit = Player_Marine[(Integer A)]
Custom script: set udg_x = GetHandleId(udg_unit)
Unit - Remove Set Difficulty from unit
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Select Class for unit) Equal to 0
(Load 26 of x from Marine_Hash.) Equal to 0
Then - Actions
Unit - Add Select Class to unit
Else - Actions
-------- Spells --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Sprint for unit) Equal to 0
Then - Actions
Unit - Add Sprint to unit
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Nightvision for unit) Equal to 0
Then - Actions
Unit - Add Nightvision to unit
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Reload for unit) Equal to 0
Then - Actions
Unit - Add Reload to unit
Else - Actions
-------- Turn Jetpack off --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 16 of x from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set JetPackOff_unit = Player_Marine[(Integer A)]
Trigger - Run Jet_Pack_TurnOff_JetPack_unit <gen> (checking conditions)
Else - Actions
Hashtable - Save 0.00 as 17 of x in Marine_Hash .
Hashtable - Save 0.00 as 18 of x in Marine_Hash .
Hashtable - Save 0.00 as 19 of x in Marine_Hash .
Hashtable - Save 0.00 as 6 of x in Hash_Main .
Hashtable - Save 0.00 as 7 of x in Hash_Main .
Hashtable - Save 0.00 as 8 of x in Hash_Main .
-------- Revive&Move --------
Set Variable Set P = (Random point in Tutorial_OverMarineStart <gen>)
Set Variable Set P2 = (Random point in Tutorial_OverMarineEnd <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[(Integer A)] is alive) Equal to False
Then - Actions
Hero - Instantly revive Player_Marine[(Integer A)] at P , Hide revival graphics
Else - Actions
Unit - Move Player_Marine[(Integer A)] instantly to P
Trigger - Turn off Marine_Smart_Order <gen>
Unit - Order Player_Marine[(Integer A)] to Move To . P2
Trigger - Turn on Marine_Smart_Order <gen>
Custom script: call RemoveLocation(udg_P)
Custom script: call RemoveLocation(udg_P2)
Else - Actions
-------- Video --------
Cinematic - Turn cinematic mode On for (All players)
Player Group - Pick every player in (All players) and do (Actions)
Loop - Actions
Camera - . Apply . gg_cam_Tutorial_BridgeDestroyCam1 for (Picked player) over 0 seconds
Camera - . Apply . gg_cam_Tutorial_BridgeDestroyCam2 for (Picked player) over 12.00 seconds
Cinematic - Fade in over 3.00 seconds using texture Black Mask and color ( 0 %, 0 %, 0 %) with 0 % transparency
Wait 2 seconds
Trigger - Turn on E_Tutorial_Over_2 <gen>
Wait 10.00 seconds
Set Variable Set UG2 = (Units in NoSpawn <gen> matching (((Unit-type of (Matching unit)) Equal to Marine) and (((Owner of (Matching unit)) controller) Equal to User)))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG2) Greater than 0
Then - Actions
Set Variable Set P2 = (Random point in Tutorial_OverMarineEnd <gen>)
Unit Group - Pick every unit in UG2 and do (Actions)
Loop - Actions
Set Variable Set P = (Random point in E_Tutorial_Debug <gen>)
Unit - Move (Picked unit) instantly to P
Trigger - Turn off Marine_Smart_Order <gen>
Unit - Order (Picked unit) to Move To . P2
Trigger - Turn on Marine_Smart_Order <gen>
Custom script: call RemoveLocation(udg_P)
Custom script: call RemoveLocation(udg_P2)
Else - Actions
Custom script: call DestroyGroup(udg_UG2)
Else - Actions
E Tutorial Over 2
Events
Time - Every 1.00 seconds of game time
Conditions
Actions
Set Variable Set UG2 = (Units in NoSpawn <gen> matching (((Unit-type of (Matching unit)) Equal to Marine) and (((Owner of (Matching unit)) controller) Equal to User)))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG2) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
For each (Integer A) from 1 to 10 , do (Actions)
Loop - Actions
Set Variable Set P = (Random point in Tutorial_BridgeDestroyRegion <gen>)
Special Effect - Create a special effect at P using Abilities\Weapons\Mortar\MortarMissile.mdl
Special Effect - Destroy (Last created special effect)
Custom script: call RemoveLocation(udg_P)
Wait 0.25 seconds
Player Group - Pick every player in (All players) and do (Actions)
Loop - Actions
Camera - Shake the camera for (Picked player) with magnitude 25.00
For each (Integer A) from 1 to 10 , do (Actions)
Loop - Actions
Set Variable Set P = (Random point in Tutorial_BridgeDestroyRegion <gen>)
Special Effect - Create a special effect at P using Abilities\Weapons\Mortar\MortarMissile.mdl
Special Effect - Destroy (Last created special effect)
Custom script: call RemoveLocation(udg_P)
For each (Integer A) from 1 to 5 , do (Actions)
Loop - Actions
Set Variable Set P = (Random point in Tutorial_BridgeDestroyRegion <gen>)
Special Effect - Create a special effect at P using Abilities\Weapons\DemolisherFireMissile\DemolisherFireMissile.mdl
Special Effect - Destroy (Last created special effect)
Custom script: call RemoveLocation(udg_P)
Destructible - Kill Wide Natural Bridge 3551 <gen>
Set Variable Set UG = (Units in Tutorial_BridgeDestroyRegion <gen> matching ((Unit-type of (Matching unit)) Equal to Zombie (Slow)))
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Unit - Explode (Picked unit) .
Custom script: call DestroyGroup(udg_UG)
Wait 0.25 seconds
Player Group - Pick every player in (All players) and do (Actions)
Loop - Actions
Camera - Stop swaying/shaking the camera for (Picked player) .
For each (Integer A) from 1 to 10 , do (Actions)
Loop - Actions
Set Variable Set P = (Random point in Tutorial_BridgeDestroyRegion <gen>)
Special Effect - Create a special effect at P using Abilities\Weapons\Mortar\MortarMissile.mdl
Special Effect - Destroy (Last created special effect)
Custom script: call RemoveLocation(udg_P)
Wait 0.25 seconds
Unit Group - Pick every unit in UG_TutorialVillagers and do (Actions)
Loop - Actions
Unit - Remove (Picked unit) from the game
Custom script: call DestroyGroup(udg_UG_TutorialVillagers)
Set Variable Set UG = (Units of type Zombie (Slow))
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Unit - Remove (Picked unit) from the game
Custom script: call DestroyGroup(udg_UG)
Cinematic - Fade out over 2.00 seconds using texture Black Mask and color ( 0 %, 0 %, 0 %) with 0 % transparency
Wait 2.00 seconds
Cinematic - Turn cinematic mode Off for (All players)
Custom script: call EnableUserUI(true)
Wait 1.00 seconds
Cinematic - Hide filter
Player Group - Pick every player in (All players) and do (Actions)
Loop - Actions
Set Variable Set Player_CamSet = (Picked player)
Trigger - Run Camera_SetForPlayer_PlayerCamSet <gen> (checking conditions)
Set Variable Set P = (Position of Player_Marine[(Player number of (Picked player))])
Camera - Pan camera for (Picked player) to P over 0 seconds
Custom script: call RemoveLocation(udg_P)
Set Variable Set P = (Position of Blocker 900 2876 <gen>)
For each (Integer A) from 1 to 8 , do (Actions)
Loop - Actions
Set Variable Set P2 = (P offset by ((128.00 x (Real((Integer A)))), 0))
Destructible - Create a B00E (Unexpected type: 'destructablecode') at P2 facing (Random angle) with scale 1 and variation 0
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
Trigger - Turn on Monster_Spawn <gen>
Trigger - Run E_Spawn_Starting_Weapons <gen> (checking conditions)
Else - Actions
Unit Group - Pick every unit in UG2 and do (Actions)
Loop - Actions
Set Variable Set P2 = (Random point in Tutorial_OverMarineEnd <gen>)
Custom script: set udg_r = GetLocationZ(udg_P2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(r + 100.00) Less than Game_BaseTerrainHeight
Then - Actions
Set Variable Set P = (Random point in NorthRoad <gen>)
Unit - Move (Picked unit) instantly to P
Custom script: call RemoveLocation(udg_P)
Else - Actions
Trigger - Turn off Marine_Smart_Order <gen>
Unit - Order (Picked unit) to Move To . P2
Trigger - Turn on Marine_Smart_Order <gen>
Custom script: call RemoveLocation(udg_P2)
Custom script: call DestroyGroup(udg_UG2)
E Spawn Starting Weapons
Events
Conditions
Actions
For each (Integer A) from 1 to 2 , do (Actions)
Loop - Actions
-------- Point --------
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Item - Create WeaponData_ItemType[(Integer A)] at P
Item - Set the custom value of (Last created item) to (Integer A)
Item - Set charges remaining in (Last created item) to (Load 6 of (Integer A) from WeaponData_Hash.)
Item - Create WeaponData_ItemTypeAmmoStck[(Integer A)] at P
Item - Set the custom value of (Last created item) to (Integer A)
Item - Set charges remaining in (Last created item) to (Load 19 of (Integer A) from WeaponData_Hash.)
Custom script: call RemoveLocation(udg_P)
For each (Integer A) from 1 to 1 , do (Actions)
Loop - Actions
-------- Point --------
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Item - Create WeaponData_ItemTypeAmmoStck[(Integer A)] at P
Item - Set the custom value of (Last created item) to (Integer A)
Item - Set charges remaining in (Last created item) to 6
Item - Create WeaponData_ItemTypeAmmoAltStck[(Integer A)] at P
Item - Set the custom value of (Last created item) to (Integer A)
Item - Set charges remaining in (Last created item) to (Load 19 of (Integer A) from WeaponData_Hash.)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Item - Create |cff7DBEF1HE-Nades at P
Item - Set charges remaining in (Last created item) to 3
Custom script: call RemoveLocation(udg_P)
For each (Integer A) from 1 to (Random integer number between 2 and 3) , do (Actions)
Loop - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Item - Create |cff7DBEF1Weapon [|rChainsaw|cff7DBEF1] at P
Custom script: call RemoveLocation(udg_P)
Item - Set the custom value of (Last created item) to -1
E Scientist Psst
Events
Unit - A unit comes within 800.00 of Scientist 0028 <gen>
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Load 16 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Actions
Custom script: local integer xtemp
Trigger - Turn off (This trigger)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Event_Scientist_Index Equal to 0
Then - Actions
Wait 0.10 seconds
Set Variable Set P = (Position of Scientist 0028 <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Sound - Play over_here_2 <gen> at 100 % volume, located at P with Z offset 0
Custom script: set xtemp = 1
Else - Actions
Sound - Play pssst <gen> at 100 % volume, located at P with Z offset 0
Custom script: set xtemp = 2
Custom script: call RemoveLocation(udg_P)
Wait 2.00 seconds
Set Variable Set P = (Position of Scientist 0028 <gen>)
Custom script: set udg_x = xtemp
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 1
Then - Actions
Sound - Play pssst <gen> at 100 % volume, located at P with Z offset 0
Else - Actions
Sound - Play over_here_2 <gen> at 100 % volume, located at P with Z offset 0
Custom script: call RemoveLocation(udg_P)
Wait 10.00 seconds
Trigger - Turn on (This trigger)
Else - Actions
E Scientist Message
Events
Unit - A unit comes within 300.00 of Scientist 0028 <gen>
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Load 16 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Trigger - Turn off (This trigger)
Wait 0.10 seconds
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Event_Scientist_Index Equal to 1
Then - Actions
Custom script: set udg_unit = tempunit
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(unit has an item of type |cff94D64ASyringe (Filled with blood)) Equal to True
Then - Actions
Item - Remove (Item carried by unit of type |cff94D64ASyringe (Filled with blood))
Set Variable Set Event_Scientist_Index = "2"
Game - Display to (All players) for 5.00 seconds the text: |cff94D64AScientist:|r Good work. Now give me a moment, will ya?
Wait 1.00 seconds
Unit - Hide Scientist 0028 <gen>
Wait 15.00 seconds
Unit - Unhide Scientist 0028 <gen>
Wait 1.00 seconds
Game - Display to (All players) for 15.00 seconds the text: |cff94D64AScientist:|r Well.. it didn't turn out the way I hoped it would, but I was able to create a serum which will strengthen your immune system against the virus.
Set Variable Set P = (Point(2870.00, -4300.00))
For each (Integer A) from 1 to Game_ActivePlayerCount , do (Actions)
Loop - Actions
Item - Create |cff94D64ASerum at P
Custom script: call RemoveLocation(udg_P)
Wait 5.00 seconds
Game - Display to (All players) for 15.00 seconds the text: |cff94D64AScientist:|r And now please bring me out of this pit!I need to get to the next laboratory in the |cffff0000north|r.
Set Variable Set P = (Point(2870.00, -4300.00))
Unit - Move Scientist 0028 <gen> instantly to P
Custom script: call RemoveLocation(udg_P)
Unit - Make Scientist 0028 <gen> Vulnerable
Unit - Turn collision for Scientist 0028 <gen> On .
Unit - Change ownership of Scientist 0028 <gen> to Player 10 (Light Blue) and Change color
Trigger - Turn on E_Scientist_Follow <gen>
-------- HealthBar --------
Set Variable Set unit = Scientist 0028 <gen>
Custom script: set udg_x = GetHandleId(udg_unit)
Unit Group - Add unit to HealthBar_UG
Set Variable Set P = (Position of unit)
Floating Text - Create floating text that reads at P with Z offset 90.00 , using font size 6.00 , color ( 100.00 %, 100.00 %, 100.00 %), and 0 % transparency
Hashtable - Save Handle Of (Last created floating text) as 0 of x in HealthHash .
Trigger - Turn on HealthBar_Loop <gen>
Custom script: call RemoveLocation(udg_P)
Else - Actions
Game - Display to (All players) for 5.00 seconds the text: |cff94D64AScientist:|r What are you waiting for, go get me some of their blood!
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Event_Scientist_Index Equal to 0
Then - Actions
Game - Display to (All players) for 15.00 seconds the text: |cff94D64AScientist:|r Thank god you came! I was hiding here for hours.I think I can find a way to stop the virus, but I need some infected blood.Here, take this syringe, and take as much as you can get!
Set Variable Set Event_Scientist_Index = "1"
Set Variable Set P = (Point(2870.00, -4300.00))
Item - Create |cff94D64ASyringe (Empty) at P
Custom script: call RemoveLocation(udg_P)
Trigger - Turn on E_Scientist_TakeBlood <gen>
Trigger - Turn on E_Scientist_SerumUse <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Event_Scientist_Index Less than 2
Then - Actions
Wait 5.00 seconds
Trigger - Turn on (This trigger)
Else - Actions
E Scientist TakeBlood
Events
Conditions
(Ability being cast) Equal to Take Blood (Syringe)
Actions
Set Variable Set P = (Target point of ability being cast)
Set Variable Set UG = (Units within 100.00 of P matching ((((Matching unit) is alive) Equal to True) and ((Owner of (Matching unit)) Equal to Player_Monsterowner)).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG) Greater than 0
Then - Actions
Hero - Create |cff94D64ASyringe (Filled with blood) and give it to (Triggering unit)
Trigger - Turn off (This trigger)
Else - Actions
Unit - Order (Triggering unit) to Stop .
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
E Scientist SerumUse
Events
Conditions
(Item-type of (Item being manipulated)) Equal to |cff94D64ASerum
Actions
Set Variable Set Marine_Infection_x = (Load 40 of (Key (Triggering unit).) from Marine_Hash.)
Set Variable Set Marine_Infection_x = (Marine_Infection_x + 1)
Hashtable - Save Marine_Infection_x as 40 of (Key (Triggering unit).) in Marine_Hash .
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\NightElf\FaerieDragonInvis\FaerieDragon_Invis.mdl
Special Effect - Destroy (Last created special effect)
E Scientist Follow
Events
Time - Every 2.00 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Scientist 0028 <gen> is alive) Equal to True
Then - Actions
Set Variable Set P = (Position of Scientist 0028 <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Event_Scientist_Index Equal to 2
Then - Actions
Set Variable Set P3 = (Point(780.00, 4450.00))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P3) Greater than 700.00
Then - Actions
Set Variable Set UG = (Units within 800.00 of P matching ((((Matching unit) is alive) Equal to True) and (((Unit-type of (Matching unit)) Equal to Marine) and (((Owner of (Matching unit)) slot status) Equal to Is playing))).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG) Greater than 0
Then - Actions
Set Variable Set P2 = (Position of (Random unit from UG))
Unit - Order Scientist 0028 <gen> to Move To . P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Set Variable Set P = (Point(780.00, 4450.00))
Cinematic - Ping minimap for (All players) at P for 0.50 seconds, using a Simple ping of color ( 50.00 %, 70.00 %, 95.00 %)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Unit - Make Scientist 0028 <gen> Invulnerable
Unit - Turn collision for Scientist 0028 <gen> Off .
Game - Display to (All players) for 10.00 seconds the text: |cff94D64AScientist:|r Thanks for your help. I will tell the world what happened here!
Set Variable Set P2 = (Point(780.00, 5050.00))
Unit - Order Scientist 0028 <gen> to Move To . P2
Custom script: call RemoveLocation(udg_P2)
Set Variable Set Event_Scientist_Index = "3"
-------- Rem health bar --------
Set Variable Set unit = Scientist 0028 <gen>
Custom script: set udg_x = GetHandleId(udg_unit)
Unit Group - Remove unit from HealthBar_UG .
Set Variable Set HealthBar = (Load 0 of x in HealthHash)
Floating Text - Destroy HealthBar
Hashtable - Clear all child hashtables of child x in HealthHash .
Custom script: call RemoveLocation(udg_P3)
Else - Actions
Set Variable Set P3 = (Point(780.00, 5050.00))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P3) Less than 200.00
Then - Actions
Unit - Remove Scientist 0028 <gen> from the game
Trigger - Turn off (This trigger)
Trigger - Turn on E_Scientist_Help_NPCs <gen>
Else - Actions
Custom script: call RemoveLocation(udg_P3)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Trigger - Turn off (This trigger)
-------- Rem health bar --------
Set Variable Set unit = Scientist 0028 <gen>
Custom script: set udg_x = GetHandleId(udg_unit)
Unit Group - Remove unit from HealthBar_UG .
Set Variable Set HealthBar = (Load (Key HealthBar.) of x in HealthHash)
Floating Text - Destroy HealthBar
Hashtable - Clear all child hashtables of child x in HealthHash .
E Scientist Help NPCs
Events
Time - Every 30.00 seconds of game time
Conditions
Actions
Trigger - Turn off (This trigger)
Game - Display to (All players) for 10.00 seconds the text: |cff94D64AArmed Citizens:|r A scientist just told us crazy stories about this place, we're here to help.
Set Variable Set P = (Point(780.00, 5050.00))
Cinematic - Ping minimap for (All players) at P for 3.00 seconds, using a Simple ping of color ( 50.00 %, 70.00 %, 95.00 %)
Custom script: call RemoveLocation(udg_P)
Set Variable Set P2 = (Point(500.00, 0.00))
Set Variable Set x2 = ((2 + Maxplayers) - Game_ActivePlayerCount)
For each (Integer A) from 1 to x2 , do (Actions)
Loop - Actions
Set Variable Set P = (Random point in NorthRoad <gen>)
Unit - Create 1 . Armed Citizen for Player 10 (Light Blue) at P facing 270.00 degrees
Unit - Order (Last created unit) to Attack-Move To . P2
Custom script: call RemoveLocation(udg_P)
Hashtable - Save True as 29 of (Key (Last created unit).) in Hash_Main .
Custom script: call RemoveLocation(udg_P2)
Trigger - Turn on E_Sentry_Bot_AI <gen>
Trigger - Turn on E_Sentry_Bot_Smart_Order <gen>
Trigger - Turn on E_Sentry_Bot_HealDmgTaken <gen>
E ForestRanger Activate
Events
Unit - A unit enters E_ForestRanger_Activate <gen>
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Load 16 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Actions
Custom script: local integer xtemp
Trigger - Turn off (This trigger)
Wait 0.10 seconds
Set Variable Set P = (Center of E_ForestRanger_Spawn <gen>)
Unit - Create 1 . Forest Ranger Janovic for Player 10 (Light Blue) at P facing Default building facing degrees
Unit - Make (Last created unit) Invulnerable
Set Variable Set Event_ForestRanger = (Last created unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Sound - Play over_here_2 <gen> at 100 % volume, located at P with Z offset 0
Custom script: set xtemp = 1
Else - Actions
Sound - Play pssst <gen> at 100 % volume, located at P with Z offset 0
Custom script: set xtemp = 2
Custom script: call RemoveLocation(udg_P)
Wait 2.00 seconds
Game - Display to (All players) for 10.00 seconds the text: |cff94D64AForest Ranger Janovic:|r Hey, you there! I'm a survivor.
Wait 4.00 seconds
Game - Display to (All players) for 15.00 seconds the text: |cff94D64AForest Ranger Janovic:|r Bring me to my forest hut and I can provide you with ammo and dynamite!
Unit - Make Event_ForestRanger Vulnerable
Trigger - Turn on E_ForestRanger_Follow <gen>
-------- HealthBar --------
Set Variable Set unit = Event_ForestRanger
Custom script: set udg_x = GetHandleId(udg_unit)
Unit Group - Add unit to HealthBar_UG
Set Variable Set P = (Position of unit)
Floating Text - Create floating text that reads at P with Z offset 90.00 , using font size 6.00 , color ( 100.00 %, 100.00 %, 100.00 %), and 0 % transparency
Hashtable - Save Handle Of (Last created floating text) as 0 of x in HealthHash .
Trigger - Turn on HealthBar_Loop <gen>
Custom script: call RemoveLocation(udg_P)
E ForestRanger Follow
Events
Time - Every 2.00 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Event_ForestRanger is alive) Equal to True
Then - Actions
Set Variable Set P = (Position of Event_ForestRanger)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Event_ForestRanger_Index Equal to 0
Then - Actions
Set Variable Set P3 = (Center of E_ForestRanger_Target <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P3) Greater than 700.00
Then - Actions
Set Variable Set UG = (Units within 800.00 of P matching ((((Matching unit) is alive) Equal to True) and (((Unit-type of (Matching unit)) Equal to Marine) and (((Owner of (Matching unit)) slot status) Equal to Is playing))).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG) Greater than 0
Then - Actions
Set Variable Set P2 = (Position of (Random unit from UG))
Unit - Order Event_ForestRanger to Move To . P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Cinematic - Ping minimap for (All players) at P3 for 0.50 seconds, using a Simple ping of color ( 50.00 %, 70.00 %, 95.00 %)
Else - Actions
Game - Display to (All players) for 10.00 seconds the text: |cff94D64AForest Ranger Janovic:|r Here we are, cover me.
Unit - Order Event_ForestRanger to Move To . P3
Set Variable Set Event_ForestRanger_Index = "1"
Custom script: call RemoveLocation(udg_P3)
Else - Actions
Set Variable Set Event_ForestRanger_Index = (Event_ForestRanger_Index + 1)
Set Variable Set P3 = (Center of E_ForestRanger_Target <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P3) Less than 100.00
Then - Actions
Unit - Pause Event_ForestRanger
Else - Actions
Custom script: call RemoveLocation(udg_P3)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Event_ForestRanger_Index Equal to 6
Then - Actions
Game - Display to (All players) for 10.00 seconds the text: |cff94D64AForest Ranger Janovic:|r Damn where have I put my keys...
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Event_ForestRanger_Index Greater than (Random integer number between 15 and 20)
Event_ForestRanger_Index Less than 50
Then - Actions
Game - Display to (All players) for 5.00 seconds the text: |cff94D64AForest Ranger Janovic:|r It's open, wait a second.
Set Variable Set Event_ForestRanger_Index = "50"
Unit - Remove Event_ForestRanger from the game
-------- Rem health bar --------
Set Variable Set unit = Event_ForestRanger
Custom script: set udg_x = GetHandleId(udg_unit)
Unit Group - Remove unit from HealthBar_UG .
Set Variable Set HealthBar = (Load 0 of x in HealthHash)
Floating Text - Destroy HealthBar
Hashtable - Clear all child hashtables of child x in HealthHash .
Else - Actions
Custom script: call RemoveLocation(udg_P)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Event_ForestRanger_Index Less than 50
Then - Actions
Trigger - Turn off (This trigger)
-------- Rem health bar --------
Set Variable Set unit = Scientist 0028 <gen>
Custom script: set udg_x = GetHandleId(udg_unit)
Unit Group - Remove unit from HealthBar_UG .
Set Variable Set HealthBar = (Load 0 of x in HealthHash)
Floating Text - Destroy HealthBar
Hashtable - Clear all child hashtables of child x in HealthHash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Event_ForestRanger_Index Greater than or equal to 50
Then - Actions
Set Variable Set Event_ForestRanger_Index = (Event_ForestRanger_Index + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Event_ForestRanger_Index Greater than (Random integer number between 55 and 60)
Then - Actions
Trigger - Turn off (This trigger)
Game - Display to (All players) for 5.00 seconds the text: |cff94D64AForest Ranger Janovic:|r There you go, I'll hide in here.
Set Variable Set Event_ForestRanger_Index = "0"
-------- Reward --------
-------- Ammo --------
Set Variable Set P3 = (Random point in E_ForestRanger_Reward <gen>)
For each (Integer A) from 1 to 3 , do (Actions)
Loop - Actions
Set Variable Set x2 = (Integer A)
Item - Create WeaponData_ItemTypeAmmoStck[x2] at P3
Item - Set the custom value of (Last created item) to x2
Item - Set charges remaining in (Last created item) to (Load 19 of x2 from WeaponData_Hash.)
Set Variable Set x2 = "3"
Item - Create WeaponData_ItemTypeAmmoAltStck[x2] at P3
Item - Set the custom value of (Last created item) to x2
Item - Set charges remaining in (Last created item) to (Load 19 of x2 from WeaponData_Hash.)
Set Variable Set x2 = "8"
Item - Create WeaponData_ItemTypeAmmoAltStck[x2] at P3
Item - Set the custom value of (Last created item) to x2
Item - Set charges remaining in (Last created item) to (Load 19 of x2 from WeaponData_Hash.)
Custom script: call RemoveLocation(udg_P3)
Set Variable Set P3 = (Random point in E_ForestRanger_Reward <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Item - Create |cff7DBEF1Medkit at P3
Else - Actions
Custom script: call RemoveLocation(udg_P3)
Set Variable Set P3 = (Random point in E_ForestRanger_Reward <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Item - Create |cff7DBEF1Barricades at P3
Else - Actions
Custom script: call RemoveLocation(udg_P3)
Set Variable Set P3 = (Random point in E_ForestRanger_Reward <gen>)
For each (Integer A) from 1 to (Random integer number between 1 and 3) , do (Actions)
Loop - Actions
Item - Create |cff7DBEF1Explosives at P3
Custom script: call RemoveLocation(udg_P3)
Else - Actions
Else - Actions
E Rejected Death
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to The Rejected
Actions
Trigger - Turn off (This trigger)
Wait 0.10 seconds
Set Variable Set P = (Position of (Triggering unit))
Item - Create |cff94D64ANetbook at P
Custom script: call RemoveLocation(udg_P)
E Sentry Bot Activate
Events
Unit - A unit enters E_SentryBot_Activate <gen>
Conditions
((Triggering unit) has an item of type |cff94D64ANetbook) Equal to True
Actions
Trigger - Turn off (This trigger)
Item - Remove (Item carried by (Triggering unit) of type |cff94D64ANetbook)
Wait 0.50 seconds
Game - Display to (All players) for 3.00 seconds the text: |cff94D64AComputer Panel:|r -- Security protocol initiated --
Wait 3.00 seconds
Game - Display to (All players) for 3.00 seconds the text: |cff94D64AComputer Panel:|r -- Sentry bots activated --
Set Variable Set UG = (Units of type Sentry Bot)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is alive) Equal to True
Then - Actions
Animation - Change (Picked unit) 's animation speed to 100.00 % of its original speed
Unit - Make (Picked unit) Vulnerable
Unit - Unpause (Picked unit)
Unit Group - Add (Picked unit) to UG_FlashlightUnits
Set Variable Set P = (Position of (Picked unit))
Unit - Create 1 . Flashlight for (Owner of (Picked unit)) at P facing Default building facing degrees
Custom script: call RemoveLocation(udg_P)
Hashtable - Save Handle Of (Last created unit) as 39 of (Key (Picked unit).) in Marine_Hash .
Hashtable - Save True as 29 of (Key (Picked unit).) in Hash_Main .
-------- Health Bars --------
Set Variable Set unit = (Picked unit)
Unit Group - Add unit to HealthBar_UG
Trigger - Add to HealthBar_RemoveUnit <gen> the event (unit Dies)
Set Variable Set P = (Position of unit)
Floating Text - Create floating text that reads at P with Z offset 90.00 , using font size 6.00 , color ( 100.00 %, 100.00 %, 100.00 %), and 0 % transparency
Hashtable - Save Handle Of (Last created floating text) as 0 of x in HealthHash .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Max mana of unit) Greater than 0.00
Then - Actions
Floating Text - Create floating text that reads at P with Z offset 90.00 , using font size 6.00 , color ( 100.00 %, 100.00 %, 100.00 %), and 0 % transparency
Hashtable - Save Handle Of (Last created floating text) as 1 of x in HealthHash .
Else - Actions
Custom script: call RemoveLocation(udg_P)
Trigger - Turn on HealthBar_Loop <gen>
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Trigger - Turn on E_Sentry_Bot_Smart_Order <gen>
Trigger - Turn on E_Sentry_Bot_AI <gen>
Trigger - Turn on E_Sentry_Bot_HealDmgTaken <gen>
E Sentry Bot AI
Events
Time - Every 1.50 seconds of game time
Conditions
Actions
Set Variable Set UG = (Units owned by Player_NPCAllies matching (((Unit-type of (Matching unit)) Equal to Armed Citizen) or ((Unit-type of (Matching unit)) Equal to Sentry Bot)).)
Set Variable Set x2 = "0"
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Set Variable Set x = (Custom value of (Picked unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
x Greater than 0
(Unit-type of (Picked unit)) Equal to Armed Citizen
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Mana of (Picked unit)) Greater than 0.00
((Picked unit) is alive) Equal to True
Then - Actions
Set Variable Set x2 = "1"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_AliveZombies) Greater than 0
Then - Actions
Set Variable Set P2 = (Position of (Random unit from UG_AliveZombies))
Unit - Order (Picked unit) to Attack-Move To . P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Current order of (Picked unit)) Not equal to (Order(move))
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Sentry Bot
Then - Actions
Unit - Change ownership of (Picked unit) to Neutral Passive and Retain color
Unit - Order (Picked unit) to Move To . SentryBotOrigin[x]
Custom script: call RemoveLocation(udg_SentryBotOrigin[udg_x])
Unit - Set the custom value of (Picked unit) to 0
Unit - Make (Picked unit) Invulnerable
Unit - Remove (Load 39 of (Key (Picked unit).) in Marine_Hash.) from the game
Unit Group - Remove (Picked unit) from UG_FlashlightUnits .
Trigger - Turn on E_Sentry_Bot_Pause <gen>
Else - Actions
Unit - Pause (Picked unit)
Hashtable - Clear all child hashtables of child (Key (Picked unit).) in Marine_Hash .
-------- Lebensanzeige weg --------
Set Variable Set unit = (Picked unit)
Custom script: set udg_x = GetHandleId(udg_unit)
Unit Group - Remove unit from HealthBar_UG .
Set Variable Set HealthBar = (Load 0 of x in HealthHash)
Floating Text - Destroy HealthBar
Set Variable Set HealthBar = (Load 1 of x in HealthHash)
Floating Text - Destroy HealthBar
Hashtable - Clear all child hashtables of child x in HealthHash .
Else - Actions
Else - Actions
Custom script: call DestroyGroup(udg_UG)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Equal to 0
Then - Actions
Trigger - Turn off E_Sentry_Bot_Smart_Order <gen>
Trigger - Turn off E_Sentry_Bot_AI <gen>
Trigger - Turn off E_Sentry_Bot_HealDmgTaken <gen>
Else - Actions
Hash_Main:
29: SentryBotAI missle has hit unit (bool)
-> wenn false neues target suchen
E Sentry Bot Smart Order
Events
Unit - A unit Is attacked
Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Attacking unit)) Equal to Sentry Bot
(Unit-type of (Attacking unit)) Equal to Armed Citizen
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetAttacker()
Set Variable Set NPCSmartOrder_key = (Key (Attacking unit).)
-------- Prüfen ob unit getroffen werden kann --------
Set Variable Set NPCSmartOrder_AllowFire = "false"
Set Variable Set NPCSmartOrder_P = (Position of (Attacking unit))
Set Variable Set NPCSmartOrder_Target = (Position of (Attacked unit))
Custom script: set udg_NPCSmartOrder_r = GetLocationZ(udg_NPCSmartOrder_P)
Custom script: set udg_NPCSmartOrder_r2 = GetLocationZ(udg_NPCSmartOrder_Target)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((NPCSmartOrder_r - NPCSmartOrder_r2))) Less than 100.00
(Load 29 of NPCSmartOrder_key from Hash_Main.) Equal to True
Then - Actions
Set Variable Set NPCSmartOrder_AllowFire = "true"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
NPCSmartOrder_AllowFire Equal to True
Then - Actions
Hashtable - Save False as 29 of NPCSmartOrder_key in Hash_Main .
Hashtable - Save True as 41 of NPCSmartOrder_key in Marine_Hash .
Hashtable - Save Handle Of (Attacked unit) as 42 of NPCSmartOrder_key in Marine_Hash .
Set Variable Set NPCSmartOrder_r = (Angle from NPCSmartOrder_P to NPCSmartOrder_Target)
Hashtable - Save NPCSmartOrder_r as 37 of NPCSmartOrder_key in Marine_Hash .
Set Variable Set NPCSmartOrder_r = (Distance between NPCSmartOrder_P and NPCSmartOrder_Target)
Hashtable - Save NPCSmartOrder_r as 38 of NPCSmartOrder_key in Marine_Hash .
Unit Group - Add (Attacking unit) to UG_FireWhenAngleOk
Trigger - Turn on Marine_FireWhenAngleOk <gen>
Custom script: call RemoveLocation(udg_NPCSmartOrder_P)
Custom script: call RemoveLocation(udg_NPCSmartOrder_Target)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Attacking unit)) Equal to Sentry Bot
Then - Actions
Unit - Change color of (Attacking unit) to Red
Wait 0.50 seconds
Custom script: set udg_unit = tempunit
Unit - Change color of unit to Light Blue
Else - Actions
Else - Actions
Animation - Play (Attacking unit) 's stand animation
Custom script: call RemoveLocation(udg_NPCSmartOrder_P)
Custom script: call RemoveLocation(udg_NPCSmartOrder_Target)
Wait 0.50 seconds
Custom script: set udg_unit = tempunit
Custom script: set udg_NPCSmartOrder_key = GetHandleId(udg_unit)
Unit - Order unit to Stop .
Hashtable - Save True as 29 of NPCSmartOrder_key in Hash_Main .
E Sentry Bot HealDmgTaken
Events
Conditions
(Damage taken) Less than 2.00
Or - Any (Conditions) are true
Conditions
(Unit-type of (Damage source)) Equal to Sentry Bot
(Unit-type of (Damage source)) Equal to Armed Citizen
Actions
Unit - Set life of (Triggering unit) to ((Life of (Triggering unit)) + (Damage taken))
E Sentry Bot Pause
Events
Unit - A unit enters E_SentryBotsPause <gen>
Conditions
(Unit-type of (Triggering unit)) Equal to Sentry Bot
(Max life of (Triggering unit)) Less than 1.00
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Wait 1.00 seconds
Custom script: set udg_unit = tempunit
Unit - Pause unit
Set Variable Set UG = (Units in (Playable map area) matching (((E_SentryBotsPause <gen> contains (Matching unit)) Equal to False) and ((((Matching unit) is paused) Equal to False) and (((Matching unit) is alive) Equal to True))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
Custom script: call DestroyGroup(udg_UG)
E Tank Item Drop
Events
Unit - A unit Dies
Conditions
(Owner of (Triggering unit)) Equal to Player_Monsterowner
(Race of (Triggering unit)) Not equal to Orc
(Unit-type of (Triggering unit)) Not equal to Souldrainer
(Unit-type of (Triggering unit)) Not equal to Living Slime
(Unit-type of (Triggering unit)) Not equal to Living Slime +
MonsterType_WaveIndex Greater than 5
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 125) Less than or equal to (1 + ((Supply used by (Triggering unit)) / 5))
Then - Actions
Set Variable Set P_BloodUnitDeath = (Position of (Triggering unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Tank_ItemsDropped Equal to 2
Then - Actions
Item - Create |cff94D64AFuel at P_BloodUnitDeath
Set Variable Set Tank_ItemsDropped = (Tank_ItemsDropped + 1)
Trigger - Turn off (This trigger)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Tank_ItemsDropped Equal to 1
Then - Actions
Item - Create |cff94D64AFuel at P_BloodUnitDeath
Set Variable Set Tank_ItemsDropped = (Tank_ItemsDropped + 1)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Tank_ItemsDropped Equal to 0
Then - Actions
Item - Create |cff94D64AShaft at P_BloodUnitDeath
Set Variable Set Tank_ItemsDropped = (Tank_ItemsDropped + 1)
Else - Actions
Custom script: call RemoveLocation(udg_P_BloodUnitDeath)
Else - Actions
E Tank Fix
Events
Unit - A unit comes within 256 of Tank 0005 <gen>
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
((Triggering unit) has an item of type |cff94D64ABattery) Equal to True
((Triggering unit) has an item of type |cff94D64AFuel) Equal to True
((Triggering unit) has an item of type |cff94D64AShaft) Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) has an item of type |cff94D64ABattery) Equal to True
Then - Actions
Item - Remove (Item carried by (Triggering unit) of type |cff94D64ABattery)
Set Variable Set Tank_ItemsDelivered = (Tank_ItemsDelivered + 1)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) has an item of type |cff94D64AFuel) Equal to True
Then - Actions
Item - Remove (Item carried by (Triggering unit) of type |cff94D64AFuel)
Set Variable Set Tank_ItemsDelivered = (Tank_ItemsDelivered + 1)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) has an item of type |cff94D64AShaft) Equal to True
Then - Actions
Item - Remove (Item carried by (Triggering unit) of type |cff94D64AShaft)
Set Variable Set Tank_ItemsDelivered = (Tank_ItemsDelivered + 1)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Tank_ItemsDelivered Greater than or equal to Game_Difficulty
Then - Actions
Trigger - Turn off (This trigger)
Trigger - Turn off E_Tank_Item_Drop <gen>
Trigger - Turn on E_Tank_Load <gen>
Game - Display to (All players) for 5.00 seconds the text: The tank is fixed!
Unit - Change ownership of Tank 0005 <gen> to (Owner of (Triggering unit)) and Retain color
Unit - Set Tank 0005 <gen> movement speed to 0.00
Trigger - Add to Marine_Smart_Order <gen> the event (Tank 0005 <gen> Is issued an order targeting an object)
Trigger - Add to Marine_Smart_Order <gen> the event (Tank 0005 <gen> Is issued an order targeting a point)
Trigger - Add to Marine_ToggleClickAction <gen> the event (Tank 0005 <gen> Is issued an order with no target)
Wait 0.10 seconds
Set Variable Set P = (Position of Tank 0005 <gen>)
Sound - Play SteamTankWhat2 <gen> at 100 % volume, located at P with Z offset 0
-------- Flashlight --------
Set Variable Set unit = Tank 0005 <gen>
Custom script: set udg_x = GetHandleId(udg_unit)
Unit Group - Add Tank 0005 <gen> to UG_FlashlightUnits
Unit - Create 1 . Flashlight for (Owner of Tank 0005 <gen>) at P facing Default building facing degrees
Hashtable - Save Handle Of (Last created unit) as 39 of x in Marine_Hash .
Custom script: call RemoveLocation(udg_P)
Trigger - Turn on E_Tank_Death <gen>
Else - Actions
Game - Display to (All players) for 5.00 seconds the text: This didn't help fix the tank...
Else - Actions
E Tank Load
Events
Conditions
Actions
Unit - Set Tank 0005 <gen> movement speed to (Default movement speed of Tank 0005 <gen>)
Unit - Make Tank 0005 <gen> Vulnerable
Floating Text - Hide (Load 0 of (Key (Triggering unit).) in HealthHash) for (All players)
Floating Text - Hide (Load 1 of (Key (Triggering unit).) in HealthHash) for (All players)
Game - Display to (All players) the text: Be careful not to get overrun by the tank!
Trigger - Turn on E_Tank_Unload_and_Damage <gen>
E Tank Unload and Damage
Events
Time - Every 1.00 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[(Player number of (Owner of Tank 0005 <gen>))] is loaded into Tank 0005 <gen>.) Equal to False
Then - Actions
Trigger - Turn off (This trigger)
Unit - Set Tank 0005 <gen> movement speed to 0.00
Unit - Make Tank 0005 <gen> Invulnerable
Set Variable Set unit = Player_Marine[(Player number of (Owner of Tank 0005 <gen>))]
Custom script: set udg_x = GetHandleId(udg_unit)
Floating Text - Show (Load 0 of x in HealthHash) for (All players)
Floating Text - Show (Load 1 of x in HealthHash) for (All players)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Current order of Tank 0005 <gen>) Not equal to (Order())
(Current order of Tank 0005 <gen>) Not equal to (Order(stop))
(Current order of Tank 0005 <gen>) Not equal to (Order(holdposition))
Then - Actions
Set Variable Set P = (Position of Tank 0005 <gen>)
Set Variable Set UG = (Units within 256.00 of P matching ((((Matching unit) is alive) Equal to True) and (((Matching unit) is A flying unit) Equal to False)).)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Picked unit) Not equal to Tank 0005 <gen>
(Picked unit) Not equal to Player_Marine[(Player number of (Owner of Tank 0005 <gen>))]
Or - Any (Conditions) are true
Conditions
(Point-value of (Picked unit)) Less than 64
(Unit-type of (Picked unit)) Equal to Heretic
(Unit-type of (Picked unit)) Not equal to Souldrainer
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Picked unit)) Not equal to Orc
Then - Actions
Unit - Cause Tank 0005 <gen> to damage (Picked unit) , dealing 300.00 damage of attack type Siege and damage type Normal
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Picked unit)) Equal to Barricade
(Unit-type of (Picked unit)) Equal to Anti-Person Mine
(Unit-type of (Picked unit)) Equal to Anti-Tank Mine
(Unit-type of (Picked unit)) Equal to Explosives
(Unit-type of (Picked unit)) Equal to Remote-Controlled Mine
Then - Actions
Unit - Kill (Picked unit)
Else - Actions
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Else - Actions
E Tank Death
Events
Unit - Tank 0005 <gen> Dies
Conditions
Actions
Unit - Remove (Load 39 of (Key (Triggering unit).) in Marine_Hash.) from the game
Unit Group - Remove (Triggering unit) from UG_FlashlightUnits .
Trigger - Turn off (This trigger)
E GameEnd
Events
Conditions
Game_Over Equal to False
Actions
Set Variable Set Game_Over = "true"
Game - Display to (All players) for 10.00 seconds the text: A new day breaks...
Wait 0.10 seconds
Unit Group - Pick every unit in UG_AliveZombies and do (Actions)
Loop - Actions
Unit - Explode (Picked unit) .
Unit Group - Pick every unit in UG_AliveMarines and do (Actions)
Loop - Actions
Unit - Order (Picked unit) to Night Elf Demon Hunter - Deactivate Immolation .
Wait 0.10 seconds
Unit Group - Pick every unit in UG_AliveMarines and do (Actions)
Loop - Actions
Unit - Pause (Picked unit)
Player Group - Pick every player in (All players) and do (Actions)
Loop - Actions
Visibility - Create an initially Enabled visibility modifier for (Picked player) emitting Visibility across (Playable map area)
Environment - Set fog to style Linear , z-start 50000.00 , z-end 51000.00 , density 0.50 and color ( 8.00 %, 5.00 %, 10.00 %)
Trigger - Turn off MS_NightvisionToggle <gen>
Trigger - Turn off MS_Nightvision_NoMana <gen>
Trigger - Turn off Velocity <gen>
Trigger - Turn off Jet_Pack_Main <gen>
Trigger - Turn off Marine_Infection_Main <gen>
Trigger - Turn off Music_Play <gen>
Trigger - Turn off Command_Input <gen>
Trigger - Turn off AM_Monster_Spawn <gen>
Trigger - Turn off AM_RecreateWeapons <gen>
Trigger - Turn off AM_OrderZombie <gen>
Sound - Play HeroicVictory <gen>
Set Variable Set Weather_FilterIndex = "100.00"
Trigger - Turn on E_GameEnd_LightFlash <gen>
Game - Set the time of day to 6.01
Game - Set time of day speed to 10.00 % of the default speed
Custom script: call SetDayNightModels("Environment\\DNC\\DNCLordaeron\\DNCLordaeronTerrain\\DNCLordaeronTerrain.mdl","Environment\\DNC\\DNCLordaeron\\DNCLordaeronUnit\\DNCLordaeronUnit.mdl")
Cinematic - Apply a filter over 30.00 seconds using Key alpha 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
Environment - Remove (Last created weather effect)
Environment - Create at EntireMap <gen> the weather effect Rays Of Light
Wait 10.00 seconds
Game - Display to (All players) for 999.00 seconds the text: Thanks for playing City of Terror II.Visit www.christopherhauck.de to get the latest version, or to report bugs & suggestions.
Wait 20.00 seconds
Player Group - Pick every player in (All players) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
AM_GameWinner Equal to Neutral Passive
AM_GameWinner Equal to (Picked player)
Then - Actions
Game - Victory (Picked player) ( Skip dialogs, Show scores)
Else - Actions
Game - Defeat (Picked player) with the message: (Player_ColorCode[(Player number of AM_GameWinner)] + ((Name of AM_GameWinner) + |r beat you!))
E GameEnd LightFlash
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Weather_FilterIndex Greater than 0.00
Then - Actions
Set Variable Set Weather_FilterIndex = (Weather_FilterIndex - 0.10)
Set Variable Set r = Weather_FilterIndex
Set Variable Set r2 = (100.00 - r)
Set Variable Set r2 = (r2 x 2.00)
Cinematic - Apply a filter over 9999.00 seconds using Additive blending on texture White Mask , starting with color ( r %, (0.80 x r) %, (0.50 x r) %) and r2 % transparency and ending with color ( r %, (0.80 x r) %, (0.50 x r) %) and r2 % transparency
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Weather_FilterIndex Less than or equal to 70.00
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
Else - Actions
Mod Init
Events
Time - Elapsed game time is 0.00 seconds
Conditions
Actions
Cinematic - Fade out over 0.00 seconds using texture Black Mask and color ( 0 %, 0 %, 0 %) with 0 % transparency
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
Camera - Pan camera for (Player((Integer A))) to (Position of Pathing Blocker (Ground) (Large) 0048 <gen>) over 0 seconds
Trigger - Add to Mod_Select <gen> the event ((Player((Integer A))) types a chat message containing - (Unexpected type: 'stringnoformat') as A substring)
Sound - Play walkie_talkie <gen>
Game - Display to (All players) for 15.00 seconds the text: Welcome to |cffff0000City of Terror II|r by kleinerhauck!
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set Game_AdminPlayer = (Player((Integer A)))
Custom script: exitwhen true
Else - Actions
Set Variable Set x = (Player number of Game_AdminPlayer)
Game - Display to (All players) for 15.00 seconds the text: (Player_ColorCode[x] + ((Name of Game_AdminPlayer) + |r has 15 seconds to choose the game mode.))
Set Variable Set PG = (Player group(Game_AdminPlayer))
Game - Display to PG for 15.00 seconds the text: Type|cffff0000-s|r for survival mode (standard, fast-paced)|cffff0000-r|r for survival mode (relaxed)|cffff0000-a|r for arena mode (free for all deathmatch)|cffff0000-t|r for training mode (mass guns&zombies, auto-revive)
Custom script: call DestroyForce(udg_PG)
Set Variable Set Game_Mod = "-1"
Wait 15.00 seconds
Trigger - Turn off Mod_Select <gen>
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to -1
Then - Actions
Set Variable Set Game_Mod = "0"
Cinematic - Clear the screen of text messages for (All players) .
Game - Display to (All players) for 15.00 seconds the text: |cffff0000Survival Mode|r selected (co-op).>> Survive 12 waves in the City of Terror!
Trigger - Run E_Tutorial_Start <gen> (checking conditions)
Trigger - Run Mod_Select_Guns <gen> (checking conditions)
Trigger - Run GetPlayerCount_RecreateMB <gen> (checking conditions)
Else - Actions
Mod Select
Events
Conditions
(Triggering player) Equal to Game_AdminPlayer
Actions
Set Variable Set s = (Substring((Entered chat string), 1, 2))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
s Equal to -s
s Equal to -r
Then - Actions
Set Variable Set Game_Mod = "0"
Trigger - Turn off (This trigger)
Cinematic - Clear the screen of text messages for (All players) .
Game - Display to (All players) for 15.00 seconds the text: |cffff0000Survival Mode|r selected (co-op).>> Survive 12 waves in the City of Terror!
Trigger - Run E_Tutorial_Start <gen> (checking conditions)
Trigger - Run Mod_Select_Guns <gen> (checking conditions)
Trigger - Run GetPlayerCount_RecreateMB <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
s Equal to -r
Then - Actions
Trigger - Run MonsterType_Init_Relaxed <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
s Equal to -t
Then - Actions
Set Variable Set Game_Mod = "2"
Set Variable Set Game_Difficulty = "3"
Trigger - Turn off (This trigger)
Cinematic - Clear the screen of text messages for (All players) .
Game - Display to (All players) for 15.00 seconds the text: |cffff0000Training Mode|r selected (co-op).>> No victory & defeat conditions!
Trigger - Run Mod_Select_Guns <gen> (checking conditions)
Trigger - Run GetPlayerCount_RecreateMB <gen> (checking conditions)
Trigger - Run MonsterType_Init_Training <gen> (checking conditions)
Trigger - Turn on Monster_Spawn <gen>
Trigger - Turn on AM_DroppedWeaponRemove <gen>
-------- No tasks --------
Trigger - Turn off E_Tutorial_Start <gen>
Trigger - Turn off E_Tutorial_VillagerDeath <gen>
Trigger - Turn off E_Tutorial_Over <gen>
Trigger - Turn off E_Scientist_Psst <gen>
Trigger - Turn off E_Scientist_Message <gen>
Trigger - Turn off E_ForestRanger_Activate <gen>
Trigger - Turn off E_Sentry_Bot_Activate <gen>
Trigger - Turn off E_Tank_Fix <gen>
Trigger - Turn off E_Tank_Item_Drop <gen>
Trigger - Turn off E_GameEnd <gen>
Trigger - Turn off E_Rejected_Death <gen>
Trigger - Turn off StackingItem_Drop <gen>
-------- No Arena Mode Stuff --------
Set Variable Set UG = (Units of type Medic (Shop))
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Unit - Remove (Picked unit) from the game
Custom script: call DestroyGroup(udg_UG)
Set Variable Set UG = (Units of type Zombie Master (Shop))
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Unit - Remove (Picked unit) from the game
Custom script: call DestroyGroup(udg_UG)
-------- Player Spawn --------
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Unit - Unpause Player_Marine[(Integer A)]
Selection - Select Player_Marine[(Integer A)] for (Player((Integer A)))
Set Variable Set P = (Random point in Training_Player_Spawn <gen>)
Unit - Move Player_Marine[(Integer A)] instantly to P
Camera - Pan camera for (Player((Integer A))) to P over 0 seconds
Set Variable Set unit = Player_Marine[(Integer A)]
Unit - Add Sprint to unit
Unit - Add Nightvision to unit
Unit - Add Reload to unit
Unit - Add Select Class to unit
Item - Create |cff7DBEF1Weapon [|rChainsaw|cff7DBEF1] at P
Item - Set the custom value of (Last created item) to -2
Hero - Give (Last created item) to unit
Unit - Create 1 . Toggle Flashlight for (Player((Integer A))) at P3 facing Default building facing degrees
Custom script: call RemoveLocation(udg_P)
Else - Actions
Cinematic - Fade in over 2.00 seconds using texture Black Mask and color ( 0 %, 0 %, 0 %) with 0 % transparency
-------- Mehr MG Ammo --------
For each (Integer A) from 1 to SMG_Count , do (Actions)
Loop - Actions
Set Variable Set SMG_Ammo[(Integer A)] = (Random integer number between 750 and 999)
Trigger - Run SMG_Ammo_Float <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
s Equal to -a
Then - Actions
Set Variable Set Game_Mod = "1"
Trigger - Turn off (This trigger)
Cinematic - Clear the screen of text messages for (All players) .
Set Variable Set AM_CreditLimitVictory = "15000"
Game - Display to (All players) for 30.00 seconds the text: |cffff0000Arena Mode|r selected (ffa).
Game - Display to (All players) for 30.00 seconds the text: (>> Reach + ((String(AM_CreditLimitVictory)) + credits to win!))
Game - Display to (All players) for 30.00 seconds the text: |cff949596(Kill other players to get credits.)|r
Cinematic - Fade in over 1.00 seconds using texture Black Mask and color ( 0 %, 0 %, 0 %) with 0 % transparency
Trigger - Run Mod_Select_Guns <gen> (checking conditions)
-------- No tasks --------
Trigger - Turn off E_Tutorial_Start <gen>
Trigger - Turn off E_Tutorial_VillagerDeath <gen>
Trigger - Turn off E_Tutorial_Over <gen>
Trigger - Turn off E_Scientist_Psst <gen>
Trigger - Turn off E_Scientist_Message <gen>
Trigger - Turn off E_ForestRanger_Activate <gen>
Trigger - Turn off E_Sentry_Bot_Activate <gen>
Trigger - Turn off E_Tank_Fix <gen>
Trigger - Turn off E_Tank_Item_Drop <gen>
Trigger - Turn off E_GameEnd <gen>
Trigger - Turn off E_Rejected_Death <gen>
Trigger - Turn off StackingItem_Drop <gen>
-------- Remove tutorial section --------
Destructible - Kill Wide Natural Bridge 3551 <gen>
Unit Group - Pick every unit in UG_TutorialVillagers and do (Actions)
Loop - Actions
Unit - Remove (Picked unit) from the game
Set Variable Set P = (Position of Blocker 900 2876 <gen>)
For each (Integer A) from 1 to 8 , do (Actions)
Loop - Actions
Set Variable Set P2 = (P offset by ((128.00 x (Real((Integer A)))), 0))
Destructible - Create a B00E (Unexpected type: 'destructablecode') at P2 facing (Random angle) with scale 1 and variation 0
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
-------- Random Spawn Point --------
Game - Display to (All players) for 30.00 seconds the text: |cffff0000Right-Click|r or |cffff0000Q+Click|r to shoot enemies.(Or press |cffff0000W|r to shoot with right clicks anywhere.)
Set Variable Set P3 = (Center of Tutorial_Spawn <gen>)
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
-------- Hostility --------
For each (Integer B) from 1 to Maxplayers , do (Actions)
Loop - Actions
Player - Make (Player((Integer A))) treat (Player((Integer B))) as an Enemy
Player - Make (Player((Integer B))) treat (Player((Integer A))) as an Enemy
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set AM_Player_VictoryWarningShow[(Integer A)] = "true"
Set Variable Set Player_Bounty[(Integer A)] = "500"
Set Variable Set Player_AllowSelectClass[(Integer A)] = "true"
Set Variable Set x = "0"
Set Variable Set P = (Random point in (Playable map area))
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Unit - Move Player_Marine[(Integer A)] instantly to P
Camera - Pan camera for (Player((Integer A))) to P over 0 seconds
Unit - Unpause Player_Marine[(Integer A)]
Selection - Select Player_Marine[(Integer A)] for (Player((Integer A)))
Set Variable Set unit = Player_Marine[(Integer A)]
Unit - Add Sprint to unit
Unit - Add Nightvision to unit
Unit - Add Reload to unit
Unit - Add Select Class to unit
Item - Create |cff7DBEF1Weapon [|rGauntlet|cff7DBEF1] at P
Item - Set the custom value of (Last created item) to -2
Hero - Give (Last created item) to unit
Unit - Create 1 . Toggle Flashlight for (Player((Integer A))) at P3 facing Default building facing degrees
Custom script: call RemoveLocation(udg_P)
Else - Actions
Set Variable Set AM_Player_VictoryWarningShow[(Integer A)] = "false"
Custom script: call RemoveLocation(udg_P3)
Trigger - Run AM_Init <gen> (checking conditions)
Else - Actions
uses A, x
called by Mod Select/Init
Mod Select Guns
Events
Conditions
Actions
-------- Survival --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 0
Then - Actions
Set Variable Set WeaponData_GunSpawnCount = (WeaponData_Count - 2)
For each (Integer A) from 1 to WeaponData_Count , do (Actions)
Loop - Actions
-------- 1/3 Chance für BFG/Railgun/CoilGun --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
WeaponData_ItemType[(Integer A)] Equal to |cff7DBEF1Weapon [|rRailgun|cff7DBEF1]
WeaponData_ItemType[(Integer A)] Equal to |cff7DBEF1Weapon [|rCoil Gun C43|cff7DBEF1]
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponData_ItemType[(Integer A)] Equal to |cff7DBEF1Weapon [|rRailgun|cff7DBEF1]
(Random integer number between 1 and 3) Less than or equal to 2
Then - Actions
Set Variable Set WeaponData_GunSpawnList[7] = (Integer A)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponData_ItemType[(Integer A)] Equal to |cff7DBEF1Weapon [|rCoil Gun C43|cff7DBEF1]
(Random integer number between 1 and 3) Less than or equal to 1
Then - Actions
Set Variable Set WeaponData_GunSpawnList[7] = (Integer A)
Else - Actions
Else - Actions
Set Variable Set WeaponData_GunSpawnList[(Integer A)] = (Integer A)
Else - Actions
-------- Training --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 2
Then - Actions
Set Variable Set WeaponData_GunSpawnCount = WeaponData_Count
Set Variable Set x = "0"
For each (Integer A) from 1 to WeaponData_Count , do (Actions)
Loop - Actions
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_GunSpawnList[x] = (Integer A)
-------- Create weapon spawns --------
Set Variable Set AM_WeaponSpawn_Count = "12"
Set Variable Set AM_WeaponSpawn_Origin[1] = (Center of WeaponSpawn01 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[2] = (Center of WeaponSpawn02 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[3] = (Center of WeaponSpawn03 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[4] = (Center of WeaponSpawn04 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[5] = (Center of WeaponSpawn05 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[6] = (Center of WeaponSpawn06 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[7] = (Center of WeaponSpawn07 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[8] = (Center of WeaponSpawn08 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[9] = (Center of WeaponSpawn09 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[10] = (Center of WeaponSpawn10 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[11] = (Center of WeaponSpawn11 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[12] = (Center of WeaponSpawn12 <gen>)
For each (Integer A) from 1 to AM_WeaponSpawn_Count , do (Actions)
Loop - Actions
Destructible - Create a B00G (Unexpected type: 'destructablecode') at AM_WeaponSpawn_Origin[(Integer A)] facing 0.00 with scale 1 and variation 0
Custom script: set udg_dest = CreateDestructableZ('B00J', GetLocationX(udg_AM_WeaponSpawn_Origin[GetForLoopIndexA()]), GetLocationY(udg_AM_WeaponSpawn_Origin[GetForLoopIndexA()]), 700, 90, 2, 1)
Set Variable Set x = (Random integer number between 1 and WeaponData_GunSpawnCount)
Set Variable Set x = WeaponData_GunSpawnList[x]
Item - Create WeaponData_ItemType[x] at AM_WeaponSpawn_Origin[(Integer A)]
Set Variable Set AM_WeaponSpawn_SpawnedGun[(Integer A)] = (Last created item)
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 6 of x from WeaponData_Hash.)
Set Variable Set P = (AM_WeaponSpawn_Origin[(Integer A)] offset by 128.00 towards (Random angle) degrees.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Less than or equal to 2
Then - Actions
Item - Create WeaponData_ItemTypeAmmoStck[x] at P
Else - Actions
Item - Create WeaponData_ItemTypeAmmoAltStck[x] at P
Custom script: call RemoveLocation(udg_P)
Set Variable Set AM_WeaponSpawn_SpawnedAmmo[(Integer A)] = (Last created item)
Item - Set the custom value of (Last created item) to x
Set Variable Set x2 = (Load 19 of x from WeaponData_Hash.)
Set Variable Set x2 = (x2 x 3)
Item - Set charges remaining in (Last created item) to x2
Trigger - Turn on AM_RecreateWeapons <gen>
Else - Actions
-------- Arena --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
Set Variable Set WeaponData_GunSpawnCount = (WeaponData_Count - 1)
Set Variable Set x = "0"
For each (Integer A) from 1 to WeaponData_Count , do (Actions)
Loop - Actions
-------- Keine Railgun --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponData_ItemType[(Integer A)] Not equal to |cff7DBEF1Weapon [|rRailgun|cff7DBEF1]
Then - Actions
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_GunSpawnList[x] = (Integer A)
Else - Actions
Else - Actions
AM Init
Events
Conditions
Actions
Trigger - Turn on AM_Victory_and_Warning <gen>
Trigger - Turn on AM_DroppedWeaponRemove <gen>
Trigger - Turn on AM_OrderZombie <gen>
Trigger - Turn on HeatlhBar_LoopVisibility <gen>
-------- Mehr MG Ammo --------
For each (Integer A) from 1 to SMG_Count , do (Actions)
Loop - Actions
Set Variable Set SMG_Ammo[(Integer A)] = (Random integer number between 750 and 999)
Trigger - Run SMG_Ammo_Float <gen> (checking conditions)
-------- Create weapon spawns --------
Set Variable Set AM_WeaponSpawn_Count = "12"
Set Variable Set AM_WeaponSpawn_Origin[1] = (Center of WeaponSpawn01 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[2] = (Center of WeaponSpawn02 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[3] = (Center of WeaponSpawn03 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[4] = (Center of WeaponSpawn04 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[5] = (Center of WeaponSpawn05 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[6] = (Center of WeaponSpawn06 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[7] = (Center of WeaponSpawn07 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[8] = (Center of WeaponSpawn08 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[9] = (Center of WeaponSpawn09 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[10] = (Center of WeaponSpawn10 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[11] = (Center of WeaponSpawn11 <gen>)
Set Variable Set AM_WeaponSpawn_Origin[12] = (Center of WeaponSpawn12 <gen>)
For each (Integer A) from 1 to AM_WeaponSpawn_Count , do (Actions)
Loop - Actions
Destructible - Create a B00G (Unexpected type: 'destructablecode') at AM_WeaponSpawn_Origin[(Integer A)] facing 0.00 with scale 1 and variation 0
Custom script: set udg_dest = CreateDestructableZ('B00J', GetLocationX(udg_AM_WeaponSpawn_Origin[GetForLoopIndexA()]), GetLocationY(udg_AM_WeaponSpawn_Origin[GetForLoopIndexA()]), 700, 90, 2, 1)
Set Variable Set x = (Random integer number between 0 and WeaponData_GunSpawnCount)
Set Variable Set x = WeaponData_GunSpawnList[x]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 0
Then - Actions
Item - Create |cff7DBEF1Weapon [|rGhoul-Cannon|cff7DBEF1] at AM_WeaponSpawn_Origin[(Integer A)]
Set Variable Set AM_WeaponSpawn_SpawnedGun[(Integer A)] = (Last created item)
Item - Set charges remaining in (Last created item) to 15
Set Variable Set AM_WeaponSpawn_SpawnedAmmo[(Integer A)] = No item
Else - Actions
Item - Create WeaponData_ItemType[x] at AM_WeaponSpawn_Origin[(Integer A)]
Set Variable Set AM_WeaponSpawn_SpawnedGun[(Integer A)] = (Last created item)
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 6 of x from WeaponData_Hash.)
Set Variable Set P = (AM_WeaponSpawn_Origin[(Integer A)] offset by 128.00 towards (Random angle) degrees.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Less than or equal to 2
Then - Actions
Item - Create WeaponData_ItemTypeAmmoStck[x] at P
Else - Actions
Item - Create WeaponData_ItemTypeAmmoAltStck[x] at P
Custom script: call RemoveLocation(udg_P)
Set Variable Set AM_WeaponSpawn_SpawnedAmmo[(Integer A)] = (Last created item)
Item - Set the custom value of (Last created item) to x
Set Variable Set x2 = (Load 19 of x from WeaponData_Hash.)
Set Variable Set x2 = (x2 x 3)
Item - Set charges remaining in (Last created item) to x2
Trigger - Turn on AM_RecreateWeapons <gen>
-------- Definer monster spawn items --------
Set Variable Set AM_MonsterSpawn_TypeCount = "11"
Set Variable Set AM_MonsterSpawn_Itemtypes[1] = "I021"
Set Variable Set AM_MonsterSpawn_Itemtypes[2] = "I01Y"
Set Variable Set AM_MonsterSpawn_Itemtypes[3] = "I020"
Set Variable Set AM_MonsterSpawn_Itemtypes[4] = "I022"
Set Variable Set AM_MonsterSpawn_Itemtypes[5] = "I025"
Set Variable Set AM_MonsterSpawn_Itemtypes[6] = "I024"
Set Variable Set AM_MonsterSpawn_Itemtypes[7] = "I023"
Set Variable Set AM_MonsterSpawn_Itemtypes[8] = "I01Z"
Set Variable Set AM_MonsterSpawn_Itemtypes[9] = "I026"
Set Variable Set AM_MonsterSpawn_Itemtypes[10] = "I027"
Set Variable Set AM_MonsterSpawn_Itemtypes[11] = "I028"
Set Variable Set AM_MonsterSpawn_Unittypes[1] = "u00E"
Set Variable Set AM_MonsterSpawn_Unittypes[2] = "n002"
Set Variable Set AM_MonsterSpawn_Unittypes[3] = "n009"
Set Variable Set AM_MonsterSpawn_Unittypes[4] = "n00E"
Set Variable Set AM_MonsterSpawn_Unittypes[5] = "u004"
Set Variable Set AM_MonsterSpawn_Unittypes[6] = "n00G"
Set Variable Set AM_MonsterSpawn_Unittypes[7] = "n00I"
Set Variable Set AM_MonsterSpawn_Unittypes[8] = "u00K"
Set Variable Set AM_MonsterSpawn_Unittypes[9] = "n00A"
Set Variable Set AM_MonsterSpawn_Unittypes[10] = "n00H"
Set Variable Set AM_MonsterSpawn_Unittypes[11] = "n00L"
Set Variable Set AM_MonsterSpawn_IconPath[1] = "ReplaceableTextures\CommandButtons\BTNGhoul.blp"
Set Variable Set AM_MonsterSpawn_IconPath[2] = "ReplaceableTextures\CommandButtons\BTNSatyrTrickster.blp"
Set Variable Set AM_MonsterSpawn_IconPath[3] = "ReplaceableTextures\CommandButtons\BTNUnbroken.blp"
Set Variable Set AM_MonsterSpawn_IconPath[4] = "ReplaceableTextures\CommandButtons\BTNFelGuard.blp"
Set Variable Set AM_MonsterSpawn_IconPath[5] = "ReplaceableTextures\CommandButtons\BTNGargoyle.blp"
Set Variable Set AM_MonsterSpawn_IconPath[6] = "ReplaceableTextures\CommandButtons\BTNFurbolg.blp"
Set Variable Set AM_MonsterSpawn_IconPath[7] = "ReplaceableTextures\CommandButtons\BTNVoidWalker.blp"
Set Variable Set AM_MonsterSpawn_IconPath[8] = "ReplaceableTextures\CommandButtons\BTNAcolyte.blp"
Set Variable Set AM_MonsterSpawn_IconPath[9] = "ReplaceableTextures\CommandButtons\BTNFacelessOne.blp"
Set Variable Set AM_MonsterSpawn_IconPath[10] = "ReplaceableTextures\CommandButtons\BTNFelGuardBlue.blp"
Set Variable Set AM_MonsterSpawn_IconPath[11] = "ReplaceableTextures\CommandButtons\BTNForgottenOne.blp"
Hashtable - Create a hashtable
Set Variable Set AM_MonsterSpawnTable = (Last created hashtable)
Trigger - Run GetPlayerCount_RecreateMB <gen> (checking conditions)
Trigger - Turn on AM_Monster_Spawn <gen>
-------- MBoard --------
Trigger - Run MB_Create_Zombie <gen> (checking conditions)
Multiboard - Change the title of MB_Marines to (|cff949596Class/Name/Credits [max= + ((String((AM_CreditLimitVictory / 1000))) + k]|r))
AM RecreateWeapons
Events
Time - Every 30.00 seconds of game time
Conditions
Actions
For each (Integer A) from 1 to AM_WeaponSpawn_Count , do (Actions)
Loop - Actions
Set Variable Set P = (Position of AM_WeaponSpawn_SpawnedGun[(Integer A)])
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Distance between AM_WeaponSpawn_Origin[(Integer A)] and P) Greater than 128.00
(AM_WeaponSpawn_SpawnedGun[(Integer A)] is owned) Equal to True
Then - Actions
Set Variable Set P2 = (Position of AM_WeaponSpawn_SpawnedAmmo[(Integer A)])
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(AM_WeaponSpawn_SpawnedAmmo[(Integer A)] is owned) Equal to False
(Distance between AM_WeaponSpawn_Origin[(Integer A)] and P2) Less than 256.00
Then - Actions
Item - Remove AM_WeaponSpawn_SpawnedAmmo[(Integer A)]
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Set Variable Set x = (Random integer number between 0 and WeaponData_GunSpawnCount)
Set Variable Set x = WeaponData_GunSpawnList[x]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 0
Then - Actions
Item - Create |cff7DBEF1Weapon [|rGhoul-Cannon|cff7DBEF1] at AM_WeaponSpawn_Origin[(Integer A)]
Set Variable Set AM_WeaponSpawn_SpawnedGun[(Integer A)] = (Last created item)
Item - Set charges remaining in (Last created item) to 15
Set Variable Set AM_WeaponSpawn_SpawnedAmmo[(Integer A)] = No item
Else - Actions
Item - Create WeaponData_ItemType[x] at AM_WeaponSpawn_Origin[(Integer A)]
Set Variable Set AM_WeaponSpawn_SpawnedGun[(Integer A)] = (Last created item)
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 6 of x from WeaponData_Hash.)
Set Variable Set P = (AM_WeaponSpawn_Origin[(Integer A)] offset by 128.00 towards (Random angle) degrees.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Less than or equal to 2
Then - Actions
Item - Create WeaponData_ItemTypeAmmoStck[x] at P
Else - Actions
Item - Create WeaponData_ItemTypeAmmoAltStck[x] at P
Custom script: call RemoveLocation(udg_P)
Set Variable Set AM_WeaponSpawn_SpawnedAmmo[(Integer A)] = (Last created item)
Item - Set the custom value of (Last created item) to x
Set Variable Set x2 = (Load 19 of x from WeaponData_Hash.)
Set Variable Set x2 = (x2 x 2)
Item - Set charges remaining in (Last created item) to x2
Else - Actions
Custom script: call RemoveLocation(udg_P)
AM Monster Spawn
Events
Time - Every 10.00 seconds of game time
Conditions
Actions
For each (Integer x5 ) from 1 to Maxplayers , do (Actions)
Loop - Actions
Custom script: call DestroyGroup(udg_UG_EnemyAliveMarines[udg_x5])
Set Variable Set UG_EnemyAliveMarines[x5] = (Units in (Playable map area) matching ((((Matching unit) is alive) Equal to True) and (((Unit-type of (Matching unit)) Equal to Marine) and (((Matching unit) belongs to an enemy of (Player(x5)).) Equal to True))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player(x5)) slot status) Equal to Is playing
((Player(x5)) Food used) Less than AM_MaxMonsterSpawn
Then - Actions
For each (Integer A) from 0 to AM_MonsterSpawn_TypeCount , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player(x5)) Food used) Less than (AM_MaxMonsterSpawn + 10)
Then - Actions
Set Variable Set x3 = (AM_MonsterSpawn_TypeCount - (Integer A))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Greater than 0
Then - Actions
Set Variable Set x4 = (Load x3 of x5 from AM_MonsterSpawnTable.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x4 Greater than 0
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 8
Then - Actions
Trigger - Run GetPoint_CloseToMarines <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 11
Then - Actions
Set Variable Set UG2 = (Units in (Playable map area) matching ((((Matching unit) is alive) Equal to True) and (((Unit-type of (Matching unit)) Equal to Marine) and (((Matching unit) belongs to an enemy of (Player(x5)).) Equal to True))))
Trigger - Run GetPoint_VeryCloseToUG2 <gen> (checking conditions)
Custom script: call DestroyGroup(udg_UG2)
Else - Actions
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Greater than or equal to 8
Then - Actions
Unit - Create 1 . AM_MonsterSpawn_Unittypes[x3] for (Player(x5)) at P facing (Random angle) degrees
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
x3 Greater than or equal to 9
(Random integer number between 1 and 5) Equal to 1
Then - Actions
Set Variable Set x4 = (x4 - 1)
Hashtable - Save x4 as x3 of x5 in AM_MonsterSpawnTable .
Else - Actions
Else - Actions
Unit - Create x4 . AM_MonsterSpawn_Unittypes[x3] for (Player(x5)) at P facing (Random angle) degrees
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 20) Equal to 1
Then - Actions
Set Variable Set x4 = (x4 - 1)
Hashtable - Save x4 as x3 of x5 in AM_MonsterSpawnTable .
Else - Actions
Custom script: call RemoveLocation(udg_P)
Else - Actions
Else - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 6) Equal to 1
Then - Actions
Unit - Create 1 . Zombie (Giant) for (Player(x5)) at P facing (Random angle) degrees
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Unit - Create 1 . Zombie (Fast) for (Player(x5)) at P facing (Random angle) degrees
Else - Actions
Unit - Create 1 . Zombie (Slow) for (Player(x5)) at P facing (Random angle) degrees
Custom script: call RemoveLocation(udg_P)
Else - Actions
Else - Actions
Unit Group - Add all units of UG_AliveZombies to UG_ZombiesAttackOrder
Trigger - Turn on Monster_AttackOrder <gen>
AM Victory and Warning
Events
Time - Every 5.00 seconds of game time
Conditions
Actions
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set x2 = ((Player((Integer A))) Current gold)
Set Variable Set x3 = (AM_CreditLimitVictory - x2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Less than or equal to 2000
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Less than or equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Game - Display to (All players) for 5.00 seconds the text: (Player_ColorCode[(Integer A)] + ((Name of (Player((Integer A)))) + wins the game!))
Set Variable Set AM_GameWinner = (Player((Integer A)))
Trigger - Run E_GameEnd <gen> (checking conditions)
Custom script: exitwhen true
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
AM_Player_VictoryWarningShow[(Integer A)] Equal to True
Then - Actions
Set Variable Set AM_Player_VictoryWarningShow[(Integer A)] = "false"
Sound - Play Warning <gen>
Game - Display to (All players) for 5.00 seconds the text: (Player_ColorCode[(Integer A)] + ((Name of (Player((Integer A)))) + (|r needs only |cffF6E585 + ((String(x3)) + |rmore credits to win!))))
Else - Actions
Else - Actions
Set Variable Set AM_Player_VictoryWarningShow[(Integer A)] = "true"
Else - Actions
AM DroppedWeaponRemove
Events
Unit - A unit Loses an item
Conditions
Or - Any (Conditions) are true
Conditions
(Item-class of (Item being manipulated)) Equal to Charged
(Item-class of (Item being manipulated)) Equal to Permanent
Actions
Custom script: local item tempitem
Custom script: set tempitem = GetManipulatedItem()
Wait 10.00 seconds
Custom script: set udg_item = tempitem
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(item is owned) Equal to False
Then - Actions
Item - Remove item
Else - Actions
AM OrderZombie
Events
Unit - A unit Is issued an order targeting an object
Unit - A unit Is issued an order targeting a point
Unit - A unit Is issued an order with no target
Conditions
(Race of (Triggering unit)) Equal to Undead
(Player number of (Owner of (Triggering unit))) Less than or equal to Maxplayers
IsTriggerOrder Equal to False
Actions
Trigger - Turn off (This trigger)
Set Variable Set unit = (Triggering unit)
Set Variable Set x = (Player number of (Owner of (Triggering 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 unit) Equal to Heretic
(unit is in UG_CrawlUpMonsters.) Equal to True
(Number of units in UG_EnemyAliveMarines[x]) Equal to 0
Then - Actions
Unit - Order unit to Stop .
Unit Group - Add unit to UG_OrderStop
Trigger - Turn on Marine_Order_Stop <gen>
Else - Actions
Set Variable Set unit2 = (Random unit from UG_EnemyAliveMarines[x])
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Not equal to Sutured Cadavre
(Unit-type of unit) Not equal to Carnivore
Then - Actions
Set Variable Set P = (Position of unit2)
Unit - Order unit to Attack-Move To . P
Custom script: call RemoveLocation(udg_P)
Else - Actions
Unit - Order unit to Right-Click . unit2
Trigger - Turn on (This trigger)
item-level bei ammo: ammo type (normal, explosive, ...)

01: Name
02: Weight
03: Inaccuracy Factor Minimum
04: Inaccuracy Factor Maximum
05: Inaccuracy Factor Increase
06: Magazine Size
07: Fire CastTime
08: Fire Rate
09: Salve Bullet Count
10: Average Damage (real)
11: Fire X bullets per "bullet"
12: Reload time (real)
13: sound ClipOut
14: sound ClipIn
15: sound WeaponReady
16: Strike-Through Power (0: Kein Durchschlag; 5: Keine Abbremsung)
17: Missle Speed (unbedingt angeben!)
18: AoE (0: nur ein target)
19: Default Magazine Count (item drop)
20: Range
Weapon Init
Events
Map initialization
Conditions
Actions
Hashtable - Create a hashtable
Set Variable Set WeaponData_Hash = (Last created hashtable)
-------- 1kg = 3% slowlier --------
Set Variable Set WeaponData_WeightSlowFactor = "0.03"
Set Variable Set WeaponData_WeightSlowFactorEF = "0.01"
-------- Weapon Data --------
Set Variable Set x = "100"
Set Variable Set WeaponData_MissleType[x] = "u000"
Hashtable - Save Stationary MG as 1 of x in WeaponData_Hash .
Hashtable - Save 5.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 7.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 0.50 as 5 of x in WeaponData_Hash .
Hashtable - Save 999 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 7 of x in WeaponData_Hash .
Hashtable - Save 0.15 as 8 of x in WeaponData_Hash .
Hashtable - Save 6 as 9 of x in WeaponData_Hash .
Hashtable - Save 80.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 12 of x in WeaponData_Hash .
Hashtable - Save 2.00 as 16 of x in WeaponData_Hash .
Hashtable - Save 64.00 as 17 of x in WeaponData_Hash .
Set Variable Set x = "101"
Set Variable Set WeaponData_MissleType[x] = "u008"
Hashtable - Save Tank as 1 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 5 of x in WeaponData_Hash .
Hashtable - Save 999 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.50 as 7 of x in WeaponData_Hash .
Hashtable - Save 1.00 as 8 of x in WeaponData_Hash .
Hashtable - Save 1 as 9 of x in WeaponData_Hash .
Hashtable - Save 450.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 32.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 350.00 as 18 of x in WeaponData_Hash .
Set Variable Set x = "102"
Set Variable Set WeaponData_MissleType[x] = "u000"
Hashtable - Save Rifleman as 1 of x in WeaponData_Hash .
Hashtable - Save 3.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 3.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 999 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.50 as 7 of x in WeaponData_Hash .
Hashtable - Save 1.00 as 8 of x in WeaponData_Hash .
Hashtable - Save 1 as 9 of x in WeaponData_Hash .
Hashtable - Save 250.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 12 of x in WeaponData_Hash .
Hashtable - Save 3.50 as 16 of x in WeaponData_Hash .
Hashtable - Save 64.00 as 17 of x in WeaponData_Hash .
Set Variable Set x = "0"
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I000"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I001"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I01I"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I00L"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I01J"
Set Variable Set WeaponData_MissleType[x] = "u000"
Hashtable - Save USP as 1 of x in WeaponData_Hash .
Hashtable - Save 0.80 as 2 of x in WeaponData_Hash .
Hashtable - Save 3.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 7.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 2.00 as 5 of x in WeaponData_Hash .
Hashtable - Save 12 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 7 of x in WeaponData_Hash .
Hashtable - Save 0.35 as 8 of x in WeaponData_Hash .
Hashtable - Save 1 as 9 of x in WeaponData_Hash .
Hashtable - Save 60.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 1.20 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of usp_clipout <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of usp_clipin <gen> as 14 of x in WeaponData_Hash .
Hashtable - Save Handle Of usp_slideback <gen> as 15 of x in WeaponData_Hash .
Hashtable - Save 2.50 as 16 of x in WeaponData_Hash .
Hashtable - Save 64.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 6 as 19 of x in WeaponData_Hash .
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I003"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I002"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I01R"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I00M"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I01Q"
Set Variable Set WeaponData_MissleType[x] = "u000"
Hashtable - Save M3 as 1 of x in WeaponData_Hash .
Hashtable - Save 3.20 as 2 of x in WeaponData_Hash .
Hashtable - Save 8.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 9.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 0.50 as 5 of x in WeaponData_Hash .
Hashtable - Save 8 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 7 of x in WeaponData_Hash .
Hashtable - Save 0.85 as 8 of x in WeaponData_Hash .
Hashtable - Save 1 as 9 of x in WeaponData_Hash .
Hashtable - Save 25.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 7 as 11 of x in WeaponData_Hash .
Hashtable - Save 4.00 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of m3_insertshell <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of m3_pump <gen> as 15 of x in WeaponData_Hash .
Hashtable - Save 0.50 as 16 of x in WeaponData_Hash .
Hashtable - Save 64.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 32 as 19 of x in WeaponData_Hash .
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I004"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I005"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I01E"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I00J"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I01F"
Set Variable Set WeaponData_MissleType[x] = "u000"
Hashtable - Save MP7 as 1 of x in WeaponData_Hash .
Hashtable - Save 1.90 as 2 of x in WeaponData_Hash .
Hashtable - Save 4.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 10.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 0.40 as 5 of x in WeaponData_Hash .
Hashtable - Save 40 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 7 of x in WeaponData_Hash .
Hashtable - Save 0.05 as 8 of x in WeaponData_Hash .
Hashtable - Save 5 as 9 of x in WeaponData_Hash .
Hashtable - Save 35.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 2.00 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of mp5_clipout <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of mp5_clipin <gen> as 14 of x in WeaponData_Hash .
Hashtable - Save Handle Of mp5_slideback <gen> as 15 of x in WeaponData_Hash .
Hashtable - Save 1.00 as 16 of x in WeaponData_Hash .
Hashtable - Save 64.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 5 as 19 of x in WeaponData_Hash .
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I006"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I007"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I01C"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I00K"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I01D"
Set Variable Set WeaponData_MissleType[x] = "u000"
Hashtable - Save AWP as 1 of x in WeaponData_Hash .
Hashtable - Save 6.00 as 2 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 20.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 15.00 as 5 of x in WeaponData_Hash .
Hashtable - Save 10 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.50 as 7 of x in WeaponData_Hash .
Hashtable - Save 0.70 as 8 of x in WeaponData_Hash .
Hashtable - Save 1 as 9 of x in WeaponData_Hash .
Hashtable - Save 500.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 3.00 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of awp_clipout <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of awp_clipin <gen> as 14 of x in WeaponData_Hash .
Hashtable - Save Handle Of awp_deploy <gen> as 15 of x in WeaponData_Hash .
Hashtable - Save 4.00 as 16 of x in WeaponData_Hash .
Hashtable - Save 64.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 3 as 19 of x in WeaponData_Hash .
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I008"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I009"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I01G"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I00I"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I01H"
Set Variable Set WeaponData_MissleType[x] = "u000"
Hashtable - Save M249 as 1 of x in WeaponData_Hash .
Hashtable - Save 6.00 as 2 of x in WeaponData_Hash .
Hashtable - Save 4.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 14.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 0.50 as 5 of x in WeaponData_Hash .
Hashtable - Save 100 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 7 of x in WeaponData_Hash .
Hashtable - Save 0.10 as 8 of x in WeaponData_Hash .
Hashtable - Save 8 as 9 of x in WeaponData_Hash .
Hashtable - Save 50.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 5.00 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of m249_boxout <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of m249_boxin <gen> as 14 of x in WeaponData_Hash .
Hashtable - Save Handle Of m249_coverup <gen> as 15 of x in WeaponData_Hash .
Hashtable - Save 2.00 as 16 of x in WeaponData_Hash .
Hashtable - Save 64.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 2 as 19 of x in WeaponData_Hash .
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I00A"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I00B"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I01P"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I00P"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I01O"
Set Variable Set WeaponData_MissleType[x] = "u008"
Hashtable - Save Rocket Launcher as 1 of x in WeaponData_Hash .
Hashtable - Save 6.00 as 2 of x in WeaponData_Hash .
Hashtable - Save 3.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 3.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 5 of x in WeaponData_Hash .
Hashtable - Save 3 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.20 as 7 of x in WeaponData_Hash .
Hashtable - Save 1.00 as 8 of x in WeaponData_Hash .
Hashtable - Save 1 as 9 of x in WeaponData_Hash .
Hashtable - Save 750.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 5.00 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of m249_boxout <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of m249_boxin <gen> as 14 of x in WeaponData_Hash .
Hashtable - Save Handle Of m249_coverup <gen> as 15 of x in WeaponData_Hash .
Hashtable - Save 32.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 250.00 as 18 of x in WeaponData_Hash .
Hashtable - Save 9 as 19 of x in WeaponData_Hash .
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I00E"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I00F"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I01K"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I00O"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I01L"
Set Variable Set WeaponData_MissleType[x] = "u00F"
Hashtable - Save BFG as 1 of x in WeaponData_Hash .
Hashtable - Save 4.00 as 2 of x in WeaponData_Hash .
Hashtable - Save 2.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 2.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 5 of x in WeaponData_Hash .
Hashtable - Save 10 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.10 as 7 of x in WeaponData_Hash .
Hashtable - Save 0.50 as 8 of x in WeaponData_Hash .
Hashtable - Save 1 as 9 of x in WeaponData_Hash .
Hashtable - Save 300.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 3.00 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of m249_boxout <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of m249_boxin <gen> as 14 of x in WeaponData_Hash .
Hashtable - Save Handle Of m249_coverup <gen> as 15 of x in WeaponData_Hash .
Hashtable - Save 32.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 325.00 as 18 of x in WeaponData_Hash .
Hashtable - Save 2 as 19 of x in WeaponData_Hash .
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I00G"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I00H"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I01N"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I00N"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I01M"
Set Variable Set WeaponData_MissleType[x] = "u00G"
Hashtable - Save Flamethrower as 1 of x in WeaponData_Hash .
Hashtable - Save 4.00 as 2 of x in WeaponData_Hash .
Hashtable - Save 2.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 2.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 5 of x in WeaponData_Hash .
Hashtable - Save 100 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 7 of x in WeaponData_Hash .
Hashtable - Save 0.10 as 8 of x in WeaponData_Hash .
Hashtable - Save 4 as 9 of x in WeaponData_Hash .
Hashtable - Save 15.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 2.50 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of mp5_clipout <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of mp5_clipin <gen> as 14 of x in WeaponData_Hash .
Hashtable - Save 5.00 as 16 of x in WeaponData_Hash .
Hashtable - Save 18.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 100.00 as 18 of x in WeaponData_Hash .
Hashtable - Save 2 as 19 of x in WeaponData_Hash .
Hashtable - Save 900.00 as 20 of x in WeaponData_Hash .
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I029"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I02D"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I02E"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I02D"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I02E"
Set Variable Set WeaponData_MissleType[x] = "u00Q"
Hashtable - Save Railgun as 1 of x in WeaponData_Hash .
Hashtable - Save 4.00 as 2 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 5 of x in WeaponData_Hash .
Hashtable - Save 15 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 7 of x in WeaponData_Hash .
Hashtable - Save 2.00 as 8 of x in WeaponData_Hash .
Hashtable - Save 1 as 9 of x in WeaponData_Hash .
Hashtable - Save 300.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 3.00 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of mp5_clipout <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of mp5_clipin <gen> as 14 of x in WeaponData_Hash .
Hashtable - Save 5.00 as 16 of x in WeaponData_Hash .
Hashtable - Save 128.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 2 as 19 of x in WeaponData_Hash .
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I02C"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I02D"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I02E"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I02D"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I02E"
Hashtable - Save Lightning Gun as 1 of x in WeaponData_Hash .
Hashtable - Save 4.00 as 2 of x in WeaponData_Hash .
Hashtable - Save 80 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.10 as 8 of x in WeaponData_Hash .
Hashtable - Save 3 as 9 of x in WeaponData_Hash .
Hashtable - Save 2.50 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of mp5_clipout <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of mp5_clipin <gen> as 14 of x in WeaponData_Hash .
Hashtable - Save 256.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 2 as 19 of x in WeaponData_Hash .
Hashtable - Save 700.00 as 20 of x in WeaponData_Hash .
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I02B"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I02F"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I02G"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I02F"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I02G"
Set Variable Set WeaponData_MissleType[x] = "u000"
Hashtable - Save Desert Eagle as 1 of x in WeaponData_Hash .
Hashtable - Save 2.00 as 2 of x in WeaponData_Hash .
Hashtable - Save 2.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 9.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 3.00 as 5 of x in WeaponData_Hash .
Hashtable - Save 7 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 7 of x in WeaponData_Hash .
Hashtable - Save 0.40 as 8 of x in WeaponData_Hash .
Hashtable - Save 1 as 9 of x in WeaponData_Hash .
Hashtable - Save 200.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 1.20 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of usp_clipout <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of usp_clipin <gen> as 14 of x in WeaponData_Hash .
Hashtable - Save Handle Of usp_slideback <gen> as 15 of x in WeaponData_Hash .
Hashtable - Save 3.25 as 16 of x in WeaponData_Hash .
Hashtable - Save 64.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 5 as 19 of x in WeaponData_Hash .
Set Variable Set x = (x + 1)
Set Variable Set WeaponData_ItemType[x] = "I02A"
Set Variable Set WeaponData_ItemTypeAmmo[x] = "I002"
Set Variable Set WeaponData_ItemTypeAmmoStck[x] = "I01R"
Set Variable Set WeaponData_ItemTypeAmmoAlt[x] = "I002"
Set Variable Set WeaponData_ItemTypeAmmoAltStck[x] = "I01R"
Set Variable Set WeaponData_MissleType[x] = "u000"
Hashtable - Save xm1014 as 1 of x in WeaponData_Hash .
Hashtable - Save 3.80 as 2 of x in WeaponData_Hash .
Hashtable - Save 8.00 as 3 of x in WeaponData_Hash .
Hashtable - Save 14.00 as 4 of x in WeaponData_Hash .
Hashtable - Save 1.50 as 5 of x in WeaponData_Hash .
Hashtable - Save 7 as 6 of x in WeaponData_Hash .
Hashtable - Save 0.00 as 7 of x in WeaponData_Hash .
Hashtable - Save 0.45 as 8 of x in WeaponData_Hash .
Hashtable - Save 1 as 9 of x in WeaponData_Hash .
Hashtable - Save 30.00 as 10 of x in WeaponData_Hash .
Hashtable - Save 7 as 11 of x in WeaponData_Hash .
Hashtable - Save 4.00 as 12 of x in WeaponData_Hash .
Hashtable - Save Handle Of m3_insertshell <gen> as 13 of x in WeaponData_Hash .
Hashtable - Save Handle Of m3_pump <gen> as 15 of x in WeaponData_Hash .
Hashtable - Save 0.45 as 16 of x in WeaponData_Hash .
Hashtable - Save 64.00 as 17 of x in WeaponData_Hash .
Hashtable - Save 32 as 19 of x in WeaponData_Hash .
-------- --------
Set Variable Set WeaponData_Count = x
Weapon Aquire
Events
Unit - A unit Acquires an item
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Item-class of (Item being manipulated)) Equal to Permanent
(Custom value of (Item being manipulated)) Greater than 0
Or - Any (Conditions) are true
Conditions
(Load 8 of (Key (Triggering unit).) in Marine_Hash.) Equal to No item
((Triggering unit) has (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to False
And - All (Conditions) are true
Conditions
(Charges remaining in (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to 0
(Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Greater than or equal to 0
(Load 2 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_AutoAttackON[(Player number of (Owner of (Triggering unit)))] Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rxm1014|cff7DBEF1]
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rFlamethrower|cff7DBEF1]
(Unit-type of Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))]) Not equal to Marine Auto-Attack (700)
Then - Actions
Unit - Replace Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] with a Marine Auto-Attack (700) using The new unit's max life and mana
Set Variable Set Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] = (Last replaced unit)
Unit - Turn collision for (Last replaced unit) Off .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rBFG|cff7DBEF1]
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
(Unit-type of Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))]) Not equal to Marine Auto-Attack (1400, min. 500)
Then - Actions
Unit - Replace Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] with a Marine Auto-Attack (1400, min. 500) using The new unit's max life and mana
Set Variable Set Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] = (Last replaced unit)
Unit - Turn collision for (Last replaced unit) Off .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Item being manipulated)) Not equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
(Item-type of (Item being manipulated)) Not equal to |cff7DBEF1Weapon [|rxm1014|cff7DBEF1]
(Item-type of (Item being manipulated)) Not equal to |cff7DBEF1Weapon [|rFlamethrower|cff7DBEF1]
(Item-type of (Item being manipulated)) Not equal to |cff7DBEF1Weapon [|rBFG|cff7DBEF1]
(Item-type of (Item being manipulated)) Not equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
(Unit-type of Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))]) Not equal to Marine Auto-Attack (1400)
Then - Actions
Unit - Replace Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] with a Marine Auto-Attack (1400) using The new unit's max life and mana
Set Variable Set Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] = (Last replaced unit)
Unit - Turn collision for (Last replaced unit) Off .
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to |cff7DBEF1Weapon [|rChainsaw|cff7DBEF1]
(Item-type of (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to |cff7DBEF1Weapon [|rGauntlet|cff7DBEF1]
Then - Actions
Special Effect - Destroy (Load 30 of (Key (Triggering unit).) in Marine_Hash.)
Else - Actions
Hashtable - Save Handle Of (Item being manipulated) as 8 of (Key (Triggering unit).) in Marine_Hash .
-------- Modify Movespeed --------
Set Variable Set MarineSetMMSpeed_unit = (Triggering unit)
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
-------- Automatisch Munition suchen --------
Set Variable Set WeaponAquire_Item = (Load 15 of (Key (Triggering unit).) in Marine_Hash.)
Set Variable Set WeaponAquire_Unit = (Triggering unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Charges remaining in WeaponAquire_Item) Equal to 0
(WeaponAquire_Unit has WeaponAquire_Item) Equal to False
WeaponAquire_Item Equal to No item
(Custom value of (Item being manipulated)) Not equal to (Custom value of WeaponAquire_Item)
Then - Actions
Custom script: set udg_WeaponAquire_UnitKey = GetHandleId(udg_WeaponAquire_Unit)
Set Variable Set WeaponAquire_Item = (Item being manipulated)
Set Variable Set WeaponAquire_x = (Custom value of WeaponAquire_Item)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[WeaponAquire_x]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[WeaponAquire_x])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmoAlt[WeaponAquire_x]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmoAlt[WeaponAquire_x])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 2
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[12]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[12])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 12
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[2]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[2])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 10
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[9]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[9])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 9
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[10]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[10])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Charges remaining in (Item being manipulated)) Equal to 0
Then - Actions
Set Variable Set Marine_Reload_Unit = (Triggering unit)
Trigger - Run Marine_Reload <gen> (checking conditions)
Else - Actions
Weapon AquireMeele
Events
Unit - A unit Acquires an item
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Custom value of (Item being manipulated)) Less than 0
Or - Any (Conditions) are true
Conditions
(Load 8 of (Key (Triggering unit).) in Marine_Hash.) Equal to No item
((Triggering unit) has (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to False
(Charges remaining in (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to 0
(Load 2 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_AutoAttackON[(Player number of (Owner of (Triggering unit)))] Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))]) Not equal to Marine Auto-Attack (200)
Then - Actions
Unit - Replace Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] with a Marine Auto-Attack (200) using The new unit's max life and mana
Set Variable Set Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] = (Last replaced unit)
Unit - Turn collision for (Last replaced unit) Off .
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Greater than or equal to 0
Then - Actions
Special Effect - Create a special effect attached to the weapon (Unexpected type: 'attachpoint') of (Triggering unit) using war3mapImported\bloody chainsaw.mdx
Hashtable - Save Handle Of (Last created special effect) as 30 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
Hashtable - Save Handle Of (Item being manipulated) as 8 of (Key (Triggering unit).) in Marine_Hash .
-------- Modify Movespeed --------
Set Variable Set MarineSetMMSpeed_unit = (Triggering unit)
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
For Ghoul-Cannon
Weapon AquireSpecial
Events
Unit - A unit Acquires an item
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rGhoul-Cannon|cff7DBEF1]
Or - Any (Conditions) are true
Conditions
(Load 8 of (Key (Triggering unit).) in Marine_Hash.) Equal to No item
((Triggering unit) has (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to False
(Charges remaining in (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to 0
(Load 2 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_AutoAttackON[(Player number of (Owner of (Triggering unit)))] Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))]) Not equal to Marine Auto-Attack (700)
Then - Actions
Unit - Replace Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] with a Marine Auto-Attack (700) using The new unit's max life and mana
Set Variable Set Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] = (Last replaced unit)
Unit - Turn collision for (Last replaced unit) Off .
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to |cff7DBEF1Weapon [|rChainsaw|cff7DBEF1]
(Item-type of (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to |cff7DBEF1Weapon [|rGauntlet|cff7DBEF1]
Then - Actions
Special Effect - Destroy (Load 30 of (Key (Triggering unit).) in Marine_Hash.)
Else - Actions
Hashtable - Save Handle Of (Item being manipulated) as 8 of (Key (Triggering unit).) in Marine_Hash .
-------- Modify Movespeed --------
Set Variable Set MarineSetMMSpeed_unit = (Triggering unit)
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
Weapon UseItem
Events
Unit - A unit Uses an item
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Custom value of (Item being manipulated)) Greater than 0
(Item-class of (Item being manipulated)) Equal to Permanent
Actions
Unit Group - Remove (Triggering unit) from UG_FireWhenAngleOk .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_AutoAttackON[(Player number of (Owner of (Triggering unit)))] Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rxm1014|cff7DBEF1]
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rFlamethrower|cff7DBEF1]
(Unit-type of Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))]) Not equal to Marine Auto-Attack (700)
Then - Actions
Unit - Replace Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] with a Marine Auto-Attack (700) using The new unit's max life and mana
Set Variable Set Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] = (Last replaced unit)
Unit - Turn collision for (Last replaced unit) Off .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rBFG|cff7DBEF1]
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
(Unit-type of Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))]) Not equal to Marine Auto-Attack (1400, min. 500)
Then - Actions
Unit - Replace Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] with a Marine Auto-Attack (1400, min. 500) using The new unit's max life and mana
Set Variable Set Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] = (Last replaced unit)
Unit - Turn collision for (Last replaced unit) Off .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Item being manipulated)) Not equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
(Item-type of (Item being manipulated)) Not equal to |cff7DBEF1Weapon [|rxm1014|cff7DBEF1]
(Item-type of (Item being manipulated)) Not equal to |cff7DBEF1Weapon [|rFlamethrower|cff7DBEF1]
(Item-type of (Item being manipulated)) Not equal to |cff7DBEF1Weapon [|rBFG|cff7DBEF1]
(Item-type of (Item being manipulated)) Not equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
(Unit-type of Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))]) Not equal to Marine Auto-Attack (1400)
Then - Actions
Unit - Replace Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] with a Marine Auto-Attack (1400) using The new unit's max life and mana
Set Variable Set Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] = (Last replaced unit)
Unit - Turn collision for (Last replaced unit) Off .
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to |cff7DBEF1Weapon [|rChainsaw|cff7DBEF1]
(Item-type of (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to |cff7DBEF1Weapon [|rGauntlet|cff7DBEF1]
Then - Actions
Special Effect - Destroy (Load 30 of (Key (Triggering unit).) in Marine_Hash.)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 4 of (Key (Item being manipulated).) from Hash_Main.) Equal to False
Then - Actions
Item - Set charges remaining in (Item being manipulated) to ((Charges remaining in (Item being manipulated)) + 1)
Else - Actions
Hashtable - Save Handle Of (Item being manipulated) as 8 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save False as 2 of (Key (Triggering unit).) in Marine_Hash .
-------- Modify Movespeed --------
Set Variable Set MarineSetMMSpeed_unit = (Triggering unit)
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
-------- Automatisch Munition suchen --------
Set Variable Set WeaponAquire_Item = (Load 15 of (Key (Triggering unit).) in Marine_Hash.)
Set Variable Set WeaponAquire_Unit = (Triggering unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Charges remaining in WeaponAquire_Item) Equal to 0
(WeaponAquire_Unit has WeaponAquire_Item) Equal to False
WeaponAquire_Item Equal to No item
(Custom value of (Item being manipulated)) Not equal to (Custom value of WeaponAquire_Item)
Then - Actions
Custom script: set udg_WeaponAquire_UnitKey = GetHandleId(udg_WeaponAquire_Unit)
Set Variable Set WeaponAquire_Item = (Item being manipulated)
Set Variable Set WeaponAquire_x = (Custom value of WeaponAquire_Item)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[WeaponAquire_x]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[WeaponAquire_x])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmoAlt[WeaponAquire_x]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmoAlt[WeaponAquire_x])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 2
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[12]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[12])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 12
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[2]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[2])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 10
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[9]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[9])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 9
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[10]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[10])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Charges remaining in (Item being manipulated)) Equal to 0
Then - Actions
Set Variable Set Marine_Reload_Unit = (Triggering unit)
Trigger - Run Marine_Reload <gen> (checking conditions)
Else - Actions
Weapon UseItemMeele
Events
Unit - A unit Uses an item
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Custom value of (Item being manipulated)) Less than 0
Actions
Unit Group - Remove (Triggering unit) from UG_FireWhenAngleOk .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_AutoAttackON[(Player number of (Owner of (Triggering unit)))] Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))]) Not equal to Marine Auto-Attack (200)
Then - Actions
Unit - Replace Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] with a Marine Auto-Attack (200) using The new unit's max life and mana
Set Variable Set Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] = (Last replaced unit)
Unit - Turn collision for (Last replaced unit) Off .
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Greater than or equal to 0
Then - Actions
Special Effect - Create a special effect attached to the weapon (Unexpected type: 'attachpoint') of (Triggering unit) using war3mapImported\bloody chainsaw.mdx
Hashtable - Save Handle Of (Last created special effect) as 30 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
Hashtable - Save Handle Of (Item being manipulated) as 8 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save False as 2 of (Key (Triggering unit).) in Marine_Hash .
-------- Modify Movespeed --------
Set Variable Set MarineSetMMSpeed_unit = (Triggering unit)
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
Weapon UseItemSpecial
Events
Unit - A unit Uses an item
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rGhoul-Cannon|cff7DBEF1]
Actions
Unit Group - Remove (Triggering unit) from UG_FireWhenAngleOk .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_AutoAttackON[(Player number of (Owner of (Triggering unit)))] Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))]) Not equal to Marine Auto-Attack (700)
Then - Actions
Unit - Replace Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] with a Marine Auto-Attack (700) using The new unit's max life and mana
Set Variable Set Player_AutoAttackDummy[(Player number of (Owner of (Triggering unit)))] = (Last replaced unit)
Unit - Turn collision for (Last replaced unit) Off .
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to |cff7DBEF1Weapon [|rChainsaw|cff7DBEF1]
(Item-type of (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to |cff7DBEF1Weapon [|rGauntlet|cff7DBEF1]
Then - Actions
Special Effect - Destroy (Load 30 of (Key (Triggering unit).) in Marine_Hash.)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 4 of (Key (Item being manipulated).) from Hash_Main.) Equal to False
Then - Actions
Item - Set charges remaining in (Item being manipulated) to ((Charges remaining in (Item being manipulated)) + 1)
Else - Actions
Hashtable - Save Handle Of (Item being manipulated) as 8 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save False as 2 of (Key (Triggering unit).) in Marine_Hash .
-------- Modify Movespeed --------
Set Variable Set MarineSetMMSpeed_unit = (Triggering unit)
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
Weapon Drop
Events
Unit - A unit Loses an item
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Item-class of (Item being manipulated)) Equal to Permanent
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item being manipulated) Equal to (Load 8 of (Key (Triggering unit).) in Marine_Hash.)
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rChainsaw|cff7DBEF1]
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Weapon [|rGauntlet|cff7DBEF1]
Then - Actions
Special Effect - Destroy (Load 30 of (Key (Triggering unit).) in Marine_Hash.)
Else - Actions
Hashtable - Save False as 2 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
Wait 0.10 seconds
Custom script: set udg_unit = tempunit
Set Variable Set MarineSetMMSpeed_unit = unit
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
Nade Aquire
Events
Unit - A unit Acquires an item
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
Or - Any (Conditions) are true
Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1HE-Nades
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Frags
Or - Any (Conditions) are true
Conditions
(Load 12 of (Key (Triggering unit).) in Marine_Hash.) Equal to No item
((Triggering unit) has (Load 12 of (Key (Triggering unit).) in Marine_Hash.)) Equal to False
Actions
Hashtable - Save Handle Of (Item being manipulated) as 12 of (Key (Triggering unit).) in Marine_Hash .
Nade UseItem
Events
Unit - A unit Uses an item
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
Or - Any (Conditions) are true
Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1HE-Nades
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Frags
Actions
Hashtable - Save Handle Of (Item being manipulated) as 12 of (Key (Triggering unit).) in Marine_Hash .
Item - Set charges remaining in (Item being manipulated) to ((Charges remaining in (Item being manipulated)) + 1)
Ammo Aquire
Events
Unit - A unit Acquires an item
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Custom value of (Item being manipulated)) Greater than 0
(Item-class of (Item being manipulated)) Equal to Charged
Or - Any (Conditions) are true
Conditions
(Load 15 of (Key (Triggering unit).) in Marine_Hash.) Equal to No item
((Triggering unit) has (Load 15 of (Key (Triggering unit).) in Marine_Hash.)) Equal to False
(Load 2 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Or - Any (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 2
12 Equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 12
2 Equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 10
9 Equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 9
10 Equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
Actions
Hashtable - Save Handle Of (Item being manipulated) as 15 of (Key (Triggering unit).) in Marine_Hash .
-------- Reload wenn Magazin leer --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Charges remaining in (Load 8 of (Key (Triggering unit).) in Marine_Hash.)) Equal to 0
Then - Actions
Set Variable Set Marine_Reload_Unit = (Triggering unit)
Trigger - Run Marine_Reload <gen> (checking conditions)
Else - Actions
Ammo UseItem
Events
Unit - A unit Uses an item
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
(Custom value of (Item being manipulated)) Greater than 0
(Item-class of (Item being manipulated)) Equal to Charged
Actions
Item - Set charges remaining in (Item being manipulated) to ((Charges remaining in (Item being manipulated)) + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
((Triggering unit) has an item of type WeaponData_ItemType[(Custom value of (Item being manipulated))]) Equal to True
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 2
12 Equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 12
2 Equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 12
((Triggering unit) has an item of type WeaponData_ItemType[2]) Equal to True
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 2
((Triggering unit) has an item of type WeaponData_ItemType[12]) Equal to True
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 10
9 Equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 9
10 Equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 10
((Triggering unit) has an item of type WeaponData_ItemType[9]) Equal to True
And - All (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Equal to 9
((Triggering unit) has an item of type WeaponData_ItemType[10]) Equal to True
(Load 2 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Then - Actions
Hashtable - Save Handle Of (Item being manipulated) as 15 of (Key (Triggering unit).) in Marine_Hash .
-------- Automatisch andere Waffe auswählen --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Item being manipulated)) Not equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
Or - Any (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Not equal to 2
12 Not equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
Or - Any (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Not equal to 12
2 Not equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
Or - Any (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Not equal to 10
9 Not equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
Or - Any (Conditions) are true
Conditions
(Custom value of (Item being manipulated)) Not equal to 9
10 Not equal to (Custom value of (Load 8 of (Key (Triggering unit).) in Marine_Hash.))
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) has an item of type WeaponData_ItemType[(Custom value of (Item being manipulated))]) Equal to True
Then - Actions
Hashtable - Save Handle Of (Item carried by (Triggering unit) of type WeaponData_ItemType[(Custom value of (Item being manipulated))]) as 8 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Item being manipulated)) Equal to 12
((Triggering unit) has an item of type WeaponData_ItemType[2]) Equal to True
Then - Actions
Hashtable - Save Handle Of (Item carried by (Triggering unit) of type WeaponData_ItemType[2]) as 8 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Item being manipulated)) Equal to 2
((Triggering unit) has an item of type WeaponData_ItemType[12]) Equal to True
Then - Actions
Hashtable - Save Handle Of (Item carried by (Triggering unit) of type WeaponData_ItemType[12]) as 8 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Item being manipulated)) Equal to 10
((Triggering unit) has an item of type WeaponData_ItemType[9]) Equal to True
Then - Actions
Hashtable - Save Handle Of (Item carried by (Triggering unit) of type WeaponData_ItemType[9]) as 8 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Item being manipulated)) Equal to 9
((Triggering unit) has an item of type WeaponData_ItemType[10]) Equal to True
Then - Actions
Hashtable - Save Handle Of (Item carried by (Triggering unit) of type WeaponData_ItemType[10]) as 8 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
Else - Actions
-------- Waffe nachladen wenn leer --------
Set Variable Set WeaponAquire_Item = (Load 8 of (Key (Triggering unit).) in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Charges remaining in WeaponAquire_Item) Equal to 0
(Load 2 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Then - Actions
Set Variable Set Marine_Reload_Unit = (Triggering unit)
Trigger - Run Marine_Reload <gen> (checking conditions)
Else - Actions
Else - Actions
Marine Armor Aq
Events
Unit - A unit Acquires an item
Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Kevlar Vest
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Liquid-Crystal-Suit (LQS)
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) has an item of type |cff7DBEF1Kevlar Vest) Equal to True
Then - Actions
Hero - Drop (Item carried by (Triggering unit) of type |cff7DBEF1Kevlar Vest) from (Triggering unit) .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) has an item of type |cff7DBEF1Liquid-Crystal-Suit (LQS)) Equal to True
Then - Actions
Hero - Drop (Item carried by (Triggering unit) of type |cff7DBEF1Liquid-Crystal-Suit (LQS)) from (Triggering unit) .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Kevlar Vest
Then - Actions
Hero - Create |cff7DBEF1Kevlar Vest and give it to (Triggering unit)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Liquid-Crystal-Suit (LQS)
Then - Actions
Hero - Create |cff7DBEF1Liquid-Crystal-Suit (LQS) and give it to (Triggering unit)
Else - Actions
Item - Remove (Item being manipulated)
Marine Armor LQS Spell
Events
Unit - A unit Acquires an item
Unit - A unit Loses an item
Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Liquid-Crystal-Suit (LQS)
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Wait 0.20 seconds
Custom script: set udg_unit = tempunit
Unit - Remove Shockwave from unit
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(unit has an item of type |cff7DBEF1Liquid-Crystal-Suit (LQS)) Equal to True
Then - Actions
Unit - Add Shockwave to unit
Else - Actions
Stacking (on ground): PowerUp
Inventory: Charged
StackingItem Init
Events
Time - Elapsed game time is 1.00 seconds
Conditions
Actions
Set Variable Set x = "1"
Set Variable Set StackableItem_TypeInventory[x] = "I00R"
Set Variable Set StackableItem_TypePowerUp[x] = "I014"
Set Variable Set StackableItem_StackCount[x] = "6"
Set Variable Set x = (x + 1)
Set Variable Set StackableItem_TypeInventory[x] = "I012"
Set Variable Set StackableItem_TypePowerUp[x] = "I015"
Set Variable Set StackableItem_StackCount[x] = "6"
Set Variable Set x = (x + 1)
Set Variable Set StackableItem_TypeInventory[x] = "I011"
Set Variable Set StackableItem_TypePowerUp[x] = "I016"
Set Variable Set StackableItem_StackCount[x] = "6"
Set Variable Set x = (x + 1)
Set Variable Set StackableItem_TypeInventory[x] = "I00D"
Set Variable Set StackableItem_TypePowerUp[x] = "I017"
Set Variable Set StackableItem_StackCount[x] = "6"
Set Variable Set x = (x + 1)
Set Variable Set StackableItem_TypeInventory[x] = "I00C"
Set Variable Set StackableItem_TypePowerUp[x] = "I018"
Set Variable Set StackableItem_StackCount[x] = "6"
Set Variable Set x = (x + 1)
Set Variable Set StackableItem_TypeInventory[x] = "I00Q"
Set Variable Set StackableItem_TypePowerUp[x] = "I019"
Set Variable Set StackableItem_StackCount[x] = "6"
Set Variable Set x = (x + 1)
Set Variable Set StackableItem_TypeInventory[x] = "I013"
Set Variable Set StackableItem_TypePowerUp[x] = "I01A"
Set Variable Set StackableItem_StackCount[x] = "6"
Set Variable Set x = (x + 1)
Set Variable Set StackableItem_TypeInventory[x] = "I00Z"
Set Variable Set StackableItem_TypePowerUp[x] = "I01B"
Set Variable Set StackableItem_StackCount[x] = "6"
For each (Integer A) from 1 to WeaponData_Count , do (Actions)
Loop - Actions
Set Variable Set x = (x + 1)
Set Variable Set StackableItem_TypeInventory[x] = WeaponData_ItemTypeAmmo[(Integer A)]
Set Variable Set StackableItem_TypePowerUp[x] = WeaponData_ItemTypeAmmoStck[(Integer A)]
Set Variable Set StackableItem_StackCount[x] = ((Load 19 of (Integer A) from WeaponData_Hash.) x 3)
Set Variable Set x = (x + 1)
Set Variable Set StackableItem_TypeInventory[x] = WeaponData_ItemTypeAmmoAlt[(Integer A)]
Set Variable Set StackableItem_TypePowerUp[x] = WeaponData_ItemTypeAmmoAltStck[(Integer A)]
Set Variable Set StackableItem_StackCount[x] = ((Load 19 of (Integer A) from WeaponData_Hash.) x 3)
Set Variable Set StackableItem_Count = x
StackingItem Aq
Events
Unit - A unit Acquires an item
Conditions
(Item-class of (Item being manipulated)) Equal to Powerup
Actions
Set Variable Set StackableItem_Charges = "0"
For each (Integer StackableItem_intA ) from 1 to StackableItem_Count , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Item being manipulated)) Equal to StackableItem_TypePowerUp[StackableItem_intA]
Then - Actions
Set Variable Set StackableItem_Type = StackableItem_intA
Set Variable Set StackableItem_Charges = (Charges remaining in (Item being manipulated))
Custom script: exitwhen true
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
StackableItem_Charges Greater than 0
Then - Actions
For each (Integer StackableItem_intA ) from 1 to 6 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
StackableItem_TypeInventory[StackableItem_Type] Equal to (Item-type of (Item carried by (Triggering unit) in slot StackableItem_intA))
Then - Actions
Set Variable Set StackableItem_x = (Charges remaining in (Item carried by (Triggering unit) in slot StackableItem_intA))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
StackableItem_x Less than StackableItem_StackCount[StackableItem_Type]
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
StackableItem_Charges Greater than (StackableItem_StackCount[StackableItem_Type] - StackableItem_x)
Then - Actions
Set Variable Set StackableItem_Charges = (StackableItem_Charges - (StackableItem_StackCount[StackableItem_Type] - StackableItem_x))
Set Variable Set StackableItem_x = StackableItem_StackCount[StackableItem_Type]
Else - Actions
Set Variable Set StackableItem_x = (StackableItem_x + StackableItem_Charges)
Set Variable Set StackableItem_Charges = "0"
Item - Set charges remaining in (Item carried by (Triggering unit) in slot StackableItem_intA) to StackableItem_x
Else - Actions
Else - Actions
Else - Actions
-------- Undead spawns --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
For each (Integer StackableItem_intA ) from 1 to AM_MonsterSpawn_TypeCount , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Item being manipulated)) Equal to AM_MonsterSpawn_Itemtypes[StackableItem_intA]
Then - Actions
Set Variable Set StackableItem_Name = (Name of (Item being manipulated))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(StackableItem_Name, 1, 11)) Equal to Spawn Boss:
Then - Actions
Set Variable Set StackableItem_Name = (Substring(StackableItem_Name, 13, (Length of StackableItem_Name)))
Else - Actions
Set Variable Set StackableItem_Name = (Substring(StackableItem_Name, 7, (Length of StackableItem_Name)))
Set Variable Set StackableItem_Name = ((Player_ColorCode[(Player number of (Owner of (Triggering unit)))] + ((Name of (Owner of (Triggering unit))) + ( |rpurchased + StackableItem_Name))) + |r!)
Game - Display to (All players) the text: StackableItem_Name
Set Variable Set StackableItem_Type = StackableItem_intA
Set Variable Set StackableItem_Charges = (Load StackableItem_Type of (Player number of (Owner of (Triggering unit))) from AM_MonsterSpawnTable.)
Set Variable Set StackableItem_Charges = (StackableItem_Charges + 1)
Hashtable - Save StackableItem_Charges as StackableItem_Type of (Player number of (Owner of (Triggering unit))) in AM_MonsterSpawnTable .
Item - Remove (Item being manipulated)
Skip remaining actions
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
StackableItem_Charges Greater than 0
Then - Actions
-------- Noch Platz? --------
For each (Integer StackableItem_intA ) from 1 to 6 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item carried by (Triggering unit) in slot StackableItem_intA) Equal to No item
Then - Actions
Hero - Create StackableItem_TypeInventory[StackableItem_Type] and give it to (Triggering unit)
Item - Set charges remaining in (Last created item) to StackableItem_Charges
Item - Set the custom value of (Last created item) to (Custom value of (Item being manipulated))
Set Variable Set StackableItem_Charges = "0"
Item - Remove (Item being manipulated)
Skip remaining actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
StackableItem_Charges Greater than 0
Then - Actions
Set Variable Set ItemsToMakeStackCount = (ItemsToMakeStackCount + 1)
Set Variable Set ItemsToMakeStack[ItemsToMakeStackCount] = (Item being manipulated)
Trigger - Turn on StackingItem_Drop_ChangeType <gen>
Else - Actions
Else - Actions
Item - Remove (Item being manipulated)
StackingItem Drop
Events
Unit - A unit Loses an item
Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Kevlar Vest
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Liquid-Crystal-Suit (LQS)
(Item-class of (Item being manipulated)) Equal to Charged
Actions
Set Variable Set ItemsToMakeStackCount = (ItemsToMakeStackCount + 1)
Set Variable Set ItemsToMakeStack[ItemsToMakeStackCount] = (Item being manipulated)
Trigger - Turn on StackingItem_Drop_ChangeType <gen>
StackingItem Drop ChangeType
Events
Time - Every 0.00 seconds of game time
Conditions
Actions
Trigger - Turn off (This trigger)
For each (Integer A) from 1 to ItemsToMakeStackCount , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(ItemsToMakeStack[(Integer A)] is owned) Equal to False
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of ItemsToMakeStack[(Integer A)]) Equal to |cff7DBEF1Kevlar Vest
Then - Actions
Set Variable Set P = (Position of ItemsToMakeStack[(Integer A)])
Item - Remove ItemsToMakeStack[(Integer A)]
Item - Create |cff7DBEF1Kevlar Vest at P
Custom script: call RemoveLocation(udg_P)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of ItemsToMakeStack[(Integer A)]) Equal to |cff7DBEF1Liquid-Crystal-Suit (LQS)
Then - Actions
Set Variable Set P = (Position of ItemsToMakeStack[(Integer A)])
Item - Remove ItemsToMakeStack[(Integer A)]
Item - Create |cff7DBEF1Liquid-Crystal-Suit (LQS) at P
Custom script: call RemoveLocation(udg_P)
Else - Actions
For each (Integer B) from 1 to StackableItem_Count , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of ItemsToMakeStack[(Integer A)]) Equal to StackableItem_TypeInventory[(Integer B)]
(Item-type of ItemsToMakeStack[(Integer A)]) Equal to StackableItem_TypePowerUp[(Integer B)]
Then - Actions
Set Variable Set P = (Position of ItemsToMakeStack[(Integer A)])
Set Variable Set x = (Charges remaining in ItemsToMakeStack[(Integer A)])
Set Variable Set x2 = (Custom value of ItemsToMakeStack[(Integer A)])
Item - Remove ItemsToMakeStack[(Integer A)]
Item - Create StackableItem_TypePowerUp[(Integer B)] at P
Item - Set charges remaining in (Last created item) to x
Item - Set the custom value of (Last created item) to x2
Custom script: call RemoveLocation(udg_P)
Custom script: exitwhen true
Else - Actions
Else - Actions
Set Variable Set ItemsToMakeStackCount = "0"
01: Fire target
02: Reloading (bool)
03: Moving or Shooting? (0: move, 1: shoot)
04: MoveTarget (Shooting)
05: MoveTargetSet (bool)
06: Temp InaccuracyFactor (angle, real)
07: Remaining Bullets to spawn
08: Current Weapon (item)
09: FireRate Cooldown (real)
10: Fire Cast time (real)
11: SMG overheat effect
12: Current Nades (item)
13: Infection to remove
14: LQS Absorbed Dmg
15: Current Ammo (item, for reload)
16: Jetpack on (bool)
17: ax
18: ay
19: az
20: FlameEff left
21: FlameEff right
22: Flame effs destroyed (bool)
23: Visibility
24: Revive target unit
25: Class overhead effect
26: Class chosen (1: Medic 2: Engineer 3: Explosives 4: Operator 5: EliteFighter)
27: Infection level
28: Infection effect
29: Infection effect hp drain
30: WeaponAttachment effect
31: PackedUp MG
32: Airstrike Target Point
33: Airstrike Destination Point
34: Airstrike bombs dropped count
35: Airstrike target effect
36: Airstrike destination effect
37: FireWhenAngleOk: Targeted Angle
38: FireWhenAngleOk: Targeted Distance
39: FlashlightUnit
40: Additional Infection Level Ease Value
41: FireTarget is unit (bool) fuer vorhalten bei cast time weapons
42: FireTarget unit
43: Jetpack steer to point (bool)
44: Jetpack steer to point (point)
45: AccurateShot time remaining

100 + weapon index: remaining magazines for weapon
Lightning gun:
1000: Lightning count
1000 + [1-5]: Lightnings
1010: Lightning duration
Marine Init
Events
Map initialization
Conditions
Actions
Hashtable - Create a hashtable
Set Variable Set Marine_Hash = (Last created hashtable)
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set P = (Random point in Tutorial_Spawn <gen>)
Unit - Create 1 . Marine for (Player((Integer A))) at P facing Default building facing degrees
Set Variable Set Player_Marine[(Integer A)] = (Last created unit)
Unit Group - Add (Last created unit) to UG_AliveMarines
Hero - Make (Player((Integer A))) Heroes gain 0.00 % experience from future kills
Unit - Pause (Last created unit)
-------- Marine-Only-Events --------
Trigger - Add to Marine_ToggleClickAction <gen> the event ((Last created unit) Is issued an order with no target)
Trigger - Add to Marine_Smart_Order <gen> the event ((Last created unit) Is issued an order targeting an object)
Trigger - Add to Marine_Smart_Order <gen> the event ((Last created unit) Is issued an order targeting a point)
Trigger - Add to Marine_Reload_Custom <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to Marine_Nade_Throw <gen> the event ((Last created unit) Is issued an order targeting an object)
Trigger - Add to Marine_Nade_Throw <gen> the event ((Last created unit) Is issued an order targeting a point)
Trigger - Add to Jet_Pack_Toggle <gen> the event ((Last created unit) Begins casting an ability)
Trigger - Add to Marine_Select_Class <gen> the event ((Last created unit) Begins casting an ability)
Trigger - Add to MS_Combat_Cocktail <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to MS_Heal <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to MS_Revive <gen> the event ((Last created unit) Begins channeling an ability)
Trigger - Add to Marine_DmgTake <gen> the event ((Last created unit) Takes damage)
Trigger - Add to Marine_DontAttTransformed <gen> the event ((Last created unit) Is attacked)
Trigger - Add to MS_Place_Mine_Barricade <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to MS_MG_PackUp_TargetCheck <gen> the event ((Last created unit) Begins casting an ability)
Trigger - Add to MS_MG_PackUp <gen> the event ((Last created unit) Finishes casting an ability)
Trigger - Add to MS_MG_SetUp <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to MS_Ping_Dropoff_Point <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to MS_Track_Enemies <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to MS_Airstrike_Cast_FirstPoint <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to MS_Airstrike_Cast_Destination <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to MS_Concentrate <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to MS_ScarifyBullets_Begin <gen> the event ((Last created unit) Is issued an order with no target)
Trigger - Add to MS_Leap <gen> the event ((Last created unit) Is issued an order with no target)
Trigger - Add to MS_ScarifyBullets_Finish <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to Monster_WithinRange_Spells_Far <gen> the event (A unit comes within 1400.00 of (Last created unit))
Trigger - Add to Monster_WithinRange_Spells_Far <gen> the event (A unit comes within 900.00 of (Last created unit))
Trigger - Add to Monster_WithinRange_Spells_Close <gen> the event (A unit comes within 400.00 of (Last created unit))
Trigger - Add to MS_Medic_Items <gen> the event ((Last created unit) Uses an item)
Trigger - Add to MS_LQS_Shockwave <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to E_Scientist_TakeBlood <gen> the event ((Last created unit) Starts the effect of an ability)
Trigger - Add to E_Scientist_SerumUse <gen> the event ((Last created unit) Uses an item)
Trigger - Add to E_Tank_Load <gen> the event ((Last created unit) Is loaded into a transport)
Trigger - Add to MS_NightvisionToggle <gen> the event ((Last created unit) Is issued an order with no target)
Trigger - Add to MS_Nightvision_NoMana <gen> the event ((Last created unit)'s mana becomes Less than or equal to 0.01)
Trigger - Add to MS_Nightvision_NoMana <gen> the event ((Last created unit)'s mana becomes Less than 1.00)
-------- Flashlight --------
Set Variable Set x = (Key (Last created unit).)
Unit Group - Add (Last created unit) to UG_FlashlightUnits
Unit - Create 1 . Flashlight for (Player((Integer A))) at P facing Default building facing degrees
Hashtable - Save Handle Of (Last created unit) as 39 of x in Marine_Hash .
Custom script: call RemoveLocation(udg_P)
Else - Actions
winwalk entfernen während buff noch da ist -> keine kontrolle über einheit
Marine ToggleClickAction
Events
Conditions
(Issued order) Equal to (Order(holdposition))
(Load 16 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 3 of (Key (Triggering unit).) from Marine_Hash.) Equal to 0
Then - Actions
Hashtable - Save 1 as 3 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
Hashtable - Save 0 as 3 of (Key (Triggering unit).) in Marine_Hash .
Unit Group - Add (Triggering unit) to UG_OrderStop
Trigger - Turn on Marine_Order_Stop <gen>
Marine SetMonsterOrder
Events
Unit - A unit Is attacked
Conditions
(Race of (Attacking unit)) Equal to Undead
Actions
Custom script: local unit tempunit
Hashtable - Save 2 as 12 of (Key (Attacking unit).) in Hash_Main .
Unit Group - Add (Attacking unit) to UG_UnitsThatAreAttacking
Trigger - Turn on Marine_ResetMonsterOrder <gen>
-------- Keine units auf roof von unten attacken --------
Set Variable Set AttackOrderCheck_P = (Position of (Attacked unit))
Custom script: set udg_AttackOrderCheck_r2 = GetLocationZ(udg_AttackOrderCheck_P)
Set Variable Set AttackOrderCheck_r2 = (AttackOrderCheck_r2 + (Current flying height of (Attacked unit)))
Custom script: call RemoveLocation(udg_AttackOrderCheck_P)
Set Variable Set AttackOrderCheck_P = (Position of (Attacking unit))
Custom script: set udg_AttackOrderCheck_r = GetLocationZ(udg_AttackOrderCheck_P)
Set Variable Set AttackOrderCheck_r = (AttackOrderCheck_r + (Current flying height of (Attacking unit)))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((AttackOrderCheck_r - AttackOrderCheck_r2))) Greater than (64.00 + (Real((Point-value of (Attacking unit)))))
Then - Actions
-------- Anderes Ziel suchen oder 2sek pausieren --------
Set Variable Set AttackOrderCheck_UG = (Units within 2000.00 of AttackOrderCheck_P matching ((((((Matching unit) is alive) Equal to True) and ((Matching unit) Not equal to (Attacked unit))) and ((Race of (Matching unit)) Not equal to Orc)) and ((((Owner of (Attacking unit)) is an enemy of (Owner of (Matching unit)).) Equal to True) and (((Matching unit) has buff Invulnerable) Equal to False))).)
Custom script: call RemoveLocation(udg_AttackOrderCheck_P)
Set Variable Set AttackOrderCheck_x = (Number of units in AttackOrderCheck_UG)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
AttackOrderCheck_x Greater than 0
Then - Actions
For each (Integer AttackOrderCheck_A ) from 1 to AttackOrderCheck_x , do (Actions)
Loop - Actions
Set Variable Set AttackOrderCheck_unit = (Random unit from AttackOrderCheck_UG)
Unit Group - Remove AttackOrderCheck_unit from AttackOrderCheck_UG .
Set Variable Set AttackOrderCheck_P = (Position of AttackOrderCheck_unit)
Custom script: set udg_AttackOrderCheck_r2 = GetLocationZ(udg_AttackOrderCheck_P)
Custom script: call RemoveLocation(udg_AttackOrderCheck_P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((AttackOrderCheck_r - AttackOrderCheck_r2))) Less than 100.00
Then - Actions
Trigger - Turn off (This trigger)
Unit - Order (Attacking unit) to Attack . AttackOrderCheck_unit
Trigger - Turn on (This trigger)
Custom script: call DestroyGroup(udg_AttackOrderCheck_UG)
Skip remaining actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
AttackOrderCheck_A Equal to AttackOrderCheck_x
Then - Actions
Custom script: call DestroyGroup(udg_AttackOrderCheck_UG)
Unit - Order (Attacking unit) to Stop .
Unit - Pause (Attacking unit)
Set Variable Set AttackOrderCheck_unit = (Attacking unit)
Custom script: set tempunit = udg_AttackOrderCheck_unit
Wait 1.00 seconds
Custom script: set udg_unit = tempunit
Unit - Unpause unit
Else - Actions
Custom script: call DestroyGroup(udg_AttackOrderCheck_UG)
Else - Actions
Custom script: call DestroyGroup(udg_AttackOrderCheck_UG)
Unit - Order (Attacking unit) to Stop .
Unit - Pause (Attacking unit)
Set Variable Set AttackOrderCheck_unit = (Attacking unit)
Custom script: set tempunit = udg_AttackOrderCheck_unit
Wait 1.00 seconds
Custom script: set udg_unit = tempunit
Unit - Unpause unit
Else - Actions
Custom script: call RemoveLocation(udg_AttackOrderCheck_P)
Marine ResetMonsterOrder
Events
Time - Every 1.00 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_UnitsThatAreAttacking) Greater than 0
Then - Actions
Unit Group - Pick every unit in UG_UnitsThatAreAttacking and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is alive) Equal to False
Then - Actions
Set Variable Set x = "0"
Else - Actions
Set Variable Set x = (Load 12 of (Key (Picked unit).) from Hash_Main.)
Set Variable Set x = (x - 1)
Hashtable - Save x as 12 of (Key (Picked unit).) in Hash_Main .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 0
Then - Actions
Unit Group - Remove (Picked unit) from UG_UnitsThatAreAttacking .
Else - Actions
Else - Actions
Trigger - Turn off (This trigger)
doubleclickshoot init
Events
Map initialization
Conditions
Actions
Countdown Timer - Start MouseTimer as a One-shot timer that will expire in 100000.00 seconds
For each (Integer A) from 1 to 6 , do (Actions)
Loop - Actions
Set Variable Set LastClickedTime[(Integer A)] = "0.00"
Set Variable Set LastClickedPoint[(Integer A)] = (Point(0, 0))
Trigger - Add to doubleclickshoot_onMouseDown_Code <gen> the event ((Player((Integer A))) issues Mouse Down event)
Trigger - Add to doubleclickshoot_onMouseUp_Code <gen> the event ((Player((Integer A))) issues Mouse Up event)
Trigger - Add to doubleclickshoot_onMouseMove_Code <gen> the event ((Player((Integer A))) issues Mouse Move event)
doubleclickshoot onMouseDown
Events
Conditions
(Trigger Mouse Button) Equal to Left Mouse Button
Actions
Custom script: local player tempplayer
Custom script: set tempplayer = GetTriggerPlayer()
Set Variable Set x_md = (Player number of (Triggering player))
Set Variable Set Player_MouseDownCount[x_md] = "1"
Set Variable Set Player_MouseUpCount[x_md] = "0"
Set Variable Set UG_md = (Units currently selected by (Triggering player))
Set Variable Set unit_md = (Random unit from UG_md)
Custom script: call DestroyGroup(udg_UG_md)
Set Variable Set Marine_Fire_Target_md = (Mouse Position for Triggered Mouse Event)
Set Variable Set r_md = (Elapsed time for MouseTimer)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[x_md] has buff Stunned) Equal to False
(Player_Marine[x_md] has buff Stunned (Pause)) Equal to False
Or - Any (Conditions) are true
Conditions
(X of Marine_Fire_Target_md) Not equal to 0.00
(Y of Marine_Fire_Target_md) Not equal to 0.00
Or - Any (Conditions) are true
Conditions
unit_md Equal to No unit
And - All (Conditions) are true
Conditions
(Unit-type of unit_md) Not equal to Zombie Master (Shop)
(Unit-type of unit_md) Not equal to Medic (Shop)
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((r_md - LastClickedTime[x_md]))) Less than 1.00
(Abs(((X of Marine_Fire_Target_md) - (X of LastClickedPoint[x_md])))) Less than 100.00
(Abs(((Y of Marine_Fire_Target_md) - (Y of LastClickedPoint[x_md])))) Less than 100.00
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[x_md] is loaded into Tank 0005 <gen>.) Equal to True
Then - Actions
Set Variable Set Marine_Fire_Unit_md = Tank 0005 <gen>
Else - Actions
Set Variable Set Marine_Fire_Unit_md = Player_Marine[x_md]
Custom script: set udg_Marine_Fire_UnitKey_md = GetHandleId(udg_Marine_Fire_Unit_md)
Set Variable Set Marine_Fire_P_md = (Position of Marine_Fire_Unit_md)
-------- Stehenbleiben zum schießen --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Current order of Marine_Fire_Unit_md) Not equal to (Order(stop))
Then - Actions
Unit - Move Marine_Fire_Unit_md instantly to Marine_Fire_P_md , facing Marine_Fire_Target_md
Unit Group - Add Marine_Fire_Unit_md to UG_OrderStop
Trigger - Turn on Marine_Order_Stop <gen>
Else - Actions
-------- Shoot! --------
Unit - Make Marine_Fire_Unit_md face Marine_Fire_Target_md over 0 seconds
Set Variable Set r_md = (Angle from Marine_Fire_P_md to Marine_Fire_Target_md)
Set Variable Set r2_md = (Distance between Marine_Fire_P_md and Marine_Fire_Target_md)
Hashtable - Save r_md as 37 of Marine_Fire_UnitKey_md in Marine_Hash .
Hashtable - Save r2_md as 38 of Marine_Fire_UnitKey_md in Marine_Hash .
Unit Group - Add Marine_Fire_Unit_md to UG_FireWhenAngleOk
Trigger - Turn on Marine_FireWhenAngleOk <gen>
Custom script: call RemoveLocation(udg_Marine_Fire_P_md)
-------- We need this check because this trigger is executed async, while the player could already have lifted his mouse button --------
Wait 0.20 seconds
Custom script: set udg_x_md = GetConvertedPlayerId(tempplayer)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_MouseUpCount[x_md] Less than Player_MouseDownCount[x_md]
Then - Actions
Custom script: set udg_Player_MouseDownAfterDblClick[GetConvertedPlayerId(tempplayer)] = true
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[x_md] is loaded into Tank 0005 <gen>.) Equal to True
Then - Actions
Set Variable Set Marine_Fire_Unit_md = Tank 0005 <gen>
Else - Actions
Set Variable Set Marine_Fire_Unit_md = Player_Marine[x_md]
Unit Group - Add Marine_Fire_Unit_md to UG_FireWhenAngleOk
Trigger - Turn on Marine_FireWhenAngleOk <gen>
Else - Actions
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_LastClickedPoint[udg_x_md])
Custom script: call RemoveLocation(udg_Marine_Fire_Target_md)
Set Variable Set LastClickedPoint[x_md] = (Mouse Position for Triggered Mouse Event)
Set Variable Set LastClickedTime[x_md] = (Elapsed time for MouseTimer)
function Trig_doubleclickshoot_onMouseDown_Copy_Conditions takes nothing returns boolean
    if ( not ( BlzGetTriggerPlayerMouseButton() == MOUSE_BUTTON_TYPE_LEFT ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseDown_Copy_Func012Func001Func001C takes integer x returns boolean
    if ( not ( IsUnitInTransportBJ(udg_Player_Marine[x], gg_unit_h004_0005) == true ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseDown_Copy_Func012Func001Func005C takes unit firingUnit returns boolean
    if ( not ( GetUnitCurrentOrder(firingUnit) != String2OrderIdBJ("stop") ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseDown_Copy_Func012Func001Func018Func002C takes integer x returns boolean
    if ( not ( IsUnitInTransportBJ(udg_Player_Marine[x], gg_unit_h004_0005) == true ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseDown_Copy_Func012Func001Func018C takes integer x returns boolean
    if ( not ( udg_Player_MouseUpCount[x] < udg_Player_MouseDownCount[x] ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseDown_Copy_Func012Func001C takes integer x, real r, location marine_Fire_Target_md returns boolean
    if ( not ( RAbsBJ(( r - udg_LastClickedTime[x] )) < 1.00 ) ) then
        return false
    endif
    if ( not ( RAbsBJ(( GetLocationX(marine_Fire_Target_md) - GetLocationX(udg_LastClickedPoint[x]) )) < 100.00 ) ) then
        return false
    endif
    if ( not ( RAbsBJ(( GetLocationY(marine_Fire_Target_md) - GetLocationY(udg_LastClickedPoint[x]) )) < 100.00 ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseDown_Copy_Func012Func004C takes location marine_Fire_Target_md returns boolean
    if ( ( GetLocationX(marine_Fire_Target_md) != 0.00 ) ) then
        return true
    endif
    if ( ( GetLocationY(marine_Fire_Target_md) != 0.00 ) ) then
        return true
    endif
    return false
endfunction

function Trig_doubleclickshoot_onMouseDown_Copy_Func012Func005Func002C takes unit currentSelectedUnit returns boolean
    if ( not ( GetUnitTypeId(currentSelectedUnit) != 'h00B' ) ) then
        return false
    endif
    if ( not ( GetUnitTypeId(currentSelectedUnit) != 'h00A' ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseDown_Copy_Func012Func005C takes unit currentSelectedUnit returns boolean
    if ( ( currentSelectedUnit == null ) ) then
        return true
    endif
    if ( Trig_doubleclickshoot_onMouseDown_Copy_Func012Func005Func002C(currentSelectedUnit) ) then
        return true
    endif
    return false
endfunction

function Trig_doubleclickshoot_onMouseDown_Copy_Func012C takes integer x, location marine_Fire_Target_md, unit currentSelectedUnit returns boolean
    if ( not ( UnitHasBuffBJ(udg_Player_Marine[x], 'BSTN') == false ) ) then
        return false
    endif
    if ( not ( UnitHasBuffBJ(udg_Player_Marine[x], 'BPSE') == false ) ) then
        return false
    endif
    if ( not Trig_doubleclickshoot_onMouseDown_Copy_Func012Func004C(marine_Fire_Target_md) ) then
        return false
    endif
    if ( not Trig_doubleclickshoot_onMouseDown_Copy_Func012Func005C(currentSelectedUnit) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseDown_Copy_Actions takes nothing returns nothing
    local player tempplayer
	local group UG_md
	local unit firingUnit
	local unit currentSelectedUnit
	local integer x_md
	local integer marine_hash_key
	local location marine_Fire_Target_md
	local location marine_origin_md
	local real r1
	local real r2
	local real gameTimeElapsed_md
    set x_md = GetConvertedPlayerId(GetTriggerPlayer())
    set udg_Player_MouseDownCount[x_md] = 1
    set udg_Player_MouseUpCount[x_md] = 0
    set UG_md = GetUnitsSelectedAll(GetTriggerPlayer())
    set currentSelectedUnit = GroupPickRandomUnit(UG_md)
    call DestroyGroup(UG_md)
    set marine_Fire_Target_md = BlzGetTriggerPlayerMousePosition()
    set gameTimeElapsed_md = TimerGetElapsed(udg_MouseTimer)
    if ( Trig_doubleclickshoot_onMouseDown_Copy_Func012C(x_md, marine_Fire_Target_md, currentSelectedUnit) ) then
        if ( Trig_doubleclickshoot_onMouseDown_Copy_Func012Func001C(x_md, gameTimeElapsed_md, marine_Fire_Target_md) ) then
            if ( Trig_doubleclickshoot_onMouseDown_Copy_Func012Func001Func001C(x_md) ) then
                set firingUnit = gg_unit_h004_0005
            else
                set firingUnit = udg_Player_Marine[x_md]
            endif
            set marine_hash_key = GetHandleId(firingUnit)
            set marine_origin_md = GetUnitLoc(firingUnit)
            // Stehenbleiben zum schießen
            if ( Trig_doubleclickshoot_onMouseDown_Copy_Func012Func001Func005C(firingUnit) ) then
                call SetUnitPositionLocFacingLocBJ( firingUnit, marine_origin_md, marine_Fire_Target_md )
                call GroupAddUnitSimple( firingUnit, udg_UG_OrderStop )
                call EnableTrigger( gg_trg_Marine_Order_Stop )
            else
            endif
            // Shoot!
            call SetUnitFacingToFaceLocTimed( firingUnit, marine_Fire_Target_md, 0 )
            set r1 = AngleBetweenPoints(marine_origin_md, marine_Fire_Target_md)
            set r2 = DistanceBetweenPoints(marine_origin_md, marine_Fire_Target_md)
            call SaveRealBJ( r1, 37, marine_hash_key, udg_Marine_Hash )
            call SaveRealBJ( r2, 38, marine_hash_key, udg_Marine_Hash )
            call GroupAddUnitSimple( firingUnit, udg_UG_FireWhenAngleOk )
            call EnableTrigger( gg_trg_Marine_FireWhenAngleOk )
            call RemoveLocation(marine_origin_md)
            // We need this check because this trigger is executed async, while the player could already have lifted his mouse button
            call TriggerSleepAction( 0.20 )
            if ( Trig_doubleclickshoot_onMouseDown_Copy_Func012Func001Func018C(x_md) ) then
                set udg_Player_MouseDownAfterDblClick[x_md] = true
                if ( Trig_doubleclickshoot_onMouseDown_Copy_Func012Func001Func018Func002C(x_md) ) then
                    set firingUnit = gg_unit_h004_0005
                else
                    set firingUnit = udg_Player_Marine[x_md]
                endif
                call GroupAddUnitSimple( firingUnit, udg_UG_FireWhenAngleOk )
                call EnableTrigger( gg_trg_Marine_FireWhenAngleOk )
            else
            endif
        else
        endif
    else
    endif
    call RemoveLocation(udg_LastClickedPoint[x_md])
    call RemoveLocation(marine_Fire_Target_md)
    set udg_LastClickedPoint[x_md] = BlzGetTriggerPlayerMousePosition()
    set udg_LastClickedTime[x_md] = TimerGetElapsed(udg_MouseTimer)
endfunction

//===========================================================================
function InitTrig_doubleclickshoot_onMouseDown_Code takes nothing returns nothing
    set gg_trg_doubleclickshoot_onMouseDown_Code = CreateTrigger(  )
    call TriggerAddCondition( gg_trg_doubleclickshoot_onMouseDown_Code, Condition( function Trig_doubleclickshoot_onMouseDown_Copy_Conditions ) )
    call TriggerAddAction( gg_trg_doubleclickshoot_onMouseDown_Code, function Trig_doubleclickshoot_onMouseDown_Copy_Actions )
endfunction
doubleclickshoot onMouseMove
Events
Conditions
Player_MouseDownAfterDblClick[(Player number of (Triggering player))] Equal to True
Actions
Set Variable Set x_md = (Player number of (Triggering player))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[x_md] is loaded into Tank 0005 <gen>.) Equal to True
Then - Actions
Set Variable Set Marine_Fire_Unit_md = Tank 0005 <gen>
Else - Actions
Set Variable Set Marine_Fire_Unit_md = Player_Marine[x_md]
Set Variable Set Marine_Fire_P_md = (Position of Marine_Fire_Unit_md)
Set Variable Set Marine_Fire_Target_md = (Mouse Position for Triggered Mouse Event)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Marine_Fire_Unit_md is in UG_ChainsawCooldownUnits.) Equal to False
Then - Actions
Unit - Make Marine_Fire_Unit_md face Marine_Fire_Target_md over 0 seconds
Else - Actions
Custom script: set udg_Marine_Fire_UnitKey_md = GetHandleId(udg_Marine_Fire_Unit_md)
Set Variable Set r_md = (Angle from Marine_Fire_P_md to Marine_Fire_Target_md)
Set Variable Set r2_md = (Distance between Marine_Fire_P_md and Marine_Fire_Target_md)
Hashtable - Save r_md as 37 of Marine_Fire_UnitKey_md in Marine_Hash .
Hashtable - Save r2_md as 38 of Marine_Fire_UnitKey_md in Marine_Hash .
Custom script: call RemoveLocation(udg_Marine_Fire_P_md)
Custom script: call RemoveLocation(udg_Marine_Fire_Target_md)
function Trig_doubleclickshoot_onMouseMove_Code_Conditions takes nothing returns boolean
    if ( not ( udg_Player_MouseDownAfterDblClick[GetConvertedPlayerId(GetTriggerPlayer())] == true ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseMove_Code_Func003C takes integer x_md returns boolean
    if ( not ( IsUnitInTransportBJ(udg_Player_Marine[x_md], gg_unit_h004_0005) == true ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseMove_Code_Func006C takes unit firingUnit returns boolean
    if ( not ( IsUnitInGroup(firingUnit, udg_UG_ChainsawCooldownUnits) == false ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseMove_Code_Actions takes nothing returns nothing
	local unit firingUnit
	local integer x_md
	local integer marine_hash_key
	local location marine_Fire_Target_md
	local location marine_origin_md
	local real r1
	local real r2
	
    set x_md = GetConvertedPlayerId(GetTriggerPlayer())
    if ( Trig_doubleclickshoot_onMouseMove_Code_Func003C(x_md) ) then
        set firingUnit = gg_unit_h004_0005
    else
        set firingUnit = udg_Player_Marine[x_md]
    endif
    set marine_origin_md = GetUnitLoc(firingUnit)
    set marine_Fire_Target_md = BlzGetTriggerPlayerMousePosition()
    if ( Trig_doubleclickshoot_onMouseMove_Code_Func006C(firingUnit) ) then
        call SetUnitFacingToFaceLocTimed( firingUnit, marine_Fire_Target_md, 0 )
    else
    endif
    set marine_hash_key = GetHandleId(firingUnit)
    set r1 = AngleBetweenPoints(marine_origin_md, marine_Fire_Target_md)
    set r2 = DistanceBetweenPoints(marine_origin_md, marine_Fire_Target_md)
    call SaveRealBJ( r1, 37, marine_hash_key, udg_Marine_Hash )
    call SaveRealBJ( r2, 38, marine_hash_key, udg_Marine_Hash )
    call RemoveLocation(marine_origin_md)
    call RemoveLocation(marine_Fire_Target_md)
endfunction

//===========================================================================
function InitTrig_doubleclickshoot_onMouseMove_Code takes nothing returns nothing
    set gg_trg_doubleclickshoot_onMouseMove_Code = CreateTrigger(  )
    call TriggerAddCondition( gg_trg_doubleclickshoot_onMouseMove_Code, Condition( function Trig_doubleclickshoot_onMouseMove_Code_Conditions ) )
    call TriggerAddAction( gg_trg_doubleclickshoot_onMouseMove_Code, function Trig_doubleclickshoot_onMouseMove_Code_Actions )
endfunction
doubleclickshoot onMouseUp
Events
Conditions
Actions
Custom script: local player tempplayer
Set Variable Set Player_MouseUpCount[(Player number of (Triggering player))] = (Player_MouseUpCount[(Player number of (Triggering player))] + 1)
Custom script: set tempplayer = GetTriggerPlayer()
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_MouseUpCount[(Player number of (Triggering player))] Greater than or equal to Player_MouseDownCount[(Player number of (Triggering player))]
Then - Actions
Custom script: set udg_Player_MouseDownAfterDblClick[GetConvertedPlayerId(tempplayer)] = false
Else - Actions
Wait 0.05 seconds
Custom script: set udg_x_md = GetConvertedPlayerId(tempplayer)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_MouseUpCount[x_md] Greater than or equal to Player_MouseDownCount[x_md]
Then - Actions
Custom script: set udg_Player_MouseDownAfterDblClick[GetConvertedPlayerId(tempplayer)] = false
Else - Actions
function Trig_doubleclickshoot_onMouseUp_Code_Func004C takes integer x_md returns boolean
    if ( not ( udg_Player_MouseUpCount[x_md] >= udg_Player_MouseDownCount[x_md] ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseUp_Code_Func007C takes integer x_md returns boolean
    if ( not ( udg_Player_MouseUpCount[x_md] >= udg_Player_MouseDownCount[x_md] ) ) then
        return false
    endif
    return true
endfunction

function Trig_doubleclickshoot_onMouseUp_Code_Actions takes nothing returns nothing
	local integer x_md
	set x_md = GetConvertedPlayerId(GetTriggerPlayer())
    set udg_Player_MouseUpCount[x_md] = ( udg_Player_MouseUpCount[x_md] + 1 )
    
    if ( Trig_doubleclickshoot_onMouseUp_Code_Func004C(x_md) ) then
        set udg_Player_MouseDownAfterDblClick[x_md] = false
    else
    endif
    call TriggerSleepAction( 0.05 )
    set x_md = x_md
    if ( Trig_doubleclickshoot_onMouseUp_Code_Func007C(x_md) ) then
        set udg_Player_MouseDownAfterDblClick[x_md] = false
    else
    endif
endfunction

//===========================================================================
function InitTrig_doubleclickshoot_onMouseUp_Code takes nothing returns nothing
    set gg_trg_doubleclickshoot_onMouseUp_Code = CreateTrigger(  )
    call TriggerAddAction( gg_trg_doubleclickshoot_onMouseUp_Code, function Trig_doubleclickshoot_onMouseUp_Code_Actions )
endfunction
reselect marine init
Events
Map initialization
Conditions
Actions
For each (Integer A) from 1 to 6 , do (Actions)
Loop - Actions
Trigger - Add to reselect_marine_onMouseDown <gen> the event ((Player((Integer A))) issues Mouse Down event)
Trigger - Add to reselect_marine_when_selecting <gen> the event ((Player((Integer A))) Selects a unit)
reselect marine onMouseDown
Events
Conditions
(Trigger Mouse Button) Equal to Right Mouse Button
Actions
Set Variable Set UG = (Units currently selected by (Triggering player))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[(Player number of (Triggering player))] is in UG.) Equal to False
Or - Any (Conditions) are true
Conditions
(Number of units in UG) Equal to 0
And - All (Conditions) are true
Conditions
(Unit-type of (Random unit from UG)) Not equal to Stationary MG
(Unit-type of (Random unit from UG)) Not equal to Tank
(Unit-type of (Random unit from UG)) Not equal to Medic (Shop)
(Unit-type of (Random unit from UG)) Not equal to Zombie Master (Shop)
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[(Player number of (Triggering player))] is loaded into Tank 0005 <gen>.) Equal to True
Then - Actions
Selection - Select Tank 0005 <gen> for (Triggering player)
Else - Actions
Selection - Select Player_Marine[(Player number of (Triggering player))] for (Triggering player)
Else - Actions
Custom script: call DestroyGroup(udg_UG)
reselect marine when selecting
Events
Conditions
(Triggering player) Not equal to (Owner of (Triggering unit))
(Unit-type of (Triggering unit)) Not equal to Stationary MG
(Unit-type of (Triggering unit)) Not equal to Tank
(Unit-type of (Triggering unit)) Not equal to Zombie Master (Shop)
(Unit-type of (Triggering unit)) Not equal to Medic (Shop)
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[(Player number of (Triggering player))] is loaded into Tank 0005 <gen>.) Equal to True
Then - Actions
Selection - Select Tank 0005 <gen> for (Triggering player)
Else - Actions
Selection - Select Player_Marine[(Player number of (Triggering player))] for (Triggering player)
Dieser Trigger auch für Tanks
Marine Smart Order
Events
Conditions
Or - Any (Conditions) are true
Conditions
(Issued order) Equal to (Order(smart))
(Issued order) Equal to (Order(move))
Or - Any (Conditions) are true
Conditions
And - All (Conditions) are true
Conditions
(Player_Marine[(Player number of (Owner of Tank 0005 <gen>))] is loaded into Tank 0005 <gen>.) Equal to True
(Unit-type of (Triggering unit)) Equal to Tank
(Unit-type of (Triggering unit)) Not equal to Tank
Actions
Set Variable Set Marine_Fire_Unit = (Triggering unit)
Set Variable Set x = (Key (Triggering unit).)
Set Variable Set P = (Position of (Triggering unit))
Set Variable Set Player_AutouseMG[(Player number of (Owner of (Triggering unit)))] = "false"
-------- Schießen oder Jetpack steuern --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Target item of issued order) Equal to No item
Then - Actions
Set Variable Set x2 = "0"
Set Variable Set unit2 = No unit
-------- Ziel direkt angeklickt --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Target destructible of issued order) is alive) Equal to True
Then - Actions
-------- DISABLED MARINE SMART ORDER DUE TO NEW DOUBLE CLICK SHOOTING --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Stationary MG
Then - Actions
Set Variable Set Marine_Fire_Target = (Position of (Target destructible of issued order))
Set Variable Set x2 = "1"
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Target unit of issued order) is alive) Equal to True
((Target unit of issued order) is A flying unit) Equal to False
Then - Actions
Set Variable Set Marine_Fire_Target = (Position of unit2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of (Target unit of issued order)) is an enemy of (Owner of (Triggering unit)).) Equal to True
Or - Any (Conditions) are true
Conditions
(Unit-type of (Target unit of issued order)) Equal to Barricade
(Race of (Target unit of issued order)) Not equal to Orc
Then - Actions
-------- DISABLED MARINE SMART ORDER DUE TO NEW DOUBLE CLICK SHOOTING --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Stationary MG
Then - Actions
-------- Gegner angeklickt --------
Set Variable Set unit2 = (Target unit of issued order)
Else - Actions
Else - Actions
-------- MG angeklickt --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Target unit of issued order)) Equal to Stationary MG
(Owner of (Target unit of issued order)) Equal to Neutral Passive
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Issued order) Equal to (Order(smart))
Then - Actions
Set Variable Set unit2 = (Target unit of issued order)
Else - Actions
Else - Actions
Else - Actions
Set Variable Set Marine_Fire_Target = (Target point of issued order)
-------- Ziel indirekt angeklickt (AoE) --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Issued order) Equal to (Order(smart))
unit2 Equal to No unit
(Load 16 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Then - Actions
-------- MGs/Gegner picken --------
Set Variable Set r2 = "999.00"
Set Variable Set UG = (Units within 150.00 of Marine_Fire_Target matching ((((Matching unit) is alive) Equal to True) and (((Race of (Matching unit)) Not equal to Orc) and (((Matching unit) is A flying unit) Equal to False))).)
Set Variable Set player = (Owner of (Triggering unit))
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Custom script: if IsUnitVisible(GetEnumUnit(), udg_player) then
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) belongs to an enemy of (Owner of (Triggering unit)).) Equal to True
Then - Actions
-------- DISABLED MARINE SMART ORDER DUE TO NEW DOUBLE CLICK SHOOTING --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Stationary MG
Then - Actions
-------- Gegner --------
Set Variable Set P2 = (Position of (Picked unit))
Set Variable Set r = (Distance between Marine_Fire_Target and P2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Less than r2
Then - Actions
Set Variable Set r2 = r
Set Variable Set unit2 = (Picked unit)
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Else - Actions
Else - Actions
-------- MG --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unit2 Equal to No unit
(Unit-type of (Picked unit)) Equal to Stationary MG
(Owner of (Picked unit)) Equal to Neutral Passive
Then - Actions
Set Variable Set unit2 = (Picked unit)
Else - Actions
Custom script: endif
Custom script: call DestroyGroup(udg_UG)
Else - Actions
-------- Aktionen ausführen --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 16 of (Key (Triggering unit).) from Marine_Hash.) Equal to False
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit2) Equal to Stationary MG
(Load 3 of x from Marine_Hash.) Not equal to 1
Then - Actions
-------- MG angeklickt --------
Set Variable Set P2 = (Position of unit2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P2) Less than 200.00
Then - Actions
Unit - Move (Triggering unit) instantly to P , facing Marine_Fire_Target
Unit Group - Add (Triggering unit) to UG_OrderStop
Trigger - Turn on Marine_Order_Stop <gen>
Selection - Select unit2 for (Owner of (Triggering unit))
Else - Actions
Set Variable Set Marine_Fire_P = (Marine_Fire_Target offset by 64.00 towards (SMG_DefaultAngle[(Custom value of unit2)] + 180.00) degrees.)
Set Variable Set Player_AutouseMG[(Player number of (Owner of (Triggering unit)))] = "true"
Trigger - Turn off (This trigger)
Unit - Order (Triggering unit) to Move To . Marine_Fire_P
Trigger - Turn on (This trigger)
Custom script: call RemoveLocation(udg_Marine_Fire_P)
Set Variable Set x2 = "1"
Custom script: call RemoveLocation(udg_P2)
Else - Actions
Hashtable - Save False as 41 of (Key (Triggering unit).) in Marine_Hash .
-------- Gegner/Dest angeklickt --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unit2 Not equal to No unit
(unit2 is A flying unit) Equal to False
Then - Actions
-------- Nur bei SmartOrder unit-target einstellen, bei move auf punkt schießen --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Issued order) Equal to (Order(smart))
(Load 3 of x from Marine_Hash.) Equal to 0
Then - Actions
Hashtable - Save True as 41 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save Handle Of unit2 as 42 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
Custom script: call RemoveLocation(udg_Marine_Fire_Target)
Set Variable Set Marine_Fire_Target = (Position of unit2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Equal to 0
Then - Actions
Destructible - Pick every destructible within 128.00 of Marine_Fire_Target and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Destructible-type of (Picked destructible)) Equal to B00F (Unexpected type: 'destructablecode')
((Picked destructible) is alive) Equal to True
Then - Actions
Set Variable Set x2 = "1"
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Load 3 of x from Marine_Hash.) Equal to 1
unit2 Not equal to No unit
x2 Equal to 1
(Issued order) Equal to (Order(move))
Then - Actions
Set Variable Set Marine_Fire_Item = (Load 8 of (Key (Triggering unit).) in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
unit2 Equal to No unit
(Custom value of Marine_Fire_Item) Greater than or equal to 0
Then - Actions
Set Variable Set r3 = (Load 20 of (Custom value of Marine_Fire_Item) from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unit2 Not equal to No unit
(Distance between P and Marine_Fire_Target) Greater than r3
r3 Greater than 0.00
(Load 3 of x from Marine_Hash.) Not equal to 1
Then - Actions
-------- Wenn out of weapon range erst hinlaufen --------
Trigger - Turn off (This trigger)
Unit - Order (Triggering unit) to Right-Click . unit2
Trigger - Turn on (This trigger)
Else - Actions
-------- Stehenbleiben zum schießen --------
Unit - Move (Triggering unit) instantly to P , facing Marine_Fire_Target
Unit Group - Add (Triggering unit) to UG_OrderStop
Trigger - Turn on Marine_Order_Stop <gen>
Else - Actions
-------- Wenn out of weapon range (chainsaw) erst hinlaufen --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of Marine_Fire_Item) Less than 0
(Load 3 of x from Marine_Hash.) Not equal to 1
Then - Actions
Trigger - Turn off (This trigger)
Unit - Order (Triggering unit) to Right-Click . unit2
Trigger - Turn on (This trigger)
Else - Actions
-------- Bei Rechtsklick nur schießen wenn nicht innerhalb splash range (Flammenwerfer ausschließen) --------
Set Variable Set r = (Load 18 of (Custom value of Marine_Fire_Item) from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Or - Any (Conditions) are true
Conditions
(Distance between P and Marine_Fire_Target) Greater than (r + 100.00)
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rFlamethrower|cff7DBEF1]
(Load 3 of x from Marine_Hash.) Equal to 1
(Issued order) Equal to (Order(move))
Then - Actions
Unit - Make (Triggering unit) face Marine_Fire_Target over 0 seconds
Set Variable Set r = (Angle from P to Marine_Fire_Target)
Set Variable Set r2 = (Distance between P and Marine_Fire_Target)
Hashtable - Save r as 37 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save r2 as 38 of (Key (Triggering unit).) in Marine_Hash .
Unit Group - Add (Triggering unit) to UG_FireWhenAngleOk
Trigger - Turn on Marine_FireWhenAngleOk <gen>
Else - Actions
Else - Actions
Else - Actions
-------- Jetpack steuern --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 43 of (Key (Triggering unit).) from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set P2 = (Load 44 of (Key (Triggering unit).) in Marine_Hash.)
Custom script: call RemoveLocation(udg_P2)
Else - Actions
Hashtable - Save True as 43 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save Handle Of (Marine_Fire_Target offset by 1.00 towards 0 degrees.) as 44 of (Key (Triggering unit).) in Marine_Hash .
Unit - Move (Triggering unit) instantly to P , facing Marine_Fire_Target
Unit Group - Add (Triggering unit) to UG_OrderStop
Trigger - Turn on Marine_Order_Stop <gen>
Custom script: call RemoveLocation(udg_Marine_Fire_Target)
Else - Actions
-------- Item angeklickt --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 16 of (Key (Triggering unit).) from Marine_Hash.) Equal to True
Then - Actions
Unit - Move (Triggering unit) instantly to P , facing Marine_Fire_Target
Unit Group - Add (Triggering unit) to UG_OrderStop
Trigger - Turn on Marine_Order_Stop <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Target item of issued order) Equal to No item
Then - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 16 of (Key (Triggering unit).) from Marine_Hash.) Equal to True
Then - Actions
Unit - Move (Triggering unit) instantly to P , facing Marine_Fire_Target
Unit Group - Add (Triggering unit) to UG_OrderStop
Trigger - Turn on Marine_Order_Stop <gen>
Else - Actions
Custom script: call RemoveLocation(udg_P)
Marine Order Stop
Events
Time - Every 0.01 seconds of game time
Conditions
Actions
Set Variable Set IsTriggerOrder = "true"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_OrderStop) Greater than 0
Then - Actions
Unit Group - Pick every unit in UG_OrderStop and do (Actions)
Loop - Actions
Unit Group - Remove (Picked unit) from UG_OrderStop .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 3 of (Key (Picked unit).) from Marine_Hash.) Equal to 1
Then - Actions
Trigger - Turn off Marine_ToggleClickAction <gen>
Unit - Order (Picked unit) to Hold Position .
Trigger - Turn on Marine_ToggleClickAction <gen>
Else - Actions
Unit - Order (Picked unit) to Stop .
Else - Actions
Trigger - Turn off (This trigger)
Set Variable Set IsTriggerOrder = "false"
Marine FireWhenAngleOk
Events
Time - Every 0.05 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_FireWhenAngleOk) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
Unit Group - Pick every unit in UG_FireWhenAngleOk and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is alive) Equal to False
Then - Actions
Unit Group - Remove (Picked unit) from UG_FireWhenAngleOk .
Else - Actions
Set Variable Set r = (Load 37 of (Key (Picked unit).) from Marine_Hash.)
Set Variable Set r2 = (Load 38 of (Key (Picked unit).) from Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is in UG_ChainsawCooldownUnits.) Equal to False
Or - Any (Conditions) are true
Conditions
(Abs(((Facing of (Picked unit)) - r))) Less than 12.00
(Abs(((Facing of (Picked unit)) - r))) Greater than 348.00
Then - Actions
Set Variable Set Marine_Fire_Unit = (Picked unit)
Set Variable Set P = (Position of Marine_Fire_Unit)
Set Variable Set Marine_Fire_Item = (Load 8 of (Key (Picked unit).) in Marine_Hash.)
-------- Weapon min Range beachten (wie bei chainsaw) --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 41 of (Key (Picked unit).) from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set unit2 = (Load 42 of (Key (Picked unit).) in Marine_Hash.)
Set Variable Set P2 = (Position of unit2)
Set Variable Set r3 = (Load 20 of (Custom value of Marine_Fire_Item) from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
And - All (Conditions) are true
Conditions
(Custom value of Marine_Fire_Item) Greater than or equal to 0
Or - Any (Conditions) are true
Conditions
(Distance between P and P2) Less than r3
r3 Equal to 0.00
And - All (Conditions) are true
Conditions
(Custom value of Marine_Fire_Item) Less than 0
(Distance between P and P2) Less than (128.00 + (Real((Point-value of unit2))))
Then - Actions
Unit - Move (Picked unit) instantly to P
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Player number of (Owner of (Picked unit))) Greater than Maxplayers
Player_MouseDownAfterDblClick[(Player number of (Owner of (Picked unit)))] Equal to False
Then - Actions
Unit Group - Remove (Picked unit) from UG_FireWhenAngleOk .
Else - Actions
-------- Keep firing while mouse is held down --------
Unit Group - Add (Picked unit) to UG_OrderStop
Trigger - Turn on Marine_Order_Stop <gen>
-------- Meele attack oder normal --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Marine
(Custom value of Marine_Fire_Item) Less than 0
Then - Actions
Set Variable Set Marine_Fire_Target = (P offset by 96.00 towards (Angle from P to P2) degrees.)
Unit - Make Marine_Fire_Unit face ((Angle from P to Marine_Fire_Target) - 60.00) over 0 seconds
Trigger - Run Marine_ExecMeele <gen> (checking conditions)
Else - Actions
-------- Vorhalten --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Current order of unit2) Not equal to (Order())
(Current order of unit2) Not equal to (Order(stop))
(Current order of unit2) Not equal to (Order(holdposition))
(unit2 is in UG_UnitsThatAreAttacking.) Equal to False
Then - Actions
Custom script: set udg_x = GetHandleId(udg_Marine_Fire_Unit)
Set Variable Set r2 = (Distance between P and P2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Picked unit)) Equal to Armed Citizen
(Unit-type of (Picked unit)) Equal to Sentry Bot
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rGhoul-Cannon|cff7DBEF1]
Then - Actions
Set Variable Set r4 = "64.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Tank
Then - Actions
Set Variable Set r4 = "32.00"
Else - Actions
Set Variable Set r4 = (Load 17 of (Custom value of (Load 8 of x in Marine_Hash.)) from WeaponData_Hash.)
Set Variable Set r4 = (r4 / 0.03)
Set Variable Set r3 = (Current movement speed of unit2)
Set Variable Set r3 = (r4 / r3)
Set Variable Set r3 = (r3 x r3)
Set Variable Set r3 = (1.00 - r3)
Set Variable Set r5 = (Angle from P2 to P)
Set Variable Set r5 = ((Facing of unit2) - r5)
Set Variable Set r5 = (180.00 - r5)
Set Variable Set r5 = (Cos(r5))
Set Variable Set r6 = (Square root(((r5 x r5) - r3)))
Set Variable Set r = (r5 + r6)
Set Variable Set r = (r / r3)
Set Variable Set r = (r x r2)
Set Variable Set r = (Abs(r))
Else - Actions
Set Variable Set r = "0.01"
Set Variable Set Marine_Fire_Target = (P2 offset by r towards (Facing of unit2) degrees.)
Trigger - Run Marine_ExecFire <gen> (checking conditions)
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Player number of (Owner of (Picked unit))) Greater than Maxplayers
Player_MouseDownAfterDblClick[(Player number of (Owner of (Picked unit)))] Equal to False
Then - Actions
Unit Group - Remove (Picked unit) from UG_FireWhenAngleOk .
Else - Actions
-------- Keep firing while mouse is held down --------
-------- Meele attack oder normal --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Marine
(Custom value of Marine_Fire_Item) Less than 0
Then - Actions
Set Variable Set Marine_Fire_Target = (P offset by 128.00 towards r degrees.)
Unit - Make Marine_Fire_Unit face ((Angle from P to Marine_Fire_Target) - 60.00) over 0 seconds
Trigger - Run Marine_ExecMeele <gen> (checking conditions)
Else - Actions
Set Variable Set Marine_Fire_Target = (P offset by r2 towards r degrees.)
Trigger - Run Marine_ExecFire <gen> (checking conditions)
Custom script: call RemoveLocation(udg_P)
Custom script: call RemoveLocation(udg_Marine_Fire_Target)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 41 of (Key (Picked unit).) from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set unit2 = (Load 42 of (Key (Picked unit).) in Marine_Hash.)
Unit - Make (Picked unit) face unit2 over 0 seconds
Else - Actions
Marine ExecFire
Events
Conditions
Actions
-------- Nicht während reload --------
Custom script: set udg_Marine_Fire_UnitKey = GetHandleId(udg_Marine_Fire_Unit)
Set Variable Set Marine_Fire_Item = (Load 8 of Marine_Fire_UnitKey in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rxm1014|cff7DBEF1]
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
(Load 2 of Marine_Fire_UnitKey from Marine_Hash.) Equal to True
Then - Actions
Hashtable - Save False as 2 of Marine_Fire_UnitKey in Marine_Hash .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
Then - Actions
Set Variable Set P_SoundPlay = (Position of Marine_Fire_Unit)
Sound - Play m3_pump <gen> at 100 % volume, located at P_SoundPlay with Z offset 0
Custom script: call RemoveLocation(udg_P_SoundPlay)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
Then - Actions
Set Variable Set P_SoundPlay = (Position of Marine_Fire_Unit)
Sound - Play m249_coverup <gen> at 100 % volume, located at P_SoundPlay with Z offset 0
Custom script: call RemoveLocation(udg_P_SoundPlay)
Else - Actions
Skip remaining actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 2 of Marine_Fire_UnitKey from Marine_Hash.) Equal to True
Then - Actions
Skip remaining actions
Else - Actions
-------- Nur mit Waffe schießen --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of Marine_Fire_Unit) Not equal to Stationary MG
(Unit-type of Marine_Fire_Unit) Not equal to Sentry Bot
(Unit-type of Marine_Fire_Unit) Not equal to Armed Citizen
(Unit-type of Marine_Fire_Unit) Not equal to Tank
Or - Any (Conditions) are true
Conditions
Marine_Fire_Item Equal to No item
(Marine_Fire_Unit has Marine_Fire_Item) Equal to False
Then - Actions
Skip remaining actions
Else - Actions
-------- Nur wenn Ammo im Magazin --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Charges remaining in Marine_Fire_Item) Less than or equal to 0
(Unit-type of Marine_Fire_Unit) Not equal to Stationary MG
(Unit-type of Marine_Fire_Unit) Not equal to Sentry Bot
(Unit-type of Marine_Fire_Unit) Not equal to Armed Citizen
(Unit-type of Marine_Fire_Unit) Not equal to Tank
Then - Actions
Set Variable Set Marine_Reload_Unit = Marine_Fire_Unit
Trigger - Run Marine_Reload <gen> (checking conditions)
-------- NoAmmoSound --------
Set Variable Set P_SoundPlay = (Position of Marine_Fire_Unit)
Set Variable Set x_SoundPlay = "3"
Trigger - Run Sound_Play_xSoundPlay <gen> (checking conditions)
Skip remaining actions
Else - Actions
-------- Nur wenn keine Cast Time von vorigen Schüssen --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 10 of Marine_Fire_UnitKey from Marine_Hash.) Greater than 0.00
Then - Actions
Skip remaining actions
Else - Actions
-------- Salve size --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of Marine_Fire_Unit) Equal to Stationary MG
(Unit-type of Marine_Fire_Unit) Equal to Sentry Bot
(Unit-type of Marine_Fire_Unit) Equal to Armed Citizen
(Unit-type of Marine_Fire_Unit) Equal to Tank
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rGhoul-Cannon|cff7DBEF1]
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of Marine_Fire_Unit) Equal to Tank
(Unit-type of Marine_Fire_Unit) Equal to Armed Citizen
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rGhoul-Cannon|cff7DBEF1]
Then - Actions
Hashtable - Save 1 as 7 of Marine_Fire_UnitKey in Marine_Hash .
Else - Actions
Hashtable - Save 5 as 7 of Marine_Fire_UnitKey in Marine_Hash .
Hashtable - Save 0.00 as 10 of Marine_Fire_UnitKey in Marine_Hash .
Else - Actions
Hashtable - Save (Load 9 of (Custom value of (Load 8 of Marine_Fire_UnitKey in Marine_Hash.)) from WeaponData_Hash.) as 7 of Marine_Fire_UnitKey in Marine_Hash .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Marine_Fire_Unit is in UG_SpawnBullets.) Equal to False
(Load 10 of Marine_Fire_UnitKey from Marine_Hash.) Equal to 0.00
Then - Actions
Hashtable - Save (Load 7 of (Custom value of (Load 8 of Marine_Fire_UnitKey in Marine_Hash.)) from WeaponData_Hash.) as 10 of Marine_Fire_UnitKey in Marine_Hash .
Else - Actions
-------- --------
Set Variable Set Marine_Fire_P = (Load 1 of Marine_Fire_UnitKey in Marine_Hash.)
Custom script: call RemoveLocation(udg_Marine_Fire_P)
Hashtable - Save Handle Of (Marine_Fire_Target offset by 0.01 towards 0 degrees.) as 1 of Marine_Fire_UnitKey in Marine_Hash .
Unit Group - Add Marine_Fire_Unit to UG_SpawnBullets
Trigger - Turn on Marine_SpawnBullets <gen>
Marine ExecMeele
Events
Conditions
Actions
Custom script: local unit cdunit
-------- Nicht während reload --------
Custom script: set udg_Marine_Fire_UnitKey = GetHandleId(udg_Marine_Fire_Unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rChainsaw|cff7DBEF1]
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rGauntlet|cff7DBEF1]
Then - Actions
-------- Damage --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rChainsaw|cff7DBEF1]
Then - Actions
Set Variable Set r = "150.00"
Else - Actions
Set Variable Set r = "300.00"
Set Variable Set UG = (Units within 96.00 of Marine_Fire_Target matching (((((Matching unit) is alive) Equal to True) and ((Race of (Matching unit)) Not equal to Orc)) and (((Owner of Marine_Fire_Unit) is an enemy of (Owner of (Matching unit)).) Equal to True)).)
Set Variable Set x2 = (Number of units in UG)
Custom script: set udg_r3 = GetLocationZ(udg_P)
Set Variable Set r3 = (r3 + (Current flying height of Marine_Fire_Unit))
Set Variable Set x3 = "0"
For each (Integer A) from 1 to x2 , do (Actions)
Loop - Actions
Set Variable Set unit2 = (Random unit from UG)
Unit Group - Remove unit2 from UG .
Set Variable Set P3 = (Position of unit2)
Custom script: set udg_r4 = GetLocationZ(udg_P3)
Set Variable Set r4 = (r4 + (Current flying height of unit2))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((r3 - r4))) Less than 100.00
Then - Actions
Unit - Cause Marine_Fire_Unit to damage unit2 , dealing r damage of attack type Normal and damage type Normal
Set Variable Set x3 = "1"
Else - Actions
Custom script: call RemoveLocation(udg_P3)
Custom script: call DestroyGroup(udg_UG)
-------- Sound --------
Set Variable Set P_SoundPlay = (Marine_Fire_Target offset by (0.01, 0))
Set Variable Set x_SoundPlay = "4"
Trigger - Run Sound_Play_xSoundPlay <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 1
Then - Actions
-------- Sound --------
Set Variable Set P_SoundPlay = (Marine_Fire_Target offset by (0.01, 0))
Set Variable Set x_SoundPlay = "5"
Trigger - Run Sound_Play_xSoundPlay <gen> (checking conditions)
Else - Actions
-------- CD --------
Unit Group - Add Marine_Fire_Unit to UG_ChainsawCooldownUnits
Custom script: set cdunit = udg_Marine_Fire_Unit
Custom script: call RemoveLocation(udg_Marine_Fire_Target)
Wait 0.50 seconds
Custom script: set udg_Marine_Fire_Unit = cdunit
Unit Group - Remove Marine_Fire_Unit from UG_ChainsawCooldownUnits .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_MouseDownAfterDblClick[(Player number of (Owner of Marine_Fire_Unit))] Equal to True
Then - Actions
Custom script: set udg_Marine_Fire_UnitKey = GetHandleId(udg_Marine_Fire_Unit)
Set Variable Set r = (Load 37 of Marine_Fire_UnitKey from Marine_Hash.)
Set Variable Set P = (Position of Marine_Fire_Unit)
Set Variable Set Marine_Fire_Target = (P offset by 128.00 towards r degrees.)
Unit - Make Marine_Fire_Unit face ((Angle from P to Marine_Fire_Target) - 0.00) over 0 seconds
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_Marine_Fire_Target)
41: FireTarget is unit (bool) fuer vorhalten bei cast time weapons
42: FireTarget unit
Marine SpawnBullets
Events
Time - Every 0.01 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Number of units in UG_SpawnBullets) Greater than 0
(Number of units in UG_RemoveLightning) Greater than 0
Then - Actions
Unit Group - Pick every unit in UG_RemoveLightning and do (Actions)
Loop - Actions
Set Variable Set unit = (Picked unit)
Custom script: set udg_x = GetHandleId(udg_unit)
Set Variable Set r = (Load 1010 of x from Marine_Hash.)
Set Variable Set r = (r - 0.01)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Less than or equal to 0.00
Then - Actions
Unit Group - Remove (Picked unit) from UG_RemoveLightning .
Set Variable Set x3 = (Load 1000 of x from Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Greater than 0
Then - Actions
Hashtable - Save 0 as 1000 of x in Marine_Hash .
For each (Integer A) from 1 to x3 , do (Actions)
Loop - Actions
Lightning - Destroy (Load (1000 + (Integer A)) of x in Marine_Hash.)
Else - Actions
Else - Actions
Hashtable - Save r as 1010 of x in Marine_Hash .
Unit Group - Pick every unit in UG_SpawnBullets and do (Actions)
Loop - Actions
Set Variable Set unit = (Picked unit)
Custom script: set udg_x = GetHandleId(udg_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 unit) Equal to Stationary MG
(Unit-type of unit) Equal to Sentry Bot
(Unit-type of unit) Equal to Armed Citizen
(Unit-type of unit) Equal to Tank
And - All (Conditions) are true
Conditions
(Load 8 of x in Marine_Hash.) Not equal to No item
(unit has (Load 8 of x in Marine_Hash.)) Equal to True
Then - Actions
-------- Cast time --------
Set Variable Set r3 = (Load 10 of x from Marine_Hash.)
Set Variable Set r3 = (r3 - 0.01)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r3 Less than 0.00
Then - Actions
Set Variable Set r3 = "0.00"
Else - Actions
Hashtable - Save r3 as 10 of x in Marine_Hash .
-------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r3 Equal to 0.00
Then - Actions
Set Variable Set P = (Position of unit)
-------- Benötigte Variablen --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of unit) Equal to Stationary MG
(Unit-type of unit) Equal to Sentry Bot
(Unit-type of unit) Equal to Armed Citizen
(Unit-type of unit) Equal to Tank
Then - Actions
Set Variable Set Marine_Fire_WeaponTypeIndex = "100"
Set Variable Set Marine_Fire_Item = No item
Custom script: set udg_Marine_Fire_ItemKey = 0
Set Variable Set Marine_Fire_Target = (P offset by 500.00 towards (Facing of unit) degrees.)
Else - Actions
Set Variable Set Marine_Fire_Item = (Load 8 of x in Marine_Hash.)
Custom script: set udg_Marine_Fire_ItemKey = GetHandleId(udg_Marine_Fire_Item)
Set Variable Set Marine_Fire_WeaponTypeIndex = (Custom value of Marine_Fire_Item)
Set Variable Set Marine_Fire_Target = (Load 1 of x in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Tank
Then - Actions
Set Variable Set Marine_Fire_WeaponTypeIndex = "101"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Armed Citizen
Then - Actions
Set Variable Set Marine_Fire_WeaponTypeIndex = "102"
Else - Actions
-------- Salve Missle Remaining (wie viele noch zu spawnen sind) --------
Set Variable Set x2 = (Load 7 of x from Marine_Hash.)
-------- Fire Rate/Cooldown --------
Set Variable Set r3 = (Load 9 of x from Marine_Hash.)
Set Variable Set r3 = (r3 - 0.01)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r3 Less than 0.00
Then - Actions
Set Variable Set r3 = "0.00"
Else - Actions
Hashtable - Save r3 as 9 of x in Marine_Hash .
-------- Munition --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Stationary MG
Then - Actions
Set Variable Set x3 = SMG_Ammo[(Custom value of unit)]
Else - Actions
Set Variable Set x3 = (Charges remaining in Marine_Fire_Item)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of unit) Equal to Sentry Bot
(Unit-type of unit) Equal to Armed Citizen
(Unit-type of unit) Equal to Tank
Then - Actions
Set Variable Set x3 = (Integer((Mana of unit)))
Else - Actions
-------- Winkelabfrage falls man sich während Zielen/CastTime wegdreht --------
Set Variable Set r = (Angle from P to Marine_Fire_Target)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 0
x3 Greater than 0
r3 Equal to 0.00
Or - Any (Conditions) are true
Conditions
(Abs(((Facing of unit) - r))) Greater than or equal to 330.00
(Abs(((Facing of unit) - r))) Less than or equal to 30.00
Then - Actions
-------- Bei Weapons mit Cast time vorhalten --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 7 of (Custom value of Marine_Fire_Item) from WeaponData_Hash.) Greater than 0.00
(Load 41 of x from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set Marine_Fire_P = Marine_Fire_Target
Set Variable Set unit2 = (Load 42 of x in Marine_Hash.)
Set Variable Set P2 = (Position of unit2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Current order of unit2) Not equal to (Order())
(Current order of unit2) Not equal to (Order(stop))
(Current order of unit2) Not equal to (Order(holdposition))
(unit2 is in UG_UnitsThatAreAttacking.) Equal to False
Then - Actions
Set Variable Set r2 = (Distance between P and P2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of unit) Equal to Armed Citizen
(Unit-type of unit) Equal to Sentry Bot
Then - Actions
Set Variable Set r4 = "64.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Tank
Then - Actions
Set Variable Set r4 = "32.00"
Else - Actions
Set Variable Set r4 = (Load 17 of (Custom value of (Load 8 of x in Marine_Hash.)) from WeaponData_Hash.)
Set Variable Set r4 = (r4 / 0.03)
Set Variable Set r3 = (Current movement speed of unit2)
Set Variable Set r3 = (r4 / r3)
Set Variable Set r3 = (r3 x r3)
Set Variable Set r3 = (1.00 - r3)
Set Variable Set r5 = (Angle from P2 to P)
Set Variable Set r5 = ((Facing of unit2) - r5)
Set Variable Set r5 = (180.00 - r5)
Set Variable Set r5 = (Cos(r5))
Set Variable Set r6 = (Square root(((r5 x r5) - r3)))
Set Variable Set r = (r5 + r6)
Set Variable Set r = (r / r3)
Set Variable Set r = (r x r2)
Set Variable Set r = (Abs(r))
Else - Actions
Set Variable Set r = "0.01"
Set Variable Set Marine_Fire_Target = (P2 offset by r towards (Facing of unit2) degrees.)
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_Marine_Fire_P)
Set Variable Set r = (Angle from P to Marine_Fire_Target)
Else - Actions
-------- Salve Missle Remaining --------
Set Variable Set x2 = (x2 - 1)
Hashtable - Save x2 as 7 of x in Marine_Hash .
-------- Fire Rate/Cooldown --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rGhoul-Cannon|cff7DBEF1]
Then - Actions
Set Variable Set r3 = "1.00"
Else - Actions
Set Variable Set r3 = (Load 8 of Marine_Fire_WeaponTypeIndex from WeaponData_Hash.)
Hashtable - Save r3 as 9 of x in Marine_Hash .
-------- Angle --------
Set Variable Set r2 = (Load 6 of x from Marine_Hash.)
Set Variable Set r3 = (Load 3 of Marine_Fire_WeaponTypeIndex from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Less than r3
Then - Actions
Set Variable Set r2 = r3
Else - Actions
Set Variable Set r3 = (Load 4 of Marine_Fire_WeaponTypeIndex from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Greater than r3
Then - Actions
Set Variable Set r2 = r3
Else - Actions
Hashtable - Save r2 as 6 of x in Marine_Hash .
-------- Burst Ammo --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 16 of x from Marine_Hash.) Equal to 3
Then - Actions
Set Variable Set r2 = (r2 x 2.00)
Else - Actions
-------- Ammo reduce --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Not equal to Stationary MG
(Unit-type of unit) Not equal to Sentry Bot
(Unit-type of unit) Not equal to Armed Citizen
(Unit-type of unit) Not equal to Tank
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rCoil Gun C43|cff7DBEF1]
Then - Actions
Set Variable Set P2 = (P offset by 350.00 towards r degrees.)
Set Variable Set UG = (Units within 400.00 of P2 matching ((((((Matching unit) is alive) Equal to True) and (((Matching unit) is A flying unit) Equal to False)) and ((Race of (Matching unit)) Not equal to Orc)) and (((Owner of unit) is an enemy of (Owner of (Matching unit)).) Equal to True)).)
Custom script: call RemoveLocation(udg_P2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG) Greater than 0
Then - Actions
Animation - Play unit 's attack animation
Animation - Queue unit 's stand animation
Set Variable Set x3 = (x3 - (Number of units in UG))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Less than 0
Then - Actions
Set Variable Set x3 = "0"
Else - Actions
Else - Actions
Else - Actions
Animation - Play unit 's attack animation
Animation - Queue unit 's stand animation
Set Variable Set x3 = (x3 - 1)
Item - Set charges remaining in Marine_Fire_Item to x3
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 0
Then - Actions
Set Variable Set Marine_Reload_Unit = unit
Hashtable - Save True as 4 of Marine_Fire_ItemKey in Hash_Main .
Trigger - Run Marine_Reload <gen> (checking conditions)
Else - Actions
Else - Actions
Animation - Play unit 's attack animation
Animation - Queue unit 's stand animation
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Not equal to Sentry Bot
(Unit-type of unit) Not equal to Armed Citizen
(Unit-type of unit) Not equal to Tank
Then - Actions
Set Variable Set SMG_Heat[(Custom value of unit)] = (SMG_Heat[(Custom value of unit)] + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
SMG_Heat[(Custom value of unit)] Greater than or equal to SMG_HeatCritical
Then - Actions
Unit - Change ownership of unit to Neutral Passive and Change color
Special Effect - Destroy (Load 11 of x in Marine_Hash.)
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of unit using Abilities\Spells\Human\Feedback\SpellBreakerAttack.mdl
Hashtable - Save Handle Of (Last created special effect) as 11 of x in Marine_Hash .
Else - Actions
Set Variable Set P_SoundPlay = (Position of unit)
Set Variable Set x_SoundPlay = "2"
Trigger - Run Sound_Play_xSoundPlay <gen> (checking conditions)
Set Variable Set x3 = (x3 - 1)
Set Variable Set SMG_Ammo[(Custom value of unit)] = x3
Trigger - Run SMG_Ammo_Float <gen> (checking conditions)
Else - Actions
Set Variable Set x3 = (x3 - 1)
Unit - Set mana of unit to (Real(x3))
-------- X bullets per "bullet" --------
Set Variable Set x3 = (Load 11 of Marine_Fire_WeaponTypeIndex from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Less than 1
Then - Actions
Set Variable Set x3 = "1"
Else - Actions
-------- Bullet/ammo type --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rxm1014|cff7DBEF1]
Then - Actions
-------- 201 weil schon 1 charge abgezogen wurde --------
Set Variable Set x5 = (Load (201 + (Charges remaining in Marine_Fire_Item)) of Marine_Fire_ItemKey from Hash_Main.)
Else - Actions
Set Variable Set x5 = (Load 5 of Marine_Fire_ItemKey from Hash_Main.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rCoil Gun C43|cff7DBEF1]
Then - Actions
-------- Lightning gun --------
Set Variable Set x3 = (Number of units in UG)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Greater than 0
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Greater than 5
Then - Actions
Set Variable Set x3 = "5"
Else - Actions
Custom script: set udg_z1 = GetLocationZ(udg_P)
Set Variable Set z1 = (z1 + (Current flying height of unit))
Set Variable Set z1 = (z1 + 30.00)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 1000 of x from Marine_Hash.) Greater than 0
Then - Actions
For each (Integer A) from 1 to (Load 1000 of x from Marine_Hash.) , do (Actions)
Loop - Actions
Lightning - Destroy (Load (1000 + (Integer A)) of x in Marine_Hash.)
Else - Actions
Hashtable - Save x3 as 1000 of x in Marine_Hash .
Hashtable - Save 0.20 as 1010 of x in Marine_Hash .
Unit Group - Add unit to UG_RemoveLightning
For each (Integer A) from 1 to x3 , do (Actions)
Loop - Actions
Set Variable Set unit2 = (Random unit from UG)
Unit Group - Remove unit2 from UG .
Set Variable Set P3 = (Position of unit2)
Custom script: set udg_z2 = GetLocationZ(udg_P3)
Set Variable Set z2 = (z2 + (Current flying height of unit2))
Set Variable Set z2 = (z2 + 60.00)
Custom script: set udg_lightning = AddLightningEx ("CLPB",true, GetLocationX(udg_P), GetLocationY(udg_P), udg_z1, GetLocationX(udg_P3), GetLocationY(udg_P3), udg_z2)
Hashtable - Save Handle Of lightning as (1000 + (Integer A)) of x in Marine_Hash .
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of unit2 using Abilities\Weapons\FarseerMissile\FarseerMissile.mdl
Special Effect - Destroy (Last created special effect)
Custom script: call RemoveLocation(udg_P3)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit2) Equal to Marine
Then - Actions
Unit - Cause unit to damage unit2 , dealing (40.00 x Game_Options_MissleDmgFactor) damage of attack type Magic and damage type Magic
Else - Actions
Unit - Cause unit to damage unit2 , dealing 80.00 damage of attack type Magic and damage type Magic
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 41 of x from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set unit2 = (Load 42 of x in Marine_Hash.)
Else - Actions
-------- Other guns --------
For each (Integer A) from 1 to x3 , do (Actions)
Loop - Actions
-------- Verziehen/Hold breath --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 45 of x from Marine_Hash.) Greater than 0.00
Or - Any (Conditions) are true
Conditions
And - All (Conditions) are true
Conditions
(Item-type of Marine_Fire_Item) Not equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
(Item-type of Marine_Fire_Item) Not equal to |cff7DBEF1Weapon [|rxm1014|cff7DBEF1]
(Integer A) Equal to 1
Then - Actions
Set Variable Set r2 = r
Else - Actions
Set Variable Set r2 = (Load 6 of x from Marine_Hash.)
Set Variable Set r2 = (r + (Random real number between (-1.00 x r2) and (1 x r2)))
-------- Ghoul-Cannon --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rGhoul-Cannon|cff7DBEF1]
Then - Actions
Set Variable Set P_SoundPlay = (P offset by (0.01, 0))
Set Variable Set x_SoundPlay = "106"
Trigger - Run Sound_Play_xSoundPlay <gen> (checking conditions)
For each (Integer B) from 1 to 3 , do (Actions)
Loop - Actions
Set Variable Set r2 = (r2 + (Random real number between -10.00 and 10.00))
Unit - Create 1 . Corpse Muncher for (Owner of unit) at P facing r2 degrees
Animation - Play (Last created unit) 's victory animation
Animation - Queue (Last created unit) 's stand animation
Set Variable Set PowerPush_Unit = (Last created unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and Marine_Fire_Target) Greater than 1300.00
Then - Actions
Set Variable Set PowerPush_Target = (P offset by ((Random real number between 0.90 and 1.10) x 1300.00) towards r2 degrees.)
Else - Actions
Set Variable Set PowerPush_Target = (P offset by ((Random real number between 0.90 and 1.10) x (Distance between P and Marine_Fire_Target)) towards r2 degrees.)
Trigger - Run Velocity_PowerPush_PPPoint <gen> (checking conditions)
Custom script: exitwhen true
Else - Actions
-------- Chlorine nur 1 Schuss abgeben und langsamere firerate --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 5 of Marine_Fire_ItemKey from Hash_Main.) Equal to 4
Then - Actions
Set Variable Set r2 = (r + (Random real number between -10.00 and 10.00))
Else - Actions
-------- Create Missle --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x5 Equal to 3
Then - Actions
Unit - Create 1 . Missle (Flamethrower) for (Owner of unit) at P facing r2 degrees
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x5 Equal to 4
(Item-type of Marine_Fire_Item) Equal to |cff7DBEF1Weapon [|rFlamethrower|cff7DBEF1]
Then - Actions
Unit - Create 1 . Missle (Chlorine) for (Owner of unit) at P facing r2 degrees
Unit - Add a (Random real number between 1.00 and 1.50) second Generic expiration timer to (Last created unit)
Else - Actions
Unit - Create 1 . WeaponData_MissleType[Marine_Fire_WeaponTypeIndex] for (Owner of unit) at P facing r2 degrees
Unit - Turn collision for (Last created unit) Off .
Unit - Move (Last created unit) instantly to P
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Stationary MG
Then - Actions
Hashtable - Save Handle Of Player_Marine[(Player number of (Owner of unit))] as 4 of (Key (Last created unit).) in Missle_Hash .
Else - Actions
Hashtable - Save Handle Of unit as 4 of (Key (Last created unit).) in Missle_Hash .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Tank
Then - Actions
Animation - Change (Last created unit) flying height to 180.00 at 0.00
Else - Actions
Animation - Change (Last created unit) flying height to (60.00 + (Current flying height of Player_Marine[(Player number of (Owner of unit))])) at 0.00
-------- Random Reichweite (und anti bug!!! irgendwie wird manchmal was >0 in hash eingetragen) --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Last created unit)) Equal to Missle (Chlorine)
(Unit-type of (Last created unit)) Equal to Missle (Flamethrower)
Then - Actions
Hashtable - Save (Random real number between 0 and 1.00) as 1 of (Key (Last created unit).) in Missle_Hash .
Else - Actions
Hashtable - Save 0.00 as 1 of (Key (Last created unit).) in Missle_Hash .
-------- z facing --------
Custom script: set udg_r4 = GetLocationZ(udg_P)
Custom script: set udg_r3 = GetLocationZ(udg_Marine_Fire_Target)
Set Variable Set r4 = (r4 + (Current flying height of unit))
Set Variable Set r4 = (r3 - r4)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unit2 Not equal to No unit
(Unit-type of unit2) Not equal to Scavenger
(Unit-type of unit2) Not equal to Scavenger dropoff done
Then - Actions
Set Variable Set r4 = ((Current flying height of unit2) + r4)
Else - Actions
Set Variable Set r3 = (Distance between P and Marine_Fire_Target)
Set Variable Set r4 = (r4 / r3)
Hashtable - Save r4 as 2 of (Key (Last created unit).) in Missle_Hash .
Hashtable - Save Marine_Fire_WeaponTypeIndex as 0 of (Key (Last created unit).) in Missle_Hash .
Hashtable - Save x5 as 3 of (Key (Last created unit).) in Missle_Hash .
Unit Group - Add (Last created unit) to UG_Missles
Trigger - Turn on Missle_Fly <gen>
-------- Shooting sound --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Marine_Fire_WeaponTypeIndex Not equal to 8
x2 Equal to ((Load 9 of 8 from WeaponData_Hash.) - 1)
Or - Any (Conditions) are true
Conditions
(Item-type of Marine_Fire_Item) Not equal to |cff7DBEF1Weapon [|rCoil Gun C43|cff7DBEF1]
x3 Greater than 0
Then - Actions
Set Variable Set P_SoundPlay = (P offset by (0.01, 0))
Set Variable Set x_SoundPlay = (100 + Marine_Fire_WeaponTypeIndex)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Tank
Then - Actions
Set Variable Set x_SoundPlay = "106"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Sentry Bot
Then - Actions
Set Variable Set x_SoundPlay = "103"
Else - Actions
Trigger - Run Sound_Play_xSoundPlay <gen> (checking conditions)
Else - Actions
-------- Inaccuracy increase --------
Set Variable Set r2 = (Load 6 of x from Marine_Hash.)
Set Variable Set r3 = (Load 5 of Marine_Fire_WeaponTypeIndex from WeaponData_Hash.)
Set Variable Set r2 = (r2 + r3)
Set Variable Set r3 = (Load 3 of Marine_Fire_WeaponTypeIndex from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Less than r3
Then - Actions
Set Variable Set r2 = r3
Else - Actions
Set Variable Set r3 = (Load 4 of Marine_Fire_WeaponTypeIndex from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Greater than r3
Then - Actions
Set Variable Set r2 = r3
Else - Actions
Hashtable - Save r2 as 6 of x in Marine_Hash .
Else - Actions
-------- Inaccuracy reduce --------
Set Variable Set r2 = (Load 6 of x from Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Greater than 0.00
Then - Actions
Set Variable Set r2 = (r2 - 0.10)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Less than 0.00
Then - Actions
Set Variable Set r2 = "0.00"
Else - Actions
Hashtable - Save r2 as 6 of x in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r3 Equal to 0.00
Then - Actions
Hashtable - Save 0.00 as 9 of x in Marine_Hash .
Hashtable - Save 0.00 as 10 of x in Marine_Hash .
Unit Group - Remove unit from UG_SpawnBullets .
Else - Actions
Custom script: call RemoveLocation(udg_P)
Else - Actions
Else - Actions
Hashtable - Save 0.00 as 9 of x in Marine_Hash .
Hashtable - Save 0.00 as 10 of x in Marine_Hash .
Unit Group - Remove unit from UG_SpawnBullets .
Else - Actions
Trigger - Turn off (This trigger)
Gleichzeitigen reload erlauben falls man zwischendurch waffe wechselt
Marine Reload
Events
Conditions
Actions
Custom script: local unit utemp
Custom script: local item tempitem
Custom script: set utemp = udg_Marine_Reload_Unit
Custom script: set udg_Marine_Reload_UnitKey = GetHandleId(udg_Marine_Reload_Unit)
Set Variable Set Marine_Reload_Item = (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of Marine_Reload_Item) Less than or equal to 0
Then - Actions
Skip remaining actions
Else - Actions
Custom script: set tempitem = udg_Marine_Reload_Item
Custom script: set udg_Marine_Reload_ItemKey = GetHandleId(udg_Marine_Reload_Item)
Set Variable Set MarineSetMMSpeed_unit = Marine_Reload_Unit
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
Set Variable Set Marine_Reload_Item = (Load 15 of Marine_Reload_UnitKey in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 2 of Marine_Reload_UnitKey from Marine_Hash.) Equal to True
Then - Actions
Skip remaining actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Charges remaining in Marine_Reload_Item) Greater than 0
(Marine_Reload_Unit has Marine_Reload_Item) Equal to True
Marine_Reload_Item Not equal to No item
Or - Any (Conditions) are true
Conditions
(Custom value of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) Equal to (Custom value of Marine_Reload_Item)
And - All (Conditions) are true
Conditions
(Custom value of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) Equal to 9
10 Equal to (Custom value of Marine_Reload_Item)
And - All (Conditions) are true
Conditions
(Custom value of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) Equal to 10
9 Equal to (Custom value of Marine_Reload_Item)
And - All (Conditions) are true
Conditions
(Custom value of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) Equal to 12
2 Equal to (Custom value of Marine_Reload_Item)
And - All (Conditions) are true
Conditions
(Custom value of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) Equal to 2
12 Equal to (Custom value of Marine_Reload_Item)
Then - Actions
Hashtable - Save True as 2 of Marine_Reload_UnitKey in Marine_Hash .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) Equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
Then - Actions
Wait 1.00 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_Item = tempitem
Trigger - Run Marine_Reload_WeaponReloadSingle <gen> (checking conditions)
If (x Equal to 1) then do (Skip remaining actions) else do (Do nothing)
Wait 1.00 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_Item = tempitem
Trigger - Run Marine_Reload_WeaponReloadSingle <gen> (checking conditions)
If (x Equal to 1) then do (Skip remaining actions) else do (Do nothing)
Wait 1.00 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_Item = tempitem
Trigger - Run Marine_Reload_WeaponReloadSingle <gen> (checking conditions)
If (x Equal to 1) then do (Skip remaining actions) else do (Do nothing)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) Equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
(Item-type of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) Equal to |cff7DBEF1Weapon [|rxm1014|cff7DBEF1]
Then - Actions
Wait 0.25 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_Item = tempitem
Trigger - Run Marine_Reload_WeaponReloadSingle <gen> (checking conditions)
If (x Equal to 1) then do (Skip remaining actions) else do (Do nothing)
Wait 0.25 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_Item = tempitem
Trigger - Run Marine_Reload_WeaponReloadSingle <gen> (checking conditions)
If (x Equal to 1) then do (Skip remaining actions) else do (Do nothing)
Wait 0.25 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_Item = tempitem
Trigger - Run Marine_Reload_WeaponReloadSingle <gen> (checking conditions)
If (x Equal to 1) then do (Skip remaining actions) else do (Do nothing)
Wait 0.25 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_Item = tempitem
Trigger - Run Marine_Reload_WeaponReloadSingle <gen> (checking conditions)
If (x Equal to 1) then do (Skip remaining actions) else do (Do nothing)
Wait 0.25 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_Item = tempitem
Trigger - Run Marine_Reload_WeaponReloadSingle <gen> (checking conditions)
If (x Equal to 1) then do (Skip remaining actions) else do (Do nothing)
Wait 0.25 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_Item = tempitem
Trigger - Run Marine_Reload_WeaponReloadSingle <gen> (checking conditions)
If (x Equal to 1) then do (Skip remaining actions) else do (Do nothing)
Wait 0.25 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_Item = tempitem
Trigger - Run Marine_Reload_WeaponReloadSingle <gen> (checking conditions)
If (x Equal to 1) then do (Skip remaining actions) else do (Do nothing)
Wait 0.25 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_Item = tempitem
Trigger - Run Marine_Reload_WeaponReloadSingle <gen> (checking conditions)
If (x Equal to 1) then do (Skip remaining actions) else do (Do nothing)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) Not equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
(Item-type of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) Not equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
Then - Actions
Set Variable Set P_SoundPlay = (Position of Marine_Reload_Unit)
Sound - Play (Load 13 of (Custom value of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) in WeaponData_Hash.) at 100 % volume, located at P_SoundPlay with Z offset 0
Custom script: call RemoveLocation(udg_P_SoundPlay)
Set Variable Set Marine_Reload_rWait = (Load 12 of (Custom value of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Marine_Reload_rWait Greater than 0.60
Then - Actions
Set Variable Set Marine_Reload_rWait = (Marine_Reload_rWait - 0.30)
Else - Actions
Set Variable Set Marine_Reload_rWait = "0.30"
Wait Marine_Reload_rWait seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_UnitKey = GetHandleId(udg_Marine_Reload_Unit)
Hashtable - Save False as 2 of Marine_Reload_UnitKey in Marine_Hash .
If ((Marine_Reload_Unit is alive) Equal to False) then do (Skip remaining actions) else do (Do nothing)
Custom script: set udg_Marine_Reload_Item = tempitem
If ((Load 8 of Marine_Reload_UnitKey in Marine_Hash.) Not equal to Marine_Reload_Item) then do (Skip remaining actions) else do (Do nothing)
If ((Marine_Reload_Unit has Marine_Reload_Item) Equal to False) then do (Skip remaining actions) else do (Do nothing)
Custom script: set udg_Marine_Reload_UnitKey = GetHandleId(udg_Marine_Reload_Unit)
Set Variable Set P_SoundPlay = (Position of Marine_Reload_Unit)
Sound - Play (Load 14 of (Custom value of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) in WeaponData_Hash.) at 100 % volume, located at P_SoundPlay with Z offset 0
Custom script: call RemoveLocation(udg_P_SoundPlay)
Hashtable - Save True as 2 of Marine_Reload_UnitKey in Marine_Hash .
Else - Actions
Wait 0.50 seconds
Custom script: set udg_Marine_Reload_Unit = utemp
Custom script: set udg_Marine_Reload_UnitKey = GetHandleId(udg_Marine_Reload_Unit)
If ((Load 2 of Marine_Reload_UnitKey from Marine_Hash.) Equal to False) then do (Skip remaining actions) else do (Do nothing)
Hashtable - Save False as 2 of Marine_Reload_UnitKey in Marine_Hash .
If ((Marine_Reload_Unit is alive) Equal to False) then do (Skip remaining actions) else do (Do nothing)
Custom script: set udg_Marine_Reload_Item = tempitem
If ((Load 8 of Marine_Reload_UnitKey in Marine_Hash.) Not equal to Marine_Reload_Item) then do (Skip remaining actions) else do (Do nothing)
If ((Marine_Reload_Unit has Marine_Reload_Item) Equal to False) then do (Skip remaining actions) else do (Do nothing)
Custom script: set udg_Marine_Reload_UnitKey = GetHandleId(udg_Marine_Reload_Unit)
Set Variable Set P_SoundPlay = (Position of Marine_Reload_Unit)
Sound - Play (Load 15 of (Custom value of (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)) in WeaponData_Hash.) at 100 % volume, located at P_SoundPlay with Z offset 0
Custom script: call RemoveLocation(udg_P_SoundPlay)
Set Variable Set Marine_Reload_Item = (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)
Custom script: set udg_x = GetHandleId(udg_Marine_Reload_Item)
Hashtable - Save (Item level of (Load 15 of Marine_Reload_UnitKey in Marine_Hash.)) as 5 of x in Hash_Main .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Reload_Item) Not equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
(Item-type of Marine_Reload_Item) Not equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
(Item-type of Marine_Reload_Item) Not equal to |cff7DBEF1Weapon [|rxm1014|cff7DBEF1]
Then - Actions
Item - Set charges remaining in Marine_Reload_Item to (Load 6 of (Custom value of Marine_Reload_Item) from WeaponData_Hash.)
Else - Actions
Hashtable - Save False as 4 of x in Hash_Main .
Trigger - Run Marine_Reload_CheckForEmptyAmmo <gen> (checking conditions)
Else - Actions
Set Variable Set MarineSetMMSpeed_unit = Marine_Reload_Unit
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
-------- Anderes Ammo-Item möglich? --------
-------- Automatisch Munition suchen --------
Set Variable Set WeaponAquire_Unit = Marine_Reload_Unit
Custom script: set udg_WeaponAquire_UnitKey = GetHandleId(udg_WeaponAquire_Unit)
Set Variable Set WeaponAquire_Item = (Load 8 of WeaponAquire_UnitKey in Marine_Hash.)
Set Variable Set WeaponAquire_x = (Custom value of WeaponAquire_Item)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[WeaponAquire_x]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[WeaponAquire_x])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmoAlt[WeaponAquire_x]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmoAlt[WeaponAquire_x])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 2
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[12]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[12])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 12
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[2]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[2])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 10
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[9]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[9])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
WeaponAquire_x Equal to 9
(WeaponAquire_Unit has an item of type WeaponData_ItemTypeAmmo[10]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by WeaponAquire_Unit of type WeaponData_ItemTypeAmmo[10])
Hashtable - Save Handle Of WeaponAquire_Item as 15 of WeaponAquire_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Marine_Reload_2ndTry Equal to False
Then - Actions
-------- Gegen Endlosschleife --------
Hashtable - Save False as 2 of Marine_Reload_UnitKey in Marine_Hash .
Set Variable Set Marine_Reload_2ndTry = "true"
Trigger - Run Marine_Reload <gen> (checking conditions)
Else - Actions
Set Variable Set Marine_Reload_2ndTry = "false"
Marine Reload CheckForEmptyAmmo
Events
Conditions
Actions
-------- Leere Ammo Items removen --------
Set Variable Set Marine_Reload_Item = (Load 15 of Marine_Reload_UnitKey in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Reload_Item) Not equal to |cff7DBEF1Shotgun Shells [|cffFF0000Burst |r(for M3)|cff7DBEF1]
(Item-type of Marine_Reload_Item) Not equal to |cff7DBEF1Shotgun Shells [|r(for M3)|cff7DBEF1]
(Item-type of Marine_Reload_Item) Not equal to |cff7DBEF1RL Frag Rounds [|r(for Rocket Launcher)|cff7DBEF1]
(Item-type of Marine_Reload_Item) Not equal to |cff7DBEF1RL Rounds [|r(for Rocket Launcher)|cff7DBEF1]
Then - Actions
Item - Set charges remaining in Marine_Reload_Item to ((Charges remaining in Marine_Reload_Item) - 1)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Charges remaining in Marine_Reload_Item) Equal to 0
Then - Actions
Item - Remove Marine_Reload_Item
Hashtable - Save False as 2 of Marine_Reload_UnitKey in Marine_Hash .
Else - Actions
-------- Automatisch andere Munition benutzen wenn leer --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Charges remaining in Marine_Reload_Item) Equal to 0
(Marine_Reload_Unit has Marine_Reload_Item) Equal to False
Marine_Reload_Item Equal to No item
Then - Actions
Set Variable Set Marine_Reload_Item = (Load 8 of Marine_Reload_UnitKey in Marine_Hash.)
Set Variable Set x2 = (Custom value of Marine_Reload_Item)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Marine_Reload_Unit has an item of type WeaponData_ItemTypeAmmo[x2]) Equal to True
Then - Actions
Set Variable Set Marine_Reload_Item = (Item carried by Marine_Reload_Unit of type WeaponData_ItemTypeAmmo[x2])
Hashtable - Save Handle Of Marine_Reload_Item as 15 of Marine_Reload_UnitKey in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Marine_Reload_Unit has an item of type WeaponData_ItemTypeAmmoAlt[x2]) Equal to True
Then - Actions
Set Variable Set Marine_Reload_Item = (Item carried by Marine_Reload_Unit of type WeaponData_ItemTypeAmmoAlt[x2])
Hashtable - Save Handle Of Marine_Reload_Item as 15 of Marine_Reload_UnitKey in Marine_Hash .
Else - Actions
Else - Actions
Marine Reload WeaponReloadSingle
Events
Conditions
Actions
Custom script: set udg_Marine_Reload_UnitKey = GetHandleId(udg_Marine_Reload_Unit)
Set Variable Set x = "1"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Marine_Reload_Unit is alive) Equal to False
Then - Actions
Hashtable - Save False as 2 of Marine_Reload_UnitKey in Marine_Hash .
Skip remaining actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Load 2 of Marine_Reload_UnitKey from Marine_Hash.) Equal to False
(Charges remaining in Marine_Reload_Item) Equal to (Load 6 of (Custom value of Marine_Reload_Item) from WeaponData_Hash.)
Then - Actions
Hashtable - Save False as 2 of Marine_Reload_UnitKey in Marine_Hash .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Reload_Item) Equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
Then - Actions
Set Variable Set P_SoundPlay = (Position of Marine_Reload_Unit)
Sound - Play m3_pump <gen> at 100 % volume, located at P_SoundPlay with Z offset 0
Custom script: call RemoveLocation(udg_P_SoundPlay)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Reload_Item) Equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
Then - Actions
Sound - Stop m249_boxout <gen> Immediately
Else - Actions
Skip remaining actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Load 8 of Marine_Reload_UnitKey in Marine_Hash.) Not equal to Marine_Reload_Item
(Marine_Reload_Unit has Marine_Reload_Item) Equal to False
Then - Actions
Hashtable - Save False as 2 of Marine_Reload_UnitKey in Marine_Hash .
Skip remaining actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of Marine_Reload_Item) Equal to |cff7DBEF1Weapon [|rM3|cff7DBEF1]
(Item-type of Marine_Reload_Item) Equal to |cff7DBEF1Weapon [|rxm1014|cff7DBEF1]
Then - Actions
Set Variable Set x_SoundPlay = "1"
Set Variable Set P_SoundPlay = (Position of Marine_Reload_Unit)
Trigger - Run Sound_Play_xSoundPlay <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of Marine_Reload_Item) Equal to |cff7DBEF1Weapon [|rRocket Launcher|cff7DBEF1]
Then - Actions
Sound - Stop m249_boxout <gen> Immediately
Set Variable Set P_SoundPlay = (Position of Marine_Reload_Unit)
Sound - Play m249_boxout <gen> at 100 % volume, located at P_SoundPlay with Z offset 0
Custom script: call RemoveLocation(udg_P_SoundPlay)
Else - Actions
Item - Set charges remaining in Marine_Reload_Item to ((Charges remaining in Marine_Reload_Item) + 1)
Custom script: set udg_x2 = GetHandleId(udg_Marine_Reload_Item)
Hashtable - Save False as 4 of x2 in Hash_Main .
Custom script: set udg_Marine_Reload_ItemKey = GetHandleId(udg_Marine_Reload_Item)
Hashtable - Save (Item level of (Load 15 of Marine_Reload_UnitKey in Marine_Hash.)) as (200 + (Charges remaining in Marine_Reload_Item)) of Marine_Reload_ItemKey in Hash_Main .
Set Variable Set Marine_Reload_Item = (Load 15 of Marine_Reload_UnitKey in Marine_Hash.)
Item - Set charges remaining in Marine_Reload_Item to ((Charges remaining in Marine_Reload_Item) - 1)
Set Variable Set x = "0"
Trigger - Run Marine_Reload_CheckForEmptyAmmo <gen> (checking conditions)
Marine Reload Custom
Events
Conditions
(Ability being cast) Equal to Reload
Actions
Set Variable Set Marine_Reload_Unit = (Triggering unit)
Trigger - Run Marine_Reload <gen> (checking conditions)
Marine Nade Throw
Events
Conditions
(Issued order) Equal to (Order(patrol))
Actions
-------- Distance ok? --------
Set Variable Set Marine_Fire_Target = (Position of (Triggering unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Target unit of issued order) is alive) Equal to True
Then - Actions
Set Variable Set Marine_Nade_Target = (Position of (Target unit of issued order))
Else - Actions
Set Variable Set Marine_Nade_Target = (Target point of issued order)
-------- Stop --------
Unit - Move (Triggering unit) instantly to Marine_Fire_Target , facing Marine_Nade_Target
Unit Group - Add (Triggering unit) to UG_OrderStop
Trigger - Turn on Marine_Order_Stop <gen>
-------- Punkt sichtbar? --------
Custom script: if IsVisibleToPlayer (GetLocationX(udg_Marine_Nade_Target), GetLocationY(udg_Marine_Nade_Target), GetOwningPlayer(GetTriggerUnit())) then
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 12 of (Key (Triggering unit).) in Marine_Hash.) Not equal to No item
((Triggering unit) has (Load 12 of (Key (Triggering unit).) in Marine_Hash.)) Equal to True
(Charges remaining in (Load 12 of (Key (Triggering unit).) in Marine_Hash.)) Greater than 0
(Distance between Marine_Fire_Target and Marine_Nade_Target) Less than 1000.00
Then - Actions
Custom script: call SetUnitAnimationByIndex(GetTriggerUnit(),7)
Animation - Queue (Triggering unit) 's stand animation
Custom script: call RemoveLocation(udg_Marine_Nade_Target)
Custom script: call RemoveLocation(udg_Marine_Fire_Target)
-------- Target --------
Set Variable Set Marine_Nade_Target = (Position of (Triggering unit))
Unit - Create 1 . Dummy (Default 5sec) for Neutral Passive at Marine_Nade_Target facing Default building facing degrees
Unit - Add Stun (1sec) to (Last created unit)
Unit - Order (Last created unit) to Neutral - Firebolt . (Triggering unit)
Unit - Create 1 . Nade Throw Dummy for (Owner of (Triggering unit)) at Marine_Nade_Target facing (Facing of (Triggering unit)) degrees
Unit - Add a 5.00 second Generic expiration timer to (Last created unit)
Set Variable Set Marine_Nade_ThrowDummy = (Last created unit)
Custom script: call RemoveLocation(udg_Marine_Nade_Target)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Target unit of issued order) is alive) Equal to True
Then - Actions
Set Variable Set Marine_Nade_Target = (Position of (Target unit of issued order))
Else - Actions
Set Variable Set Marine_Nade_Target = (Target point of issued order)
Unit - Create 1 . Nade Target Dummy for (Owner of (Triggering unit)) at Marine_Nade_Target facing (Facing of (Triggering unit)) degrees
Unit - Add a 5.00 second Generic expiration timer to (Last created unit)
Unit - Turn collision for (Last created unit) Off .
Unit - Move (Last created unit) instantly to Marine_Nade_Target
Trigger - Add to Marine_Nade_Death <gen> the event ((Last created unit) Takes damage)
Unit - Order Marine_Nade_ThrowDummy to Attack . (Last created unit)
Hashtable - Save Handle Of Marine_Nade_ThrowDummy as 1 of (Key (Last created unit).) in Hash_Main .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Load 12 of (Key (Triggering unit).) in Marine_Hash.)) Equal to |cff7DBEF1HE-Nades
Then - Actions
Unit - Set the custom value of (Last created unit) to 1
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Load 12 of (Key (Triggering unit).) in Marine_Hash.)) Equal to |cff7DBEF1Frags
Then - Actions
Unit - Set the custom value of (Last created unit) to 2
Else - Actions
Custom script: call RemoveLocation(udg_Marine_Nade_Target)
-------- Nade count --------
Item - Set charges remaining in (Load 12 of (Key (Triggering unit).) in Marine_Hash.) to ((Charges remaining in (Load 12 of (Key (Triggering unit).) in Marine_Hash.)) - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Charges remaining in (Load 12 of (Key (Triggering unit).) in Marine_Hash.)) Equal to 0
Then - Actions
Item - Remove (Load 12 of (Key (Triggering unit).) in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) has an item of type |cff7DBEF1HE-Nades) Equal to True
Then - Actions
Hashtable - Save Handle Of (Item carried by (Triggering unit) of type |cff7DBEF1HE-Nades) as 12 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) has an item of type |cff7DBEF1Frags) Equal to True
Then - Actions
Hashtable - Save Handle Of (Item carried by (Triggering unit) of type |cff7DBEF1Frags) as 12 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_Marine_Nade_Target)
Custom script: call RemoveLocation(udg_Marine_Fire_Target)
Custom script: endif
Marine Nade Death
Events
Conditions
(Damage source) Equal to (Load 1 of (Key (Triggering unit).) in Hash_Main.)
Actions
Unit - Kill (Triggering unit)
Set Variable Set Explosion_Caster = Player_Marine[(Player number of (Owner of (Triggering unit)))]
Set Variable Set Explosion_Origin = (Position of (Triggering unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Triggering unit)) Equal to 1
Then - Actions
Set Variable Set Explosion_Range = "300.00"
Set Variable Set Explosion_MaxDmg = "700.00"
Set Variable Set Explosion_Type = "1"
Trigger - Run Create_Explosion <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Triggering unit)) Equal to 2
Then - Actions
Set Variable Set Explosion_Range = "500.00"
Set Variable Set Explosion_MaxDmg = "700.00"
Set Variable Set Explosion_Type = "2"
Trigger - Run Create_Explosion <gen> (checking conditions)
Else - Actions
00: Item-type index of spawning gun
01: Distance travelled
02: z facing
03: Special ammo (0 normal, 1 blunt, 2 explosive, 3 burst, 4: chlorine/bfg alt 5: RL Frag)
04: BulletSource (for dmg output)
//05: (Anti-Lag) Skip collision check index
06,07: BFG effects
11: Previously hit unit (for big collision range/collision skip), so unit won't get hit twice
Missle Init
Events
Map initialization
Conditions
Actions
Hashtable - Create a hashtable
Set Variable Set Missle_Hash = (Last created hashtable)
SetUnitX/Y geht nur bei MoveSpeed > 0

r: Distance travelled
r2: Average damage
r3: Unit collision size (= point value)
r4: distance from unit center (an der stelle wo kugel der einheit am nächsten ist)
r5: AoE

x: Collision index
x3: Special ammo type (item-level von ammo)
x4: in use (add burning key)
Missle Fly
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_Missles) Greater than 0
Then - Actions
Set Variable Set Missle_CollisionCheckInterval = (Missle_CollisionCheckInterval + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Missle_CollisionCheckInterval Greater than 2
Then - Actions
Set Variable Set Missle_CollisionCheckInterval = "0"
Else - Actions
Unit Group - Pick every unit in UG_Missles and do (Actions)
Loop - Actions
Set Variable Set Missle_unit = (Picked unit)
Custom script: set udg_Missle_key = GetHandleId(udg_Missle_unit)
Set Variable Set Missle_currheight = (Current flying height of Missle_unit)
Set Variable Set Missle_angle = (Facing of Missle_unit)
Set Variable Set Missle_utype = (Unit-type of Missle_unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Missle_unit is alive) Equal to False
Then - Actions
Unit Group - Remove Missle_unit from UG_Missles .
Else - Actions
Set Variable Set Marine_Fire_WeaponTypeIndex = (Load 0 of Missle_key from Missle_Hash.)
Set Variable Set Missle_Speed = (Load 17 of Marine_Fire_WeaponTypeIndex from WeaponData_Hash.)
Set Variable Set x3 = (Load 3 of Missle_key from Missle_Hash.)
Set Variable Set r = (Load 1 of Missle_key from Missle_Hash.)
Set Variable Set r = (r + 0.09)
Set Variable Set P = (Position of Missle_unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 3
Then - Actions
Set Variable Set P2 = (P offset by 18.00 towards Missle_angle degrees.)
Else - Actions
Set Variable Set P2 = (P offset by Missle_Speed towards Missle_angle degrees.)
Set Variable Set x = "0"
-------- Skip collision check (flamethrower, chlorine Anti-Lag) --------
-------- Collision check (units und dest nur alle 3 mal) --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Missle_CollisionCheckInterval Equal to 0
(Unit-type of (Picked unit)) Equal to Missle (BFG)
(Unit-type of (Picked unit)) Equal to Missle (RL)
Then - Actions
-------- Unit collision (radius: maximaler splash/collision radius) --------
Set Variable Set UG = (Units within 400.00 of P matching ((((Matching unit) is alive) Equal to True) and ((Race of (Matching unit)) Not equal to Orc)).)
Set Variable Set x2 = (Number of units in UG)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Missle_unit is alive) Equal to False
x2 Greater than 0
Then - Actions
-------- Prüfen ob Missle Collision --------
Custom script: set udg_UG2 = CreateGroup ()
Unit Group - Add all units of UG to UG2
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Less than 0.10
Then - Actions
-------- Am Anfang des Fluges nur Gegner in Flugrichtung picken (damit man keine Gegner hinter sich trifft) --------
For each (Integer A) from 1 to x2 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 0
Then - Actions
Set Variable Set unit2 = (Random unit from UG2)
Unit Group - Remove unit2 from UG2 .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of Missle_unit) is an enemy of (Owner of unit2).) Equal to True
Then - Actions
Set Variable Set r3 = (Real((Point-value of unit2)))
Set Variable Set P3 = (Position of unit2)
Set Variable Set r4 = (Abs((Angle from P to P3)))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P2 and P3) Less than or equal to (r3 + (2.00 x Missle_Speed))
Or - Any (Conditions) are true
Conditions
r4 Less than or equal to 90.00
r4 Greater than or equal to 270.00
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((Missle_currheight - (Current flying height of unit2)))) Less than (156.00 + (r3 x 2.00))
Then - Actions
Set Variable Set x = "1"
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P3)
Else - Actions
Else - Actions
Else - Actions
-------- Alle Gegner picken --------
For each (Integer A) from 1 to x2 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 0
Then - Actions
Set Variable Set unit2 = (Random unit from UG2)
Unit Group - Remove unit2 from UG2 .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of Missle_unit) is an enemy of (Owner of unit2).) Equal to True
Then - Actions
Set Variable Set r3 = (Real((Point-value of unit2)))
Set Variable Set P3 = (Position of unit2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P2 and P3) Less than or equal to (r3 + (2.00 x Missle_Speed))
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((Missle_currheight - (Current flying height of unit2)))) Less than (156.00 + (r3 x 2.00))
Then - Actions
Set Variable Set x = "1"
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P3)
Else - Actions
Else - Actions
Custom script: call DestroyGroup(udg_UG2)
Else - Actions
-------- Destructible collision --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Terrain pathing at P2 of type Walkability is off) Equal to False
Then - Actions
Destructible - Pick every destructible within (64.00 + (2.00 x Missle_Speed)) of P2 and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Destructible-type of (Picked destructible)) Equal to B00F (Unexpected type: 'destructablecode')
x Less than 2
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked destructible) is alive) Equal to True
Then - Actions
Set Variable Set P3 = (Position of (Picked destructible))
Set Variable Set r4 = ((Distance between P2 and P3) x (Sin((Missle_angle - (Angle from P2 to P3)))))
Set Variable Set r4 = (Abs(r4))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r4 Less than 48.00
Then - Actions
Set Variable Set s = (Name of (Picked destructible))
Set Variable Set x2 = "0"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Destructible-type of (Picked destructible)) Equal to B00F (Unexpected type: 'destructablecode')
Then - Actions
Set Variable Set x2 = "100"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Current flying height of (Picked unit)) Less than (Real(x2))
Then - Actions
Destructible - Kill (Picked destructible)
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Destructible-type of (Picked destructible)) Equal to JTtw (Unexpected type: 'destructablecode')
Then - Actions
Set Variable Set x2 = "200"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(s, 1, 8)) Equal to Blocker
Then - Actions
Set Variable Set x2 = (Integer((Substring(s, 9, 11))))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Current flying height of (Picked unit)) Less than (Real(x2))
Then - Actions
Set Variable Set x = "2"
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P3)
Else - Actions
Else - Actions
Else - Actions
Else - Actions
-------- Terrain collision --------
Animation - Change Missle_unit flying height to (Missle_currheight + (Missle_Speed x (Load 2 of Missle_key from Missle_Hash.))) at 0.00
Set Variable Set Missle_currheight = (Current flying height of Missle_unit)
Custom script: set udg_r2 = GetLocationZ(udg_P)
Custom script: set udg_r3 = GetLocationZ(udg_P2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(r2 + Missle_currheight) Less than or equal to r3
Missle_currheight Less than 5.00
Then - Actions
Set Variable Set x = "3"
Else - Actions
Animation - Change Missle_unit flying height to (Missle_currheight - (r3 - r2)) at 0.00
Set Variable Set Missle_currheight = (Current flying height of Missle_unit)
-------- Out of Bounds/Travelled too far --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
((Playable map area) contains P2) Equal to False
r Greater than 5.00
Missle_currheight Greater than 4000.00
Then - Actions
Set Variable Set x = "4"
Else - Actions
-------- Collision -> destroy und damage --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Missle_CollisionCheckInterval Not equal to 0
Then - Actions
Set Variable Set UG = (Units within 400.00 of P matching ((((Matching unit) is alive) Equal to True) and ((Race of (Matching unit)) Not equal to Orc)).)
Else - Actions
Set Variable Set x2 = (Number of units in UG)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
x Greater than 0
(Missle_unit is alive) Equal to False
x2 Greater than 0
Then - Actions
-------- Damage units --------
-------- Splash Radius --------
Set Variable Set r5 = (Load 18 of Marine_Fire_WeaponTypeIndex from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 2
Then - Actions
Set Variable Set r5 = "150.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 5
Then - Actions
Set Variable Set r5 = "400.00"
Else - Actions
-------- Damage --------
Set Variable Set r2 = (Load 10 of (Load 0 of Missle_key from Missle_Hash.) from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 1
Then - Actions
Set Variable Set r2 = (3.00 x r2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 2
Then - Actions
Set Variable Set r2 = (2.00 x r2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 3
Then - Actions
Set Variable Set r2 = (0.40 x r2)
Else - Actions
-------- Arena Mode: Shotgun double dmg --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Marine_Fire_WeaponTypeIndex Equal to 2
x3 Equal to 0
Then - Actions
Set Variable Set r2 = (2.00 x r2)
Else - Actions
-------- Mehr dmg wegen collision skip --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Missle_utype Equal to Missle (Chlorine)
Missle_utype Equal to Missle (Flamethrower)
Then - Actions
Set Variable Set r2 = (3.00 x r2)
Else - Actions
-------- Damage units within range --------
Trigger - Run Missle_Fly_DamageUnits <gen> (checking conditions)
Else - Actions
-------- Hier nochmal r abfragen wegen unit collision --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Greater than 5.00
Then - Actions
Set Variable Set x = "4"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Greater than 1
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Missle_utype Equal to Missle (RL)
Missle_utype Equal to Missle (BFG)
Missle_utype Equal to Missle (Chlorine)
Missle_utype Equal to Missle (Flamethrower)
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Missle_utype Equal to Missle (Chlorine)
Missle_utype Equal to Missle (Flamethrower)
Then - Actions
Unit Group - Remove Missle_unit from UG_Missles .
Else - Actions
-------- Blow up destructibles --------
Destructible - Pick every destructible within 300.00 of P and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Destructible-type of (Picked destructible)) Equal to B00F (Unexpected type: 'destructablecode')
((Picked destructible) is alive) Equal to True
Then - Actions
Destructible - Kill (Picked destructible)
Else - Actions
Unit - Kill Missle_unit
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 2
Then - Actions
Special Effect - Create a special effect at P using Abilities\Weapons\CannonTowerMissile\CannonTowerMissile.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
Hashtable - Clear all child hashtables of child Missle_key in Missle_Hash .
Unit Group - Remove Missle_unit from UG_Missles .
Unit - Remove Missle_unit from the game
Else - Actions
Custom script: call DestroyGroup(udg_UG)
-------- Move --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Missle_unit is alive) Equal to True
Then - Actions
Hashtable - Save r as 1 of Missle_key in Missle_Hash .
-------- Move >1 wegen durchschlagen --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Less than or equal to 1
Then - Actions
Set Variable Set unit = Missle_unit
Set Variable Set r_x = (X of P2)
Set Variable Set r_y = (Y of P2)
Custom script: call SetUnitX (udg_unit, udg_r_x)
Custom script: call SetUnitY (udg_unit, udg_r_y)
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Trigger - Turn off (This trigger)
29: SentryBotAI missle has hit unit (bool)

r: Distance travelled
r2: Average damage
r3: Unit collision size (= point value)
r4: distance from unit center (an der stelle wo kugel der einheit am nächsten ist)
r5: AoE
Missle Fly DamageUnits
Events
Conditions
Actions
Set Variable Set Missle_unitshit = "0"
Set Variable Set Missle_BulletSource = (Load 4 of Missle_key in Missle_Hash.)
Set Variable Set Missle_PreviousHitUnit = (Load 11 of Missle_key in Missle_Hash.)
For each (Integer A) from 1 to x2 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Missle_unitshit Equal to 0
r5 Greater than 0.00
r Less than 5.00
Then - Actions
Set Variable Set unit2 = (Random unit from UG)
Unit Group - Remove unit2 from UG .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r5 Greater than 0.00
Then - Actions
Set Variable Set r3 = r5
Else - Actions
Set Variable Set r3 = (Real((Point-value of unit2)))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
unit2 Not equal to Missle_PreviousHitUnit
r3 Greater than 100.00
r5 Greater than 0.00
Or - Any (Conditions) are true
Conditions
((Owner of Missle_unit) is an enemy of (Owner of unit2).) Equal to True
And - All (Conditions) are true
Conditions
r5 Greater than 0.00
Missle_utype Not equal to Missle (Chlorine)
Missle_utype Not equal to Missle (Flamethrower)
Then - Actions
Set Variable Set P3 = (Position of unit2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P2 and P3) Less than or equal to (r3 + (2.00 x Missle_Speed))
Then - Actions
Custom script: set udg_r_x = GetLocationZ(udg_P)
Custom script: set udg_r_y = GetLocationZ(udg_P3)
Set Variable Set r6 = (Abs(((Missle_currheight + r_x) - ((Current flying height of unit2) + r_y))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r6 Less than (156.00 + (r3 x 2.00))
Then - Actions
-------- Abstand auf Höhe der Einheit berechnen / bei Splash nur Abstand --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r5 Greater than 0.00
Then - Actions
Set Variable Set r4 = (Distance between P2 and P3)
Else - Actions
Set Variable Set r4 = ((Distance between P2 and P3) x (Sin((Missle_angle - (Angle from P2 to P3)))))
Set Variable Set r4 = (Abs(r4))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r4 Less than r3
Then - Actions
-------- Treffergenauigkeit --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Missle_utype Not equal to Missle (Chlorine)
Missle_utype Not equal to Missle (Flamethrower)
Then - Actions
Set Variable Set r4 = (1.00 x (0.50 + ((r3 - r4) / r3)))
Else - Actions
Set Variable Set r4 = "1.00"
-------- Schon zurückgelegte Reichweite --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r5 Equal to 0.00
Then - Actions
Set Variable Set r7 = (0.75 + (0.05 x (5.00 - r)))
Set Variable Set r4 = (r7 x r4)
Else - Actions
Set Variable Set r4 = (r2 x r4)
-------- Höhenunterschied mit einfließen lassen bei Splash --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r5 Greater than 0.00
Missle_utype Not equal to Missle (Chlorine)
Missle_utype Not equal to Missle (Flamethrower)
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r6 Greater than or equal to r5
Then - Actions
Set Variable Set r4 = "0.00"
Else - Actions
Set Variable Set r6 = (r5 - r6)
Set Variable Set r6 = (r6 / r5)
Set Variable Set r4 = (r4 x r6)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r4 Greater than 0.00
Then - Actions
Set Variable Set Missle_unitshit = (Missle_unitshit + 1)
Hashtable - Save Handle Of unit2 as 11 of Missle_key in Missle_Hash .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit2) Equal to Marine
Then - Actions
Set Variable Set r4 = (r4 x Game_Options_MissleDmgFactor)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of (Load 4 of Missle_key in Missle_Hash.)) is an ally of (Owner of unit2).) Equal to True
Then - Actions
Set Variable Set r4 = (r4 x 0.33)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Missle_utype Equal to Missle (Flamethrower)
Missle_utype Equal to Missle (Railgun)
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Missle_utype Equal to Missle (Railgun)
(Unit-type of unit2) Equal to Marine
Then - Actions
Unit - Cause (Load 4 of Missle_key in Missle_Hash.) to damage unit2 , dealing (r4 x 0.50) damage of attack type Magic and damage type Normal
Else - Actions
Unit - Cause (Load 4 of Missle_key in Missle_Hash.) to damage unit2 , dealing r4 damage of attack type Magic and damage type Normal
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Missle_utype Equal to Missle (Chlorine)
Then - Actions
Unit - Cause (Load 4 of Missle_key in Missle_Hash.) to damage unit2 , dealing r4 damage of attack type Spells and damage type Normal
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Missle_utype Equal to Missle (RL)
Missle_utype Equal to Missle (BFG)
x3 Equal to 2
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 5
Then - Actions
Unit - Cause (Load 4 of Missle_key in Missle_Hash.) to damage unit2 , dealing (r4 x 0.33) damage of attack type Siege and damage type Normal
Unit - Cause (Load 4 of Missle_key in Missle_Hash.) to damage unit2 , dealing (r4 x 0.67) damage of attack type Pierce and damage type Normal
Else - Actions
Unit - Cause (Load 4 of Missle_key in Missle_Hash.) to damage unit2 , dealing r4 damage of attack type Siege and damage type Normal
Else - Actions
Unit - Cause (Load 4 of Missle_key in Missle_Hash.) to damage unit2 , dealing r4 damage of attack type Pierce and damage type Normal
-------- Power/Reichweite verringern --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Not equal to 3
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
x3 Equal to 1
x3 Equal to 2
Missle_utype Equal to Missle (Chlorine)
Then - Actions
Set Variable Set r = (r + 5.00)
Else - Actions
Set Variable Set r = (r + (5.00 - (Load 16 of (Load 0 of Missle_key from Missle_Hash.) from WeaponData_Hash.)))
Else - Actions
-------- Anzünden --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Missle_utype Equal to Missle (Flamethrower)
Missle_utype Equal to Missle (Railgun)
((Owner of Missle_unit) is an enemy of (Owner of unit2).) Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Missle_utype Equal to Missle (Railgun)
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of unit2 using Abilities\Weapons\RedDragonBreath\RedDragonMissile.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
Custom script: set udg_x4 = GetHandleId(udg_unit2)
Hashtable - Save 5.00 as 3 of x4 in Hash_Main .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(unit2 is in UG_Burning.) Equal to False
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of unit2 using Environment\LargeBuildingFire\LargeBuildingFire2.mdl
Hashtable - Save Handle Of (Last created special effect) as 2 of x4 in Hash_Main .
Hashtable - Save Handle Of Missle_BulletSource as 30 of x4 in Hash_Main .
Unit Group - Add unit2 to UG_Burning
Else - Actions
Trigger - Turn on Burning <gen>
Else - Actions
Else - Actions
Else - Actions
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P3)
Else - Actions
Else - Actions
-------- Unit getroffen? Für SentryBot AI --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Missle_unitshit Greater than 0
Then - Actions
Custom script: set udg_x5 = GetHandleId(udg_Missle_BulletSource)
Hashtable - Save True as 29 of x5 in Hash_Main .
Else - Actions
Missle BFG RL
Events
Unit - A unit Dies
Conditions
Or - Any (Conditions) are true
Conditions
And - All (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to Missle (RL)
(Load 3 of (Key (Triggering unit).) from Missle_Hash.) Equal to 5
And - All (Conditions) are true
Conditions
(Load 3 of (Key (Triggering unit).) from Missle_Hash.) Not equal to 4
(Unit-type of (Triggering unit)) Equal to Missle (BFG)
Actions
Set Variable Set Explosion_Origin = (Position of (Triggering unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Missle (RL)
Then - Actions
Set Variable Set Explosion_Caster = Player_Marine[(Player number of (Owner of (Triggering unit)))]
Set Variable Set Explosion_Range = "500.00"
Set Variable Set Explosion_MaxDmg = ((Load 10 of 6 from WeaponData_Hash.) x 0.60)
Set Variable Set Explosion_Type = "2"
Trigger - Run Create_Explosion <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Missle (BFG)
Then - Actions
Special Effect - Create a special effect at Explosion_Origin using Units\NightElf\Wisp\WispExplode.mdl
Hashtable - Save Handle Of (Last created special effect) as 6 of (Key (Triggering unit).) in Missle_Hash .
Special Effect - Create a special effect at Explosion_Origin using Abilities\Spells\Human\Thunderclap\ThunderClapCaster.mdl
Hashtable - Save Handle Of (Last created special effect) as 7 of (Key (Triggering unit).) in Missle_Hash .
Custom script: call RemoveLocation(udg_Explosion_Origin)
Else - Actions
Missle Chlorine
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Missle (Chlorine)
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Wait 0.10 seconds
Custom script: set udg_unit = tempunit
Set Variable Set P = (Position of unit)
Unit - Create 1 . Chlorine Cloud for (Owner of unit) at P facing (Random angle) degrees
Custom script: call RemoveLocation(udg_P)
Missle Chlorine Dmg
Events
Conditions
(Unit-type of (Damage source)) Equal to Chlorine Cloud
Actions
Trigger - Turn off (This trigger)
Set Variable Set P2 = (Position of (Triggering unit))
Set Variable Set P3 = (Position of (Damage source))
Custom script: set udg_r = GetLocationZ(udg_P2)
Custom script: set udg_r2 = GetLocationZ(udg_P3)
Set Variable Set r = (r + (Current flying height of (Triggering unit)))
Set Variable Set r2 = (r2 + (Current flying height of (Damage source)))
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P3)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((r - r2))) Less than (128.00 + (Real((Point-value of (Triggering unit)))))
Then - Actions
Unit - Cause (Damage source) to damage (Triggering unit) , dealing 25.00 damage of attack type Spells and damage type Poison
Else - Actions
Trigger - Turn on (This trigger)
Missle BFG Alt
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Missle (BFG)
(Load 3 of (Key (Triggering unit).) from Missle_Hash.) Equal to 4
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Wait 0.10 seconds
Custom script: set udg_unit = tempunit
-------- Purge all enemies --------
Set Variable Set P = (Position of unit)
Special Effect - Create a special effect at P using Abilities\Spells\Orc\LightningBolt\LightningBoltMissile.mdl
Special Effect - Destroy (Last created special effect)
Set Variable Set UG = (Units within 400.00 of P matching ((((Matching unit) is alive) Equal to True) and (((Owner of unit) is an enemy of (Owner of (Matching unit)).) Equal to True)).)
Unit - Create 1 . Dummy (Default 5sec) for (Owner of unit) at P facing Default building facing degrees
Unit - Turn collision for (Last created unit) Off .
Unit - Add Purge (BFG alt) to (Last created unit)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Set Variable Set P2 = (Position of (Picked unit))
Unit - Move (Last created unit) instantly to P2
Unit - Order (Last created unit) to Orc Shaman - Purge . (Picked unit)
Custom script: call RemoveLocation(udg_P2)
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Marine Set Movement Speed
Events
Conditions
Actions
Custom script: set udg_MarineSetMMSpeed_x = GetHandleId(udg_MarineSetMMSpeed_unit)
Set Variable Set MarineSetMMSpeed_Item = (Load 8 of MarineSetMMSpeed_x in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of MarineSetMMSpeed_x from Marine_Hash.) Equal to 5
Then - Actions
Set Variable Set MarineSetMMSpeed_Factor = WeaponData_WeightSlowFactorEF
Else - Actions
Set Variable Set MarineSetMMSpeed_Factor = WeaponData_WeightSlowFactor
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 16 of MarineSetMMSpeed_x from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set MarineSetMMSpeed_r = "0.00"
Else - Actions
Set Variable Set MarineSetMMSpeed_r = (Default movement speed of MarineSetMMSpeed_unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(MarineSetMMSpeed_unit has MarineSetMMSpeed_Item) Equal to True
(Custom value of MarineSetMMSpeed_Item) Less than or equal to 0
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of MarineSetMMSpeed_Item) Equal to |cff7DBEF1Weapon [|rChainsaw|cff7DBEF1]
(Item-type of MarineSetMMSpeed_Item) Equal to |cff7DBEF1Weapon [|rGhoul-Cannon|cff7DBEF1]
Then - Actions
Set Variable Set MarineSetMMSpeed_r = (MarineSetMMSpeed_r x (1.00 - (3.00 x MarineSetMMSpeed_Factor)))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of MarineSetMMSpeed_Item) Equal to |cff7DBEF1Weapon [|rGauntlet|cff7DBEF1]
Then - Actions
Set Variable Set MarineSetMMSpeed_r = (MarineSetMMSpeed_r x (1.00 - (2.00 x MarineSetMMSpeed_Factor)))
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(MarineSetMMSpeed_unit has MarineSetMMSpeed_Item) Equal to True
Or - Any (Conditions) are true
Conditions
(Charges remaining in MarineSetMMSpeed_Item) Greater than 0
(Load 1 of MarineSetMMSpeed_x from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set MarineSetMMSpeed_r = (MarineSetMMSpeed_r x (1.00 - ((Load 2 of (Custom value of MarineSetMMSpeed_Item) from WeaponData_Hash.) x MarineSetMMSpeed_Factor)))
Else - Actions
Unit - Set MarineSetMMSpeed_unit movement speed to MarineSetMMSpeed_r
Marine Select Class
Events
Conditions
Or - Any (Conditions) are true
Conditions
(Ability being cast) Equal to Select Class: |cff7DBEF1Medic
(Ability being cast) Equal to Select Class: |cff7DBEF1Engineer
(Ability being cast) Equal to Select Class: |cff7DBEF1Explosives Expert
(Ability being cast) Equal to Select Class: |cff7DBEF1Operator
(Ability being cast) Equal to Select Class: |cff7DBEF1Elite Figher
Actions
Set Variable Set unit = (Triggering unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Ability being cast) Equal to Select Class: |cff7DBEF1Medic
Then - Actions
Unit - Add First Aid Treatment to unit
Unit - Add Inject Combat Cocktail to unit
Unit - Add Revive to unit
Special Effect - Create a special effect attached to the overhead (Unexpected type: 'attachpoint') of unit using Abilities\Spells\Human\InnerFire\InnerFireTarget.mdl
Hashtable - Save Handle Of (Last created special effect) as 25 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save 1 as 26 of (Key (Triggering unit).) in Marine_Hash .
Game - Display to (All players) for 5.00 seconds the text: (Player_ColorCode[(Player number of (Owner of (Triggering unit)))] + ((Name of (Owner of (Triggering unit))) + |r is |cff7DBEF1Medic|r.))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Ability being cast) Equal to Select Class: |cff7DBEF1Engineer
Then - Actions
Unit - Add Construct Barricade to unit
Unit - Add Pack Up Stationary MG to unit
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of unit using Units\Creeps\HeroTinkerFactory\HeroTinkerFactoryMissle.mdl
Hashtable - Save Handle Of (Last created special effect) as 25 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save 2 as 26 of (Key (Triggering unit).) in Marine_Hash .
Game - Display to (All players) for 5.00 seconds the text: (Player_ColorCode[(Player number of (Owner of (Triggering unit)))] + ((Name of (Owner of (Triggering unit))) + |r is |cff7DBEF1Engineer|r.))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Ability being cast) Equal to Select Class: |cff7DBEF1Explosives Expert
Then - Actions
Unit - Add Place Anti-Person Mine to unit
Unit - Add Place Anti-Tank Mine to unit
Unit - Add Place Remote-Controlled Mine to unit
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of unit using Abilities\Weapons\QuillSprayMissile\QuillSprayMissile.mdl
Hashtable - Save Handle Of (Last created special effect) as 25 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save 3 as 26 of (Key (Triggering unit).) in Marine_Hash .
Set Variable Set P = (Center of Tutorial_Spawn <gen>)
Unit - Create 1 . Detonate remote-controlled mines for (Owner of (Triggering unit)) at P facing Default building facing degrees
Custom script: call RemoveLocation(udg_P)
Game - Display to (All players) for 5.00 seconds the text: (Player_ColorCode[(Player number of (Owner of (Triggering unit)))] + ((Name of (Owner of (Triggering unit))) + |r is |cff7DBEF1Explosives Expert|r.))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Ability being cast) Equal to Select Class: |cff7DBEF1Operator
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 0
Then - Actions
Unit - Add Ping Dropoff Point to unit
Else - Actions
Unit - Add Track Enemies to unit
Unit - Add Airstrike to unit
Unit - Add Motivation Aura to unit
Hashtable - Save 4 as 26 of (Key (Triggering unit).) in Marine_Hash .
Game - Display to (All players) for 5.00 seconds the text: (Player_ColorCode[(Player number of (Owner of (Triggering unit)))] + ((Name of (Owner of (Triggering unit))) + |r is |cff7DBEF1Operator|r.))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Ability being cast) Equal to Select Class: |cff7DBEF1Elite Figher
Then - Actions
Unit - Add Leap to unit
Unit - Add Concentrate to unit
Unit - Add Scarify Bullets to unit
Unit - Add Item Armor Bonus (+2) to unit
Hashtable - Save 5 as 26 of (Key (Triggering unit).) in Marine_Hash .
Game - Display to (All players) for 5.00 seconds the text: (Player_ColorCode[(Player number of (Owner of (Triggering unit)))] + ((Name of (Owner of (Triggering unit))) + |r is |cff7DBEF1Elite Fighter|r.))
Set Variable Set MarineSetMMSpeed_unit = unit
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
Else - Actions
Unit - Remove True Sight SpellBook from (Triggering unit)
Unit - Add True Sight SpellBook to unit
Unit - Remove Select Class from unit
Unit - Order (Triggering unit) to Stop .
Marine Death
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Unit Group - Remove (Triggering unit) from UG_AliveMarines .
Hashtable - Save False as 2 of (Key (Triggering unit).) in Marine_Hash .
Special Effect - Destroy (Load 25 of (Key (Triggering unit).) in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of Player_SelectedUnit[(Player number of (Owner of (Triggering unit)))]) Equal to Stationary MG
Then - Actions
Unit - Change ownership of Player_SelectedUnit[(Player number of (Owner of (Triggering unit)))] to Neutral Passive and Change color
Else - Actions
-------- Jetpack Off --------
Hashtable - Save False as 16 of (Key (Triggering unit).) in Marine_Hash .
Set Variable Set Player_CamSet = (Triggering player)
Trigger - Run Camera_SetForPlayer_PlayerCamSet <gen> (checking conditions)
Visibility - Destroy (Load 23 of (Key (Triggering unit).) in Marine_Hash.)
Hashtable - Save 0 as 3 of (Key (Triggering unit).) in Marine_Hash .
Unit - Turn collision for (Triggering unit) On .
Set Variable Set MarineSetMMSpeed_unit = (Triggering unit)
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 0
Then - Actions
For each (Integer MarineDeath_A ) from 1 to Maxplayers , do (Actions)
Loop - Actions
Player - Make (Player(MarineDeath_A)) treat (Owner of (Triggering unit)) as an Ally with shared vision
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
-------- Remove Infection --------
Hashtable - Save 0 as 27 of (Key (Triggering unit).) in Marine_Hash .
Hero - Add -100 experience to (Triggering unit) , Hide level-up graphics
-------- Bounty/Msg --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player number of (Owner of (Killing unit))) Less than or equal to Maxplayers
(Owner of (Triggering unit)) Not equal to (Owner of (Killing unit))
Then - Actions
Player - Add Player_Bounty[(Player number of (Owner of (Triggering unit)))] to (Owner of (Killing unit)) . Current gold
Set Variable Set Player_Bounty[(Player number of (Owner of (Killing unit)))] = (Player_Bounty[(Player number of (Owner of (Killing unit)))] + 500)
Game - Display to (All players) for 3.00 seconds the text: (Player_ColorCode[(Player number of (Owner of (Killing unit)))] + ((Name of (Owner of (Killing unit))) + (|r owned + (Player_ColorCode[(Player number of (Owner of (Triggering unit)))] + ((Name of (Owner of (Triggering unit))) + (((|r (|cffF6E585 + (String(Player_Bounty[(Player number of (Owner of (Triggering unit)))]))) + |r)! His head is now worth |cffF6E585) + ((String(Player_Bounty[(Player number of (Owner of (Killing unit)))])) + |rcredits!)))))))
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 2
Then - Actions
-------- Remove Infection --------
Hashtable - Save 0 as 27 of (Key (Triggering unit).) in Marine_Hash .
Hero - Add -100 experience to (Triggering unit) , Hide level-up graphics
Else - Actions
Wait 1.00 seconds
Custom script: set udg_unit = tempunit
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 0
Then - Actions
Set Variable Set PG = (Player group((Owner of unit)))
Game - Display to PG for 10.00 seconds the text: You can be revived by a Medic or a First Aid kit (which dropped in wave 1).
Custom script: call DestroyForce(udg_PG)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
((Owner of unit) slot status) Equal to Is playing
Then - Actions
Set Variable Set Player_AllowSelectClass[(Player number of (Owner of unit))] = "true"
Set Variable Set PG = (Player group((Owner of unit)))
Game - Display to PG for 5.00 seconds the text: You will respawn in 10 seconds.
Custom script: call DestroyForce(udg_PG)
Wait 7.00 seconds
Custom script: set udg_unit = tempunit
Set Variable Set PG = (Player group((Owner of unit)))
Game - Display to PG for 1.00 seconds the text: Prepare to fight!
Custom script: call DestroyForce(udg_PG)
Wait 3.00 seconds
Custom script: set udg_unit = tempunit
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of unit) slot status) Not equal to Is playing
Then - Actions
Skip remaining actions
Else - Actions
Set Variable Set Player_Bounty[(Player number of (Owner of unit))] = "500"
Set Variable Set x = "0"
Set Variable Set P = (Random point in (Playable map area))
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Set Variable Set Marine_Revive_Unit = unit
Set Variable Set Marine_Revive_P = P
Trigger - Run Marine_Revive <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 2
((Owner of unit) slot status) Equal to Is playing
Then - Actions
Set Variable Set Player_AllowSelectClass[(Player number of (Owner of unit))] = "true"
Set Variable Set PG = (Player group((Owner of unit)))
Game - Display to PG for 5.00 seconds the text: You will respawn in 5 seconds.
Custom script: call DestroyForce(udg_PG)
Wait 5.00 seconds
Custom script: set udg_unit = tempunit
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of unit) slot status) Not equal to Is playing
Then - Actions
Skip remaining actions
Else - Actions
Set Variable Set x = "0"
Set Variable Set P = (Random point in (Playable map area))
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Set Variable Set Marine_Revive_Unit = unit
Set Variable Set Marine_Revive_P = P
Trigger - Run Marine_Revive <gen> (checking conditions)
Else - Actions
input: Marine_Revive_Unit
Marine_Revive_P
Marine Revive
Events
Conditions
Game_Over Equal to False
Actions
Custom script: set udg_Marine_Revive_x = GetHandleId(udg_Marine_Revive_Unit)
Hero - Instantly revive Marine_Revive_Unit at Marine_Revive_P , Hide revival graphics
Selection - Select Marine_Revive_Unit for (Owner of Marine_Revive_Unit)
Unit Group - Add Marine_Revive_Unit to UG_AliveMarines
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of Marine_Revive_x from Marine_Hash.) Equal to 1
Then - Actions
Special Effect - Create a special effect attached to the overhead (Unexpected type: 'attachpoint') of Marine_Revive_Unit using Abilities\Spells\Human\InnerFire\InnerFireTarget.mdl
Hashtable - Save Handle Of (Last created special effect) as 25 of Marine_Revive_x in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of Marine_Revive_x from Marine_Hash.) Equal to 2
Then - Actions
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of Marine_Revive_Unit using Units\Creeps\HeroTinkerFactory\HeroTinkerFactoryMissle.mdl
Hashtable - Save Handle Of (Last created special effect) as 25 of Marine_Revive_x in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of Marine_Revive_x from Marine_Hash.) Equal to 3
Then - Actions
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of Marine_Revive_Unit using Abilities\Weapons\QuillSprayMissile\QuillSprayMissile.mdl
Hashtable - Save Handle Of (Last created special effect) as 25 of Marine_Revive_x in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Game_Mod Equal to 0
Game_Mod Equal to 2
Then - Actions
For each (Integer MarineDeath_A ) from 1 to Maxplayers , do (Actions)
Loop - Actions
Player - Make (Player(MarineDeath_A)) treat (Owner of Marine_Revive_Unit) as an Ally
Else - Actions
Set Variable Set Player_CamSet = (Owner of Marine_Revive_Unit)
Trigger - Run Camera_SetForPlayer_PlayerCamSet <gen> (checking conditions)
Camera - Pan camera for (Owner of Marine_Revive_Unit) to Marine_Revive_P over 0.00 seconds
Custom script: call RemoveLocation(udg_Marine_Revive_P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_AutoAttackON[(Player number of (Owner of Marine_Revive_Unit))] Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of Player_AutoAttackDummy[(Player number of (Owner of Marine_Revive_Unit))]) Not equal to Marine Auto-Attack (200)
Then - Actions
Unit - Replace Player_AutoAttackDummy[(Player number of (Owner of Marine_Revive_Unit))] with a Marine Auto-Attack (200) using The new unit's max life and mana
Set Variable Set Player_AutoAttackDummy[(Player number of (Owner of Marine_Revive_Unit))] = (Last replaced unit)
Unit - Turn collision for (Last replaced unit) Off .
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Load 8 of Marine_Revive_x in Marine_Hash.)) Greater than or equal to 0
Then - Actions
Special Effect - Create a special effect attached to the weapon (Unexpected type: 'attachpoint') of Marine_Revive_Unit using war3mapImported\bloody chainsaw.mdx
Hashtable - Save Handle Of (Last created special effect) as 30 of Marine_Revive_x in Marine_Hash .
Else - Actions
Hashtable - Save Handle Of (Item carried by Marine_Revive_Unit of type |cff7DBEF1Weapon [|rGauntlet|cff7DBEF1]) as 8 of Marine_Revive_x in Marine_Hash .
Else - Actions
Marine DmgTake
Events
Conditions
(Damage taken) Greater than 1.00
(Unit-type of (Damage source)) Not equal to Souldrainer
(Unit-type of (Damage source)) Not equal to Chlorine Cloud
(Unit-type of (Damage source)) Not equal to Burning Oil
(Unit-type of (Damage source)) Not equal to Road Flare
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) has an item of type |cff7DBEF1Liquid-Crystal-Suit (LQS)) Equal to True
Then - Actions
Set Variable Set Marine_DmgTake_r = ((Damage taken) / 0.74)
Set Variable Set Marine_DmgTake_r = (Marine_DmgTake_r x 0.26)
Set Variable Set Marine_DmgTake_r = ((Load 14 of (Key (Triggering unit).) from Marine_Hash.) + Marine_DmgTake_r)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Marine_DmgTake_r Greater than 900.00
Then - Actions
Set Variable Set Marine_DmgTake_r = "900.00"
Else - Actions
Hashtable - Save Marine_DmgTake_r as 14 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Damage source)) Equal to Undead
Then - Actions
Set Variable Set Marine_Infection_x = (Load 27 of (Key (Triggering unit).) from Marine_Hash.)
Set Variable Set Marine_Infection_x = (Marine_Infection_x + (Random integer number between 0 and 5))
Set Variable Set Marine_Infection_x = (Marine_Infection_x + ((Game_Difficulty - 1) x 3))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Marine_Infection_x Greater than 99
Then - Actions
Set Variable Set Marine_Infection_x = "99"
Else - Actions
Hashtable - Save Marine_Infection_x as 27 of (Key (Triggering unit).) in Marine_Hash .
Hero - Add (Marine_Infection_x - (Hero experience of (Triggering unit))) experience to (Triggering unit) , Hide level-up graphics
Else - Actions
Marine Infection Main
Events
Time - Every 5.00 seconds of game time
Conditions
Actions
Unit Group - Pick every unit in UG_AliveMarines and do (Actions)
Loop - Actions
Set Variable Set Marine_Infection_x = (Load 27 of (Key (Picked unit).) from Marine_Hash.)
-------- Infection je nach difficulty level erhöhen/erniedrigen --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Difficulty Equal to 1
Then - Actions
Set Variable Set Marine_Infection_x = (Marine_Infection_x - 1)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Difficulty Equal to 3
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 100) Less than or equal to Marine_Infection_x
Then - Actions
Set Variable Set Marine_Infection_x = (Marine_Infection_x + 1)
Else - Actions
Else - Actions
Set Variable Set Marine_Infection_x = (Marine_Infection_x - (Load 40 of (Key (Picked unit).) from Marine_Hash.))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Marine_Infection_x Less than 0
Then - Actions
Set Variable Set Marine_Infection_x = "0"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Marine_Infection_x Greater than 99
Then - Actions
Set Variable Set Marine_Infection_x = "99"
Else - Actions
Hashtable - Save Marine_Infection_x as 27 of (Key (Picked unit).) in Marine_Hash .
Hero - Add (Marine_Infection_x - (Hero experience of (Picked unit))) experience to (Picked unit) , Hide level-up graphics
-------- Effect --------
Player - Make Player_Monsterowner treat (Owner of (Picked unit)) as an Enemy
Player - Make (Owner of (Picked unit)) treat Player_Monsterowner as an Enemy
Unit - Change color of (Picked unit) to (Color of (Owner of (Picked unit)))
Special Effect - Destroy (Load 28 of (Key (Picked unit).) in Marine_Hash.)
Special Effect - Destroy (Load 29 of (Key (Picked unit).) in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Marine_Infection_x Greater than or equal to 30
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Picked unit) using Units\Undead\PlagueCloud\PlagueCloudtarget.mdl
Hashtable - Save Handle Of (Last created special effect) as 28 of (Key (Picked unit).) in Marine_Hash .
Else - Actions
-------- Critical --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Marine_Infection_x Greater than or equal to 75
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Picked unit) using Objects\Spawnmodels\Other\OrcBloodCinematicEffect\OrcBloodCinematicEffect.mdl
Special Effect - Destroy (Last created special effect)
-------- Hp drain --------
Set Variable Set x = (Random integer number between 1 and 75)
Set Variable Set x = (x - (Marine_Infection_x - 75))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Less than or equal to 20
Then - Actions
Unit - Cause (Picked unit) to damage (Picked unit) , dealing (Random real number between 8.00 and 60.00) damage of attack type Spells and damage type Death
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Picked unit) using Objects\Spawnmodels\Human\HumanBlood\HumanBloodRifleman.mdl
Else - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Picked unit) using Objects\Spawnmodels\Human\HumanBlood\HumanBloodFootman.mdl
Hashtable - Save Handle Of (Last created special effect) as 29 of (Key (Picked unit).) in Marine_Hash .
Else - Actions
-------- Control loss --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 0
x Less than or equal to 2
(Load 16 of (Key (Picked unit).) from Marine_Hash.) Equal to False
Then - Actions
Set Variable Set PG = (Player group((Owner of (Picked unit))))
Game - Display to PG for 0.01 seconds the text: |cffff0000The infection took over!|r
Custom script: call DestroyForce(udg_PG)
Player - Make Player_Monsterowner treat (Owner of (Picked unit)) as an Neutral
Player - Make (Owner of (Picked unit)) treat Player_Monsterowner as an Neutral
Set Variable Set Player_MouseDownAfterDblClick[(Player number of (Owner of (Picked unit)))] = "false"
Unit - Order (Picked unit) to Stop .
Unit - Change color of (Picked unit) to Maroon
Set Variable Set P = (Position of (Picked unit))
Unit - Create 1 . Dummy (Default 5sec) for Neutral Passive at P facing Default building facing degrees
Unit - Add Stun (5sec) to (Last created unit)
Unit - Order (Last created unit) to Neutral - Firebolt . (Picked unit)
-------- Sludges --------
For each (Integer A) from 1 to (Random integer number between 2 and 5) , do (Actions)
Loop - Actions
Unit - Create 1 . Living Slime for Player_Monsterowner at P facing (Random angle) degrees
Set Variable Set P2 = (P offset by (Random real number between 300.00 and 600.00) towards (Facing of (Last created unit)) degrees.)
Unit - Order (Last created unit) to Attack-Move To . P2
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Set Variable Set PG = (Player group((Owner of (Picked unit))))
Game - Display to PG for 0.01 seconds the text: |cffff0000Infection level critical!|r
Custom script: call DestroyForce(udg_PG)
Else - Actions
-------- Color --------
Set Variable Set r = ((Real(Marine_Infection_x)) x 0.25)
Set Variable Set r = (100.00 - r)
Set Variable Set r2 = ((Real(Marine_Infection_x)) x 0.75)
Set Variable Set r2 = (100.00 - r2)
Animation - Change (Picked unit) 's vertex coloring to ( r %, r2 %, r2 %) with 0 % transparency
Marine DontAttTransformed
Events
Conditions
(Owner of (Attacking unit)) Equal to Player_Monsterowner
((Owner of (Attacking unit)) is an enemy of (Owner of (Attacked unit)).) Equal to False
Actions
Unit - Order (Attacking unit) to Stop .
Marine Flashlight Move
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
Unit Group - Pick every unit in UG_FlashlightUnits and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is alive) Equal to True
Then - Actions
-------- Flashlight --------
Set Variable Set unit = (Load 39 of (Key (Picked unit).) in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(unit is alive) Equal to True
Then - Actions
Set Variable Set P = (Position of (Picked unit))
Custom script: set udg_r = GetLocationZ(udg_P)
Set Variable Set r3 = (r + (Current flying height of (Picked unit)))
Set Variable Set P2 = (P offset by 128.00 towards (Facing of (Picked unit)) degrees.)
Custom script: set udg_r2 = GetLocationZ(udg_P2)
Set Variable Set r3 = (r3 - r2)
Set Variable Set r3 = (r3 + 150.00)
Unit - Move unit instantly to P2
Animation - Change unit flying height to r3 at 0.00
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Else - Actions
SMG Init
Events
Map initialization
Conditions
Actions
Set Variable Set SMG_HeatCritical = "60"
Set Variable Set UG = (Units of type Stationary MG)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Set Variable Set SMG_Count = (SMG_Count + 1)
Set Variable Set SMG_Unit[SMG_Count] = (Picked unit)
Set Variable Set SMG_Ammo[SMG_Count] = (Random integer number between 150 and 450)
Set Variable Set SMG_DefaultAngle[SMG_Count] = (Facing of (Picked unit))
Unit Group - Remove SMG_Unit[SMG_Count] from UG .
Unit - Set the custom value of (Picked unit) to SMG_Count
Trigger - Add to SMG_Refill <gen> the event ((Picked unit) Begins casting an ability)
Trigger - Add to SMG_WithinRange <gen> the event (A unit comes within 175.00 of (Picked unit))
Custom script: call DestroyGroup(udg_UG)
SMG Smart Order
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 (Triggering unit)) Equal to Stationary MG
Actions
Set Variable Set Marine_Fire_Unit = (Triggering unit)
Set Variable Set P = (Position of (Triggering unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Target unit of issued order) is alive) Equal to True
Then - Actions
Set Variable Set Marine_Fire_Target = (Position of (Target unit of issued order))
Else - Actions
Set Variable Set Marine_Fire_Target = (Target point of issued order)
Unit Group - Add (Triggering unit) to UG_OrderStop
Trigger - Turn on Marine_Order_Stop <gen>
Set Variable Set x = (Custom value of (Triggering unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Abs((SMG_DefaultAngle[x] - (Angle from P to Marine_Fire_Target)))) Less than or equal to 80.00
(Abs((SMG_DefaultAngle[x] - (Angle from P to Marine_Fire_Target)))) Greater than or equal to 280.00
Then - Actions
Unit - Move (Triggering unit) instantly to P , facing Marine_Fire_Target
Set Variable Set r = (Angle from P to Marine_Fire_Target)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((SMG_DefaultAngle[x] - (Angle from P to Marine_Fire_Target)))) Greater than 80.00
(Abs((SMG_DefaultAngle[x] - (Angle from P to Marine_Fire_Target)))) Less than or equal to 180.00
Then - Actions
Unit - Move (Triggering unit) instantly to P , facing (SMG_DefaultAngle[x] - 80.00) degrees
Set Variable Set r = (SMG_DefaultAngle[x] - 80.00)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((SMG_DefaultAngle[x] - (Angle from P to Marine_Fire_Target)))) Greater than 180.00
(Abs((SMG_DefaultAngle[x] - (Angle from P to Marine_Fire_Target)))) Less than 280.00
Then - Actions
Unit - Move (Triggering unit) instantly to P , facing (SMG_DefaultAngle[x] + 80.00) degrees
Set Variable Set r = (SMG_DefaultAngle[x] + 80.00)
Else - Actions
Set Variable Set r2 = (Distance between P and Marine_Fire_Target)
Hashtable - Save r as 37 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save r2 as 38 of (Key (Triggering unit).) in Marine_Hash .
Unit Group - Add (Triggering unit) to UG_FireWhenAngleOk
Trigger - Turn on Marine_FireWhenAngleOk <gen>
Custom script: call RemoveLocation(udg_P)
Custom script: call RemoveLocation(udg_Marine_Fire_Target)
SMG Select
Events
Conditions
(Unit-type of (Triggering unit)) Equal to Stationary MG
(Owner of (Triggering unit)) Equal to Neutral Passive
Actions
Set Variable Set x = (Custom value of (Triggering unit))
Set Variable Set P = (Position of Player_Marine[(Player number of (Triggering player))])
Set Variable Set P2 = (Position of (Triggering unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
SMG_Heat[x] Less than (Integer(((Real(SMG_HeatCritical)) x 0.80)))
SMG_Ammo[x] Greater than 0
(Distance between P and P2) Less than 200.00
(Player_Marine[(Player number of (Triggering player))] is alive) Equal to True
Then - Actions
Unit - Change ownership of (Triggering unit) to (Triggering player) and Change color
Set Variable Set Player_SelectedUnit[(Player number of (Triggering player))] = (Triggering unit)
Else - Actions
Custom script: call RemoveLocation(udg_P)
Custom script: call RemoveLocation(udg_P2)
Unit - Order Player_Marine[(Player number of (Triggering player))] to Stop .
SMG Ammo Float
Events
Time - Elapsed game time is 1.00 seconds
Conditions
Actions
For each (Integer SMG_FloatUpdateA ) from 1 to SMG_Count , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
SMG_FloatCreated[SMG_FloatUpdateA] Equal to True
Then - Actions
Floating Text - Destroy SMG_Float[SMG_FloatUpdateA]
Set Variable Set SMG_FloatCreated[SMG_FloatUpdateA] = "false"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(SMG_Unit[SMG_FloatUpdateA] is hidden) Equal to False
Then - Actions
Floating Text - Create floating text that reads (String(SMG_Ammo[SMG_FloatUpdateA])) above SMG_Unit[SMG_FloatUpdateA] with Z offset 64.00 , using font size 8.00 , color ( 100 %, 100 %, 100 %), and 50.00 % transparency
Set Variable Set SMG_Float[SMG_FloatUpdateA] = (Last created floating text)
Set Variable Set SMG_FloatCreated[SMG_FloatUpdateA] = "true"
Else - Actions
SMG Heat
Events
Time - Every 3.00 seconds of game time
Conditions
Actions
For each (Integer A) from 1 to SMG_Count , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
SMG_Heat[(Integer A)] Greater than or equal to 6
Then - Actions
Set Variable Set SMG_Heat[(Integer A)] = (SMG_Heat[(Integer A)] - 6)
Else - Actions
Set Variable Set SMG_Heat[(Integer A)] = "0"
Set Variable Set r = "100.00"
Set Variable Set r2 = (100.00 - (Real(SMG_Heat[(Integer A)])))
Animation - Change SMG_Unit[(Integer A)] 's vertex coloring to ( r %, r2 %, r2 %) with 0 % transparency
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
SMG_Heat[(Integer A)] Less than (Integer((0.80 x (Real(SMG_HeatCritical)))))
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
SMG_Heat[(Integer A)] Greater than (Integer((0.60 x (Real(SMG_HeatCritical)))))
(Owner of SMG_Unit[(Integer A)]) Not equal to Neutral Passive
Then - Actions
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of SMG_Unit[(Integer A)] using Environment\LargeBuildingFire\LargeBuildingFire1.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
Else - Actions
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of SMG_Unit[(Integer A)] using Environment\LargeBuildingFire\LargeBuildingFire1.mdl
Special Effect - Destroy (Last created special effect)
SMG Refill
Events
Conditions
(Ability being cast) Equal to Refill MG
Actions
Set Variable Set x = (Player number of (Owner of (Triggering unit)))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[x] has an item of type |cff7DBEF1Magazine [|r5.56mm (for M249)|cff7DBEF1]) Equal to True
Then - Actions
Set Variable Set WeaponAquire_Item = (Item carried by Player_Marine[x] of type |cff7DBEF1Magazine [|r5.56mm (for M249)|cff7DBEF1])
Set Variable Set x2 = (Charges remaining in WeaponAquire_Item)
Set Variable Set x2 = (x2 - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Equal to 0
Then - Actions
Item - Remove WeaponAquire_Item
Else - Actions
Item - Set charges remaining in WeaponAquire_Item to x2
Set Variable Set SMG_Ammo[(Custom value of (Triggering unit))] = (SMG_Ammo[(Custom value of (Triggering unit))] + 100)
Else - Actions
Set Variable Set PG = (Player group((Owner of (Triggering unit))))
Game - Display to PG for 1.00 seconds the text: |cffff0000No ammunition to refill MG with.
Custom script: call DestroyForce(udg_PG)
SMG WithinRange
Events
Conditions
(Unit-type of (Triggering unit)) Equal to Marine
Player_AutouseMG[(Player number of (Owner of (Triggering unit)))] Equal to True
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Set Variable Set Player_AutouseMG[(Player number of (Owner of (Triggering unit)))] = "false"
Wait 0.10 seconds
Custom script: set udg_unit = tempunit
Set Variable Set P = (Position of unit)
Set Variable Set UG = (Units within 200.00 of P matching (((Owner of (Matching unit)) Equal to Neutral Passive) and ((Unit-type of (Matching unit)) Equal to Stationary MG)).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG) Greater than 0
Then - Actions
Set Variable Set unit2 = (Random unit from UG)
Selection - Select unit2 for (Owner of unit)
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
MS Infection Remove
Events
Time - Every 0.20 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_RemoveInfection) Greater than 0
Then - Actions
Unit Group - Pick every unit in UG_RemoveInfection and do (Actions)
Loop - Actions
Set Variable Set x = (Key (Picked unit).)
Set Variable Set x2 = (Load 13 of x from Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Equal to 0
Then - Actions
Unit Group - Remove (Picked unit) from UG_RemoveInfection .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 0
Then - Actions
Set Variable Set x2 = (x2 - 1)
Set Variable Set Marine_Infection_x = (Load 27 of x from Marine_Hash.)
Set Variable Set Marine_Infection_x = (Marine_Infection_x - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Marine_Infection_x Less than 0
Then - Actions
Set Variable Set Marine_Infection_x = "0"
Set Variable Set x2 = "0"
Else - Actions
Hero - Add -1 experience to (Picked unit) , Hide level-up graphics
Hashtable - Save Marine_Infection_x as 27 of x in Marine_Hash .
Hashtable - Save x2 as 13 of x in Marine_Hash .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Less than 0
Then - Actions
Set Variable Set x2 = (x2 + 1)
Set Variable Set Marine_Infection_x = (Load 27 of x from Marine_Hash.)
Set Variable Set Marine_Infection_x = (Marine_Infection_x + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Marine_Infection_x Greater than 99
Then - Actions
Set Variable Set Marine_Infection_x = "99"
Set Variable Set x2 = "0"
Else - Actions
Hero - Add 1 experience to (Picked unit) , Hide level-up graphics
Hashtable - Save Marine_Infection_x as 27 of x in Marine_Hash .
Hashtable - Save x2 as 13 of x in Marine_Hash .
Else - Actions
Else - Actions
Trigger - Turn off (This trigger)
MS NightvisionToggle
Events
Conditions
Or - Any (Conditions) are true
Conditions
(Issued order) Equal to (Order(immolation))
(Issued order) Equal to (Order(unimmolation))
(Unit-type of (Triggering unit)) Equal to Marine
Actions
Set Variable Set Player_CamSet = (Owner of (Triggering unit))
Trigger - Run Camera_SetForPlayer_PlayerCamSet <gen> (checking conditions)
MS Nightvision NoMana
Events
Conditions
Actions
Unit - Order (Triggering unit) to Night Elf Demon Hunter - Deactivate Immolation .
MS Heal
Events
Conditions
(Ability being cast) Equal to First Aid Treatment
Actions
Set Variable Set Marine_Infection_x = (Load 13 of (Key (Target unit of ability being cast).) from Marine_Hash.)
Set Variable Set Marine_Infection_x = (Marine_Infection_x + 5)
Hashtable - Save Marine_Infection_x as 13 of (Key (Target unit of ability being cast).) in Marine_Hash .
Unit Group - Add (Target unit of ability being cast) to UG_RemoveInfection
Trigger - Turn on MS_Infection_Remove <gen>
MS Combat Cocktail
Events
Conditions
(Ability being cast) Equal to Inject Combat Cocktail
Actions
Set Variable Set Marine_Infection_x = (Load 13 of (Key (Target unit of ability being cast).) from Marine_Hash.)
Set Variable Set Marine_Infection_x = (Marine_Infection_x + 30)
Hashtable - Save Marine_Infection_x as 13 of (Key (Target unit of ability being cast).) in Marine_Hash .
Unit Group - Add (Target unit of ability being cast) to UG_RemoveInfection
Trigger - Turn on MS_Infection_Remove <gen>
MS Revive
Events
Conditions
Or - Any (Conditions) are true
Conditions
(Ability being cast) Equal to Revive
(Ability being cast) Equal to Revive (item)
Actions
Custom script: local effect eff
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Set Variable Set P = (Position of (Triggering unit))
Set Variable Set x = "0"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 0
Then - Actions
Set Variable Set unit2 = Player_Marine[(Integer A)]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
(unit2 is alive) Equal to False
((Owner of (Triggering unit)) is an enemy of (Player((Integer A))).) Equal to False
Then - Actions
Set Variable Set Marine_Revive_P = (Position of unit2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and Marine_Revive_P) Less than 150.00
Then - Actions
Unit - Set mana of (Triggering unit) to ((Mana of (Triggering unit)) - 10.00)
Special Effect - Create a special effect at Marine_Revive_P using Abilities\Spells\Human\ManaFlare\ManaFlareBoltImpact.mdl
Custom script: set eff = bj_lastCreatedEffect
Hashtable - Save Handle Of unit2 as 24 of (Key (Triggering unit).) in Marine_Hash .
Set Variable Set x = "1"
Else - Actions
Custom script: call RemoveLocation(udg_Marine_Revive_P)
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 0
Then - Actions
Set Variable Set PG = (Player group((Owner of (Triggering unit))))
Game - Display to PG for 1.00 seconds the text: |cffff0000No valid target nearby.
Custom script: call DestroyForce(udg_PG)
Unit - Order (Triggering unit) to Stop .
Skip remaining actions
Else - Actions
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Custom script: set udg_unit = tempunit
Trigger - Run MS_Revive_1sec_check <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 0
Then - Actions
Skip remaining actions
Else - Actions
Custom script: set eff = bj_lastCreatedEffect
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Custom script: set udg_unit = tempunit
Trigger - Run MS_Revive_1sec_check <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 0
Then - Actions
Skip remaining actions
Else - Actions
Custom script: set eff = bj_lastCreatedEffect
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Custom script: set udg_unit = tempunit
Trigger - Run MS_Revive_1sec_check <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 0
Then - Actions
Skip remaining actions
Else - Actions
Custom script: set eff = bj_lastCreatedEffect
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Custom script: set udg_unit = tempunit
Trigger - Run MS_Revive_1sec_check <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 0
Then - Actions
Skip remaining actions
Else - Actions
Custom script: set eff = bj_lastCreatedEffect
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Custom script: set udg_unit = tempunit
Trigger - Run MS_Revive_1sec_check <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 0
Then - Actions
Skip remaining actions
Else - Actions
Custom script: set eff = bj_lastCreatedEffect
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Custom script: set udg_unit = tempunit
Trigger - Run MS_Revive_1sec_check <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 0
Then - Actions
Skip remaining actions
Else - Actions
Custom script: set eff = bj_lastCreatedEffect
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Custom script: set udg_unit = tempunit
Trigger - Run MS_Revive_1sec_check <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 0
Then - Actions
Skip remaining actions
Else - Actions
Custom script: set eff = bj_lastCreatedEffect
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Custom script: set udg_unit = tempunit
Custom script: set udg_x = GetHandleId(udg_unit)
Set Variable Set Marine_Revive_Unit = (Load 24 of x in Marine_Hash.)
Set Variable Set Marine_Revive_P = (Position of Marine_Revive_Unit)
Trigger - Run Marine_Revive <gen> (checking conditions)
Unit - Order unit to Stop .
MS Revive 1sec check
Events
Conditions
Actions
Set Variable Set x2 = "0"
Custom script: set udg_x = GetHandleId(udg_unit)
Set Variable Set Marine_Revive_Unit = (Load 24 of x in Marine_Hash.)
Set Variable Set P = (Position of unit)
Set Variable Set Marine_Revive_P = (Position of Marine_Revive_Unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(unit is alive) Equal to False
(Marine_Revive_Unit is alive) Equal to True
(Distance between P and Marine_Revive_P) Greater than 150.00
(Current order of unit) Not equal to (Order(darkportal))
(Mana of unit) Less than 10
Then - Actions
Unit - Order unit to Stop .
Custom script: call RemoveLocation(udg_P)
Custom script: call RemoveLocation(udg_Marine_Revive_P)
Set Variable Set x2 = "1"
Skip remaining actions
Else - Actions
Custom script: call RemoveLocation(udg_P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 5) Equal to 1
Then - Actions
Unit - Order unit to Stop .
Trigger - Run Marine_Revive <gen> (checking conditions)
Set Variable Set x2 = "2"
Skip remaining actions
Else - Actions
Unit - Set mana of unit to ((Mana of unit) - 10.00)
Special Effect - Create a special effect at Marine_Revive_P using Abilities\Spells\Human\ManaFlare\ManaFlareBoltImpact.mdl
Custom script: call RemoveLocation(udg_Marine_Revive_P)
MS Place Mine Barricade
Events
Conditions
Or - Any (Conditions) are true
Conditions
(Ability being cast) Equal to Place Anti-Person Mine
(Ability being cast) Equal to Place Anti-Tank Mine
(Ability being cast) Equal to Place Remote-Controlled Mine
(Ability being cast) Equal to Construct Barricade
Actions
Set Variable Set P = (Target point of ability being cast)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Ability being cast) Equal to Construct Barricade
Then - Actions
Unit - Create 1 . Barricade for (Owner of (Triggering unit)) at P facing (Facing of (Triggering unit)) degrees
Unit - Remove Ghost (Visible) from (Last created unit)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Ability being cast) Equal to Place Anti-Person Mine
Then - Actions
Unit - Create 1 . Anti-Person Mine for (Owner of (Triggering unit)) at P facing (Random angle) degrees
Trigger - Add to MS_Mine_AutoDetonate <gen> the event (A unit comes within 70.00 of (Last created unit))
Trigger - Add to MS_Mine_Death <gen> the event ((Last created unit) Dies)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Ability being cast) Equal to Place Anti-Tank Mine
Then - Actions
Unit - Create 1 . Anti-Tank Mine for (Owner of (Triggering unit)) at P facing (Random angle) degrees
Trigger - Add to MS_Mine_AutoDetonate <gen> the event (A unit comes within 100.00 of (Last created unit))
Trigger - Add to MS_Mine_Death <gen> the event ((Last created unit) Dies)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Ability being cast) Equal to Place Remote-Controlled Mine
Then - Actions
Unit - Create 1 . Remote-Controlled Mine for (Owner of (Triggering unit)) at P facing (Random angle) degrees
Trigger - Add to MS_Mine_Death <gen> the event ((Last created unit) Dies)
Set Variable Set x = (Key (Last created unit).)
Unit - Create 1 . Light Red (Nades) for (Owner of (Triggering unit)) at P facing (Random angle) degrees
Hashtable - Save Handle Of (Last created unit) as 14 of x in Hash_Main .
Special Effect - Create a special effect at P using Abilities\Spells\Other\Incinerate\IncinerateBuff.mdl
Hashtable - Save Handle Of (Last created special effect) as 13 of (Key (Last created unit).) in Hash_Main .
Unit - Add a 30.00 second Generic expiration timer to (Last created unit)
Else - Actions
Custom script: call RemoveLocation(udg_P)
MS Mine AutoDetonate
Events
Conditions
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Wait 0.20 seconds
Custom script: set udg_unit = tempunit
Set Variable Set P = (Position of unit)
Set Variable Set UG = (Units within 110.00 of P matching ((((Matching unit) is alive) Equal to True) and (((Owner of unit) is an enemy of (Owner of (Matching unit)).) Equal to True)).)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Picked unit)) Equal to Anti-Person Mine
(Point-value of unit) Greater than or equal to 100
Then - Actions
Unit - Kill (Picked unit)
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
MS Mine Death
Events
Conditions
Actions
Set Variable Set Explosion_Caster = Player_Marine[(Player number of (Owner of (Triggering unit)))]
Set Variable Set Explosion_Origin = (Position of (Triggering unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Anti-Person Mine
Then - Actions
Set Variable Set Explosion_Range = "500.00"
Set Variable Set Explosion_MaxDmg = "700.00"
Set Variable Set Explosion_Type = "3"
Trigger - Run Create_Explosion <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to Anti-Tank Mine
(Unit-type of (Triggering unit)) Equal to Remote-Controlled Mine
(Unit-type of (Triggering unit)) Equal to Explosives
Then - Actions
Set Variable Set Explosion_Range = "300.00"
Set Variable Set Explosion_Type = "1"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Remote-Controlled Mine
Then - Actions
Unit - Kill (Load 14 of (Key (Triggering unit).) in Hash_Main.)
Set Variable Set Explosion_MaxDmg = "800.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Anti-Tank Mine
Then - Actions
Set Variable Set Explosion_MaxDmg = "1300.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Explosives
Then - Actions
Set Variable Set Explosion_MaxDmg = "500.00"
Else - Actions
Trigger - Run Create_Explosion <gen> (checking conditions)
Else - Actions
MS MG PackUp TargetCheck
Events
Conditions
(Ability being cast) Equal to Pack Up Stationary MG
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Target unit of ability being cast)) Equal to Stationary MG
Then - Actions
Hashtable - Save Handle Of (Target unit of ability being cast) as 31 of (Key (Triggering unit).) in Marine_Hash .
Else - Actions
Unit - Order (Triggering unit) to Stop .
MS MG PackUp
Events
Conditions
(Ability being cast) Equal to Pack Up Stationary MG
Actions
Set Variable Set unit = (Load 31 of (Key (Triggering unit).) in Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Stationary MG
(unit is hidden) Equal to False
Then - Actions
Unit - Hide unit
Unit - Turn collision for unit Off .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of unit) Not equal to Neutral Passive
Then - Actions
Unit - Unpause Player_Marine[(Player number of (Owner of unit))]
Unit - Change ownership of unit to Neutral Passive and Change color
Else - Actions
Unit - Remove Pack Up Stationary MG from (Triggering unit)
Unit - Add Setup Stationary MG to (Triggering unit)
Else - Actions
Trigger - Run SMG_Ammo_Float <gen> (checking conditions)
MS MG SetUp
Events
Conditions
(Ability being cast) Equal to Setup Stationary MG
Actions
Set Variable Set unit = (Load 31 of (Key (Triggering unit).) in Marine_Hash.)
Set Variable Set P = (Target point of ability being cast)
Unit - Move unit instantly to P , facing (Facing of (Triggering unit)) degrees
Set Variable Set SMG_DefaultAngle[(Custom value of unit)] = (Facing of (Triggering unit))
Custom script: call RemoveLocation(udg_P)
Unit - Unhide unit
Unit - Turn collision for unit On .
Unit - Remove Setup Stationary MG from (Triggering unit)
Unit - Add Pack Up Stationary MG to (Triggering unit)
Trigger - Run SMG_Ammo_Float <gen> (checking conditions)
MS Ping Dropoff Point
Events
Conditions
(Ability being cast) Equal to Ping Dropoff Point
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_WaveIndex Greater than 0
Then - Actions
Game - Display to (All players) for 3.00 seconds the text: |cff7DBEF1Base Operator:|r Ammunition has been dropped there. Good luck to you guys!
Cinematic - Ping minimap for (All players) at Wave_WeaponDropPoint for 15.00 seconds, using a Simple ping of color ( 50.00 %, 70.00 %, 95.00 %)
Else - Actions
Unit - Set mana of (Triggering unit) to ((Mana of (Triggering unit)) + 10.00)
MS Track Enemies
Events
Conditions
(Ability being cast) Equal to Track Enemies
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Set Variable Set PG = (Player group((Owner of unit)))
Unit Group - Pick every unit in UG_AliveMarines and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) belongs to an enemy of (Owner of unit).) Equal to True
Then - Actions
Set Variable Set P = (Position of (Picked unit))
Cinematic - Ping minimap for PG at P for 2.00 seconds, using a Simple ping of color ( 50.00 %, 70.00 %, 95.00 %)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Custom script: call DestroyForce(udg_PG)
Wait 2.00 seconds
Custom script: set udg_unit = tempunit
Set Variable Set PG = (Player group((Owner of unit)))
Unit Group - Pick every unit in UG_AliveMarines and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) belongs to an enemy of (Owner of unit).) Equal to True
Then - Actions
Set Variable Set P = (Position of (Picked unit))
Cinematic - Ping minimap for PG at P for 2.00 seconds, using a Simple ping of color ( 50.00 %, 70.00 %, 95.00 %)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Custom script: call DestroyForce(udg_PG)
Wait 2.00 seconds
Custom script: set udg_unit = tempunit
Set Variable Set PG = (Player group((Owner of unit)))
Unit Group - Pick every unit in UG_AliveMarines and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) belongs to an enemy of (Owner of unit).) Equal to True
Then - Actions
Set Variable Set P = (Position of (Picked unit))
Cinematic - Ping minimap for PG at P for 2.00 seconds, using a Simple ping of color ( 50.00 %, 70.00 %, 95.00 %)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Custom script: call DestroyForce(udg_PG)
MS Airstrike Cast FirstPoint
Events
Conditions
(Ability being cast) Equal to Airstrike
Actions
Set Variable Set x = (Key (Triggering unit).)
Hashtable - Save Handle Of (Target point of ability being cast) as 32 of x in Marine_Hash .
Set Variable Set P = (Target point of ability being cast)
Special Effect - Create a special effect at P using Abilities\Spells\Orc\Bloodlust\BloodlustTarget.mdl
Hashtable - Save Handle Of (Last created special effect) as 35 of x in Marine_Hash .
Custom script: call RemoveLocation(udg_P)
Unit - Remove Airstrike from (Triggering unit)
Unit - Add Airstrike Target to (Triggering unit)
Game - Force (Owner of (Triggering unit)) to press the key F .
MS Airstrike Cast Destination
Events
Conditions
(Ability being cast) Equal to Airstrike Target
Actions
Set Variable Set x = (Key (Triggering unit).)
Hashtable - Save Handle Of (Target point of ability being cast) as 33 of x in Marine_Hash .
Hashtable - Save -10 as 34 of x in Marine_Hash .
Set Variable Set P = (Target point of ability being cast)
Special Effect - Create a special effect at P using Abilities\Spells\Orc\Bloodlust\BloodlustTarget.mdl
Sound - Play AirstrikeIncoming <gen> at 100 % volume, located at P with Z offset 1000.00
Hashtable - Save Handle Of (Last created special effect) as 36 of x in Marine_Hash .
Custom script: call RemoveLocation(udg_P)
Game - Display to (All players) for 3.00 seconds the text: |cff7DBEF1Operator:|r Airstrike incoming!
Sound - Play walkie_talkie <gen>
Unit Group - Add (Triggering unit) to UG_AirstrikeCasters
Trigger - Turn on MS_Airstrike_Main <gen>
Unit - Remove Airstrike Target from (Triggering unit)
Unit - Add Airstrike to (Triggering unit)
32: Airstrike Target Point
33: Airstrike Destination Point
34: Airstrike bombs dropped count
35: Airstrike target effect
36: Airstrike destination effect
MS Airstrike Main
Events
Time - Every 0.20 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_AirstrikeCasters) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
Unit Group - Pick every unit in UG_AirstrikeCasters and do (Actions)
Loop - Actions
Set Variable Set x = (Key (Picked unit).)
Set Variable Set P = (Load 32 of x in Marine_Hash.)
Set Variable Set P2 = (Load 33 of x in Marine_Hash.)
Set Variable Set r = (Angle from P to P2)
Set Variable Set x2 = (Load 34 of x from Marine_Hash.)
Set Variable Set x2 = (x2 + 1)
Hashtable - Save x2 as 34 of x in Marine_Hash .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 0
x2 Less than or equal to 10
Then - Actions
Set Variable Set r2 = ((Real(x2)) x 128.00)
Set Variable Set r3 = (25.00 - ((Real(x2)) x 2.00))
Set Variable Set r3 = (Random real number between 0 and r3)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(x2 mod 2) Equal to 1
Then - Actions
Set Variable Set r = (r + r3)
Set Variable Set P2 = (P offset by r2 towards r degrees.)
Unit - Create 1 . Light Red (Nades) for Neutral Passive at P2 facing Default building facing degrees
Unit - Add a 1.00 second Generic expiration timer to (Last created unit)
Else - Actions
Set Variable Set r3 = (r3 x -1.00)
Set Variable Set r = (r + r3)
Set Variable Set P2 = (P offset by r2 towards r degrees.)
-------- Create Explosion --------
Set Variable Set Explosion_Caster = (Picked unit)
Set Variable Set Explosion_Origin = (P2 offset by (0.01, 0))
Set Variable Set Explosion_Range = "500.00"
Set Variable Set Explosion_MaxDmg = "500.00"
Set Variable Set Explosion_Type = "4"
Trigger - Run Create_Explosion <gen> (checking conditions)
Custom script: call RemoveLocation(udg_P2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 10
Then - Actions
Unit Group - Remove (Picked unit) from UG_AirstrikeCasters .
Custom script: call RemoveLocation(udg_P)
Custom script: call RemoveLocation(udg_P2)
Special Effect - Destroy (Load 35 of x in Marine_Hash.)
Special Effect - Destroy (Load 36 of x in Marine_Hash.)
Else - Actions
MS Concentrate
Events
Conditions
(Ability being cast) Equal to Concentrate
Actions
Custom script: local integer xtemp
Set Variable Set x = (Key (Triggering unit).)
Hashtable - Save 3.00 as 45 of x in Marine_Hash .
Set Variable Set player = (Owner of (Triggering unit))
Custom script: if GetLocalPlayer( ) == udg_player then
Sound - Play breath <gen>
Custom script: endif
Custom script: set xtemp = udg_x
Wait 5.00 seconds
Custom script: set udg_x = xtemp
Hashtable - Save 0.00 as 45 of x in Marine_Hash .
MS ScarifyBullets Begin
Events
Conditions
(Issued order) Equal to (Order(whirlwind))
Actions
Set Variable Set x = (Key (Triggering unit).)
Set Variable Set item = (Load 8 of x in Marine_Hash.)
Set Variable Set PG = (Player group((Owner of (Triggering unit))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of item) Equal to |cff7DBEF1Weapon [|rAWP|cff7DBEF1]
(Item-type of item) Equal to |cff7DBEF1Weapon [|rM249|cff7DBEF1]
(Item-type of item) Equal to |cff7DBEF1Weapon [|rMP7|cff7DBEF1]
(Item-type of item) Equal to |cff7DBEF1Weapon [|rUSP|cff7DBEF1]
Then - Actions
Custom script: set udg_x2 = GetHandleId(udg_item)
Set Variable Set x5 = (Load 5 of x2 from Hash_Main.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x5 Equal to 0
Then - Actions
Set Variable Set P_SoundPlay = (Position of (Triggering unit))
Sound - Play (Load 13 of (Custom value of item) in WeaponData_Hash.) at 100 % volume, located at P_SoundPlay with Z offset 0
Custom script: call RemoveLocation(udg_P_SoundPlay)
Else - Actions
Game - Display to PG for 2.00 seconds the text: Can't scarify this ammo type.
Unit - Order (Triggering unit) to Stop .
Else - Actions
Game - Display to PG for 2.00 seconds the text: Can't scarify this ammo type.
Unit - Order (Triggering unit) to Stop .
Custom script: call DestroyForce(udg_PG)
MS ScarifyBullets Finish
Events
Conditions
(Ability being cast) Equal to Scarify Bullets
Actions
Set Variable Set x = (Key (Triggering unit).)
Set Variable Set item = (Load 8 of x in Marine_Hash.)
Set Variable Set PG = (Player group((Owner of (Triggering unit))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of item) Equal to |cff7DBEF1Weapon [|rAWP|cff7DBEF1]
(Item-type of item) Equal to |cff7DBEF1Weapon [|rM249|cff7DBEF1]
(Item-type of item) Equal to |cff7DBEF1Weapon [|rMP7|cff7DBEF1]
(Item-type of item) Equal to |cff7DBEF1Weapon [|rUSP|cff7DBEF1]
Then - Actions
Custom script: set udg_x2 = GetHandleId(udg_item)
Set Variable Set x5 = (Load 5 of x2 from Hash_Main.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x5 Equal to 0
Then - Actions
Set Variable Set x5 = "1"
Hashtable - Save x5 as 5 of x2 in Hash_Main .
Game - Display to PG for 2.00 seconds the text: Weapon loaded with blunt ammo.
Set Variable Set P_SoundPlay = (Position of (Triggering unit))
Sound - Play (Load 14 of (Custom value of item) in WeaponData_Hash.) at 100 % volume, located at P_SoundPlay with Z offset 0
Custom script: call RemoveLocation(udg_P_SoundPlay)
Else - Actions
Game - Display to PG for 2.00 seconds the text: Can't scarify this ammo type.
Else - Actions
Game - Display to PG for 2.00 seconds the text: Can't scarify this ammo type.
Custom script: call DestroyForce(udg_PG)
MS Leap
Events
Conditions
(Issued order) Equal to (Order(defend))
Actions
Custom script: local unit tempunit
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) is in UG_Velocity.) Equal to False
Then - Actions
Set Variable Set PowerPush_Unit = (Triggering unit)
Set Variable Set PowerPush_AngleXY = (Facing of (Triggering unit))
Set Variable Set PowerPush_PowerXY = "33.00"
Set Variable Set PowerPush_PowerZ = "20.00"
Unit - Order PowerPush_Unit to Stop .
Trigger - Run Velocity_PowerPush_PPunit <gen> (checking conditions)
Unit - Remove Leap from (Triggering unit)
Unit - Add Leap (Dummy replace ability) to (Triggering unit)
Custom script: set tempunit = GetTriggerUnit()
Wait 2.00 seconds
Custom script: set udg_unit = tempunit
Unit - Remove Leap (Dummy replace ability) from unit
Unit - Add Leap to unit
Else - Actions
MS Medic Items
Events
Conditions
Or - Any (Conditions) are true
Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Anti-Virus
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Medkit
Actions
Custom script: local effect eff
Set Variable Set Marine_Infection_x = (Load 13 of (Key (Triggering unit).) from Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Anti-Virus
Then - Actions
Set Variable Set Marine_Infection_x = (Marine_Infection_x + 50)
Else - Actions
Set Variable Set Marine_Infection_x = (Marine_Infection_x + 5)
Hashtable - Save Marine_Infection_x as 13 of (Key (Triggering unit).) in Marine_Hash .
Unit Group - Add (Triggering unit) to UG_RemoveInfection
Trigger - Turn on MS_Infection_Remove <gen>
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Item-type of (Item being manipulated)) Equal to |cff7DBEF1Anti-Virus
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\NightElf\FaerieDragonInvis\FaerieDragon_Invis.mdl
Custom script: set eff = bj_lastCreatedEffect
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Else - Actions
MS LQS Shockwave
Events
Conditions
(Ability being cast) Equal to Shockwave
Actions
Set Variable Set r3 = (Load 14 of (Key (Triggering unit).) from Marine_Hash.)
Set Variable Set r3 = (r3 + 100.00)
Set Variable Set P = (Position of (Triggering unit))
Set Variable Set r2 = "350.00"
Set Variable Set UG = (Units within r2 of P matching ((((Matching unit) is alive) Equal to True) and (((Owner of (Triggering unit)) is an enemy of (Owner of (Matching unit)).) Equal to True)).)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Set Variable Set P2 = (Position of (Picked unit))
Set Variable Set r = (Distance between P and P2)
Set Variable Set r = (r / r2)
Set Variable Set r = (1.00 - r)
Set Variable Set r = (r3 x r)
Unit - Cause (Triggering unit) to damage (Picked unit) , dealing r damage of attack type Spells and damage type Normal
Custom script: call RemoveLocation(udg_P2)
Hashtable - Save 0.00 as 14 of (Key (Triggering unit).) in Marine_Hash .
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
MS Plant Explosives Flares
Events
Unit - A unit enters (Entire map)
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Explosives
Then - Actions
Trigger - Add to MS_Mine_Death <gen> the event ((Triggering unit) Dies)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Road Flare
Then - Actions
Unit - Add a 30.00 second Generic expiration timer to (Triggering unit)
Set Variable Set P_PlaceStuff = (Position of (Triggering unit))
Special Effect - Create a special effect at P_PlaceStuff using FireplaceLight.mdx
Custom script: call RemoveLocation(udg_P_PlaceStuff)
Hashtable - Save Handle Of (Last created special effect) as 28 of (Key (Triggering unit).) in Hash_Main .
Trigger - Add to MS_FlareDeath <gen> the event ((Triggering unit) Dies)
Else - Actions
MS FlareDeath
Events
Conditions
Actions
Special Effect - Destroy (Load 28 of (Key (Triggering unit).) in Hash_Main.)
Jet Pack Init
Events
Map initialization
Conditions
Actions
Set Variable Set JetPack_MaxTotalHeight = (Game_BaseTerrainHeight + 450.00)
Set Variable Set JetPack_SteerSensivity = "0.40"
Set Variable Set JetPack_Speed = "25.00"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Trigger - Add to Jet_Pack_SteerON_Left <gen> the event ((Player((Integer A))) Presses the Left Arrow key)
Trigger - Add to Jet_Pack_SteerON_Right <gen> the event ((Player((Integer A))) Presses the Right Arrow key)
Trigger - Add to Jet_Pack_SteerON_Up <gen> the event ((Player((Integer A))) Presses the Up Arrow key)
Trigger - Add to Jet_Pack_SteerON_Down <gen> the event ((Player((Integer A))) Presses the Down Arrow key)
Trigger - Add to Jet_Pack_SteerOFF_Left <gen> the event ((Player((Integer A))) Releases the Left Arrow key)
Trigger - Add to Jet_Pack_SteerOFF_Right <gen> the event ((Player((Integer A))) Releases the Right Arrow key)
Trigger - Add to Jet_Pack_SteerOFF_Up <gen> the event ((Player((Integer A))) Releases the Up Arrow key)
Trigger - Add to Jet_Pack_SteerOFF_Down <gen> the event ((Player((Integer A))) Releases the Down Arrow key)
Else - Actions
Jet Pack Toggle
Events
Conditions
(Ability being cast) Equal to Toggle Jetpack
Actions
Set Variable Set Player_AutouseMG[(Player number of (Owner of (Triggering unit)))] = "false"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 16 of (Key (Triggering unit).) from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set JetPackOff_unit = (Triggering unit)
Trigger - Run Jet_Pack_TurnOff_JetPack_unit <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Mana of (Triggering unit)) Greater than or equal to 5.00
Then - Actions
Hashtable - Save 1 as 3 of (Key (Triggering unit).) in Marine_Hash .
Unit - Turn collision for (Triggering unit) Off .
Set Variable Set P = (Position of (Triggering unit))
Hashtable - Save True as 16 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save 0.00 as 17 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save 0.00 as 18 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save 1.00 as 19 of (Key (Triggering unit).) in Marine_Hash .
Unit Group - Add (Triggering unit) to UG_Velocity
Set Variable Set Player_CamSet = (Owner of (Triggering unit))
Trigger - Run Camera_SetForPlayer_PlayerCamSet <gen> (checking conditions)
Visibility - Create an initially Enabled visibility modifier for (Owner of (Triggering unit)) emitting Visibility from P to a radius of 1800.00 .
Hashtable - Save Handle Of (Last created visibility modifier) as 23 of (Key (Triggering unit).) in Marine_Hash .
-------- Effekte --------
Special Effect - Destroy (Load 20 of (Key (Triggering unit).) in Marine_Hash.)
Special Effect - Destroy (Load 21 of (Key (Triggering unit).) in Marine_Hash.)
Special Effect - Create a special effect attached to the foot, left (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Weapons\RedDragonBreath\RedDragonMissile.mdl
Hashtable - Save Handle Of (Last created special effect) as 20 of (Key (Triggering unit).) in Marine_Hash .
Special Effect - Create a special effect attached to the foot, right (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Weapons\RedDragonBreath\RedDragonMissile.mdl
Hashtable - Save Handle Of (Last created special effect) as 21 of (Key (Triggering unit).) in Marine_Hash .
Hashtable - Save False as 22 of (Key (Triggering unit).) in Marine_Hash .
-------- Gegner anzünden --------
Set Variable Set UG = (Units within 150.00 of P matching ((((Matching unit) is alive) Equal to True) and (((Owner of (Triggering unit)) is an enemy of (Owner of (Matching unit)).) Equal to True)).)
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Set Variable Set PG = (Player group((Owner of (Triggering unit))))
Game - Display to PG for 1.00 seconds the text: |cffff0000Not enough mana|r
Custom script: call DestroyForce(udg_PG)
Set Variable Set MarineSetMMSpeed_unit = (Triggering unit)
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
Set Variable Set x = (Key (Triggering unit).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 43 of x from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set P2 = (Load 44 of x in Marine_Hash.)
Custom script: call RemoveLocation(udg_P2)
Hashtable - Save False as 43 of x in Marine_Hash .
Else - Actions
Jet Pack SteerON Left
Events
Conditions
Actions
Set Variable Set x = (Player number of (Triggering player))
Set Variable Set Player_JetPack_Steer_LeftON[x] = "true"
Set Variable Set unit = Player_Marine[x]
Custom script: set udg_x = GetHandleId(udg_unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 43 of x from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set P2 = (Load 44 of x in Marine_Hash.)
Custom script: call RemoveLocation(udg_P2)
Hashtable - Save False as 43 of x in Marine_Hash .
Else - Actions
Jet Pack SteerON Right
Events
Conditions
Actions
Set Variable Set x = (Player number of (Triggering player))
Set Variable Set Player_JetPack_Steer_RightON[x] = "true"
Set Variable Set unit = Player_Marine[x]
Custom script: set udg_x = GetHandleId(udg_unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 43 of x from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set P2 = (Load 44 of x in Marine_Hash.)
Custom script: call RemoveLocation(udg_P2)
Hashtable - Save False as 43 of x in Marine_Hash .
Else - Actions
Jet Pack SteerON Up
Events
Conditions
Actions
Set Variable Set x = (Player number of (Triggering player))
Set Variable Set Player_JetPack_Steer_UpON[x] = "true"
Set Variable Set unit = Player_Marine[x]
Custom script: set udg_x = GetHandleId(udg_unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 43 of x from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set P2 = (Load 44 of x in Marine_Hash.)
Custom script: call RemoveLocation(udg_P2)
Hashtable - Save False as 43 of x in Marine_Hash .
Else - Actions
Jet Pack SteerON Down
Events
Conditions
Actions
Set Variable Set x = (Player number of (Triggering player))
Set Variable Set Player_JetPack_Steer_DownON[x] = "true"
Set Variable Set unit = Player_Marine[x]
Custom script: set udg_x = GetHandleId(udg_unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 43 of x from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set P2 = (Load 44 of x in Marine_Hash.)
Custom script: call RemoveLocation(udg_P2)
Hashtable - Save False as 43 of x in Marine_Hash .
Else - Actions
Jet Pack SteerOFF Left
Events
Conditions
Actions
Set Variable Set x = (Player number of (Triggering player))
Set Variable Set Player_JetPack_Steer_LeftON[x] = "false"
Jet Pack SteerOFF Right
Events
Conditions
Actions
Set Variable Set x = (Player number of (Triggering player))
Set Variable Set Player_JetPack_Steer_RightON[x] = "false"
Jet Pack SteerOFF Up
Events
Conditions
Actions
Set Variable Set x = (Player number of (Triggering player))
Set Variable Set Player_JetPack_Steer_UpON[x] = "false"
Jet Pack SteerOFF Down
Events
Conditions
Actions
Set Variable Set x = (Player number of (Triggering player))
Set Variable Set Player_JetPack_Steer_DownON[x] = "false"
17: ax
18: ay
19: az

43: Jetpack steer to point (bool)
44: Jetpack steer to point (point)
Jet Pack Main
Events
Time - Every 0.10 seconds of game time
Conditions
Actions
Unit Group - Pick every unit in UG_AliveMarines and do (Actions)
Loop - Actions
Set Variable Set x2 = (Key (Picked unit).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 16 of x2 from Marine_Hash.) Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Mana of (Picked unit)) Greater than or equal to 1.00
Then - Actions
Set Variable Set P = (Position of (Picked unit))
Unit - Set mana of (Picked unit) to ((Mana of (Picked unit)) - (Real(Game_Difficulty)))
Set Variable Set x = (Player number of (Owner of (Picked unit)))
-------- XY --------
Set Variable Set r_x = (Load 17 of x2 from Marine_Hash.)
Set Variable Set r_y = (Load 18 of x2 from Marine_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_JetPack_Steer_LeftON[x] Equal to True
Then - Actions
Set Variable Set r_x = (r_x - JetPack_SteerSensivity)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_x Less than -1.00
Then - Actions
Set Variable Set r_x = "-1.00"
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_JetPack_Steer_RightON[x] Equal to True
Then - Actions
Set Variable Set r_x = (r_x + JetPack_SteerSensivity)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_x Greater than 1.00
Then - Actions
Set Variable Set r_x = "1.00"
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_JetPack_Steer_UpON[x] Equal to True
Then - Actions
Set Variable Set r_y = (r_y + JetPack_SteerSensivity)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_y Greater than 1.00
Then - Actions
Set Variable Set r_y = "1.00"
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_JetPack_Steer_DownON[x] Equal to True
Then - Actions
Set Variable Set r_y = (r_y - JetPack_SteerSensivity)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_y Less than -1.00
Then - Actions
Set Variable Set r_y = "-1.00"
Else - Actions
Else - Actions
-------- Automatisch bremsen --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_JetPack_Steer_LeftON[x] Equal to False
Player_JetPack_Steer_RightON[x] Equal to False
(Abs(r_x)) Greater than 0.00
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(r_x)) Less than 0.10
Then - Actions
Set Variable Set r_x = "0.00"
Else - Actions
Set Variable Set r_x = (r_x - (0.10 x (r_x / (Abs(r_x)))))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_JetPack_Steer_UpON[x] Equal to False
Player_JetPack_Steer_DownON[x] Equal to False
(Abs(r_y)) Greater than 0.00
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(r_y)) Less than 0.10
Then - Actions
Set Variable Set r_y = "0.00"
Else - Actions
Set Variable Set r_y = (r_y - (0.10 x (r_y / (Abs(r_y)))))
Else - Actions
-------- Zu Punkt fliegen (Maussteuerung) --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 43 of x2 from Marine_Hash.) Equal to True
Then - Actions
Set Variable Set P2 = (Load 44 of x2 in Marine_Hash.)
Set Variable Set vX = (Load 6 of x2 from Hash_Main.)
Set Variable Set vY = (Load 7 of x2 from Hash_Main.)
Set Variable Set r = (Square root(((vX x vX) + (vY x vY))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P2) Greater than (25.00 + (r x 15.00))
Then - Actions
Set Variable Set r_x2 = ((X of P2) - (X of P))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_x2 Greater than 50.00
Then - Actions
Set Variable Set r_x = (r_x + JetPack_SteerSensivity)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_x Greater than 1.00
Then - Actions
Set Variable Set r_x = "1.00"
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_x2 Less than -50.00
Then - Actions
Set Variable Set r_x = (r_x - JetPack_SteerSensivity)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_x Less than -1.00
Then - Actions
Set Variable Set r_x = "-1.00"
Else - Actions
Else - Actions
Set Variable Set r_y2 = ((Y of P2) - (Y of P))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_y2 Greater than 50.00
Then - Actions
Set Variable Set r_y = (r_y + JetPack_SteerSensivity)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_y Greater than 1.00
Then - Actions
Set Variable Set r_y = "1.00"
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_y2 Less than -50.00
Then - Actions
Set Variable Set r_y = (r_y - JetPack_SteerSensivity)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_y Less than -1.00
Then - Actions
Set Variable Set r_y = "-1.00"
Else - Actions
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Hashtable - Save False as 43 of x2 in Marine_Hash .
Else - Actions
Hashtable - Save r_x as 17 of x2 in Marine_Hash .
Hashtable - Save r_y as 18 of x2 in Marine_Hash .
-------- Facing --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Abs(r_x)) Greater than 0.00
(Abs(r_y)) Greater than 0.00
Then - Actions
Set Variable Set r = (Atan2(r_y, r_x))
Unit - Make (Picked unit) face r over 0 seconds
Else - Actions
-------- Speed Z --------
Set Variable Set r = (Current flying height of (Picked unit))
Custom script: set udg_r2 = GetLocationZ(udg_P)
Custom script: call RemoveLocation(udg_P)
Set Variable Set r = (r + r2)
Set Variable Set r = (JetPack_MaxTotalHeight - r)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Less than 0.00
Then - Actions
Set Variable Set r = "0.00"
Else - Actions
Set Variable Set r = (r x 0.01)
Set Variable Set r = (r x 0.50)
Set Variable Set r = (r + Gravity)
Hashtable - Save r as 19 of x2 in Marine_Hash .
Else - Actions
Set Variable Set JetPackOff_unit = (Picked unit)
Trigger - Run Jet_Pack_TurnOff_JetPack_unit <gen> (checking conditions)
Else - Actions
Jet Pack TurnOff JetPack unit
Events
Conditions
Actions
Custom script: set udg_JetPackOff_x = GetHandleId(udg_JetPackOff_unit)
Hashtable - Save False as 16 of JetPackOff_x in Marine_Hash .
Set Variable Set MarineSetMMSpeed_unit = JetPackOff_unit
Trigger - Run Marine_Set_Movement_Speed <gen> (checking conditions)
Visibility - Destroy (Load 23 of JetPackOff_x in Marine_Hash.)
Hashtable - Save 0 as 3 of JetPackOff_x in Marine_Hash .
Unit - Turn collision for JetPackOff_unit On .
Set Variable Set Player_CamSet = (Owner of JetPackOff_unit)
Trigger - Run Camera_SetForPlayer_PlayerCamSet <gen> (checking conditions)
Hash_Main:
06: Velocity X
07: Velocity Y
08: Velocity Z
23: FlyingUnitAdjustHeight - Previous Terrain Height

17: Steer angle
18: Steer speed XY
19: Steer speed Z

P: Position
x: key
r4: Flying Height
r5: Terrain Height
Velocity
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
Unit Group - Pick every unit in UG_Velocity and do (Actions)
Loop - Actions
Set Variable Set x = (Key (Picked unit).)
Set Variable Set unit = (Picked unit)
Set Variable Set P = (Position of unit)
Set Variable Set r4 = (Current flying height of unit)
Custom script: set udg_r5 = GetLocationZ(udg_P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Corpse Muncher
Or - Any (Conditions) are true
Conditions
MonsterType_WaveIndex Equal to 6
MonsterType_WaveIndex Equal to 7
Then - Actions
Set Variable Set Velocity_IsDroppedOffGhoul = "true"
Else - Actions
Set Variable Set Velocity_IsDroppedOffGhoul = "false"
-------- Load --------
Set Variable Set vX = (Load 6 of x from Hash_Main.)
Set Variable Set vY = (Load 7 of x from Hash_Main.)
Set Variable Set vZ = (Load 8 of x from Hash_Main.)
-------- Gravity --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r4 Greater than 1.00
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 16 of x from Marine_Hash.) Equal to False
(Load 22 of x from Marine_Hash.) Equal to False
Then - Actions
Set Variable Set vZ = (vZ - (Gravity x 0.50))
Else - Actions
Set Variable Set vZ = (vZ - Gravity)
Else - Actions
-------- Jetpack --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 16 of x from Marine_Hash.) Equal to True
Then - Actions
-------- XY --------
Set Variable Set r_x = (Load 17 of x from Marine_Hash.)
Set Variable Set r_y = (Load 18 of x from Marine_Hash.)
Set Variable Set r = (Atan2(r_y, r_x))
Set Variable Set r2 = (Abs((Cos(r))))
Set Variable Set r_x = (r_x x r2)
Set Variable Set r2 = (Abs((Sin(r))))
Set Variable Set r_y = (r_y x r2)
Set Variable Set r = JetPack_Speed
Set Variable Set r_x = (r_x x r)
Set Variable Set r_y = (r_y x r)
Set Variable Set vX = r_x
Set Variable Set vY = r_y
-------- Z --------
Set Variable Set r = (Load 19 of x from Marine_Hash.)
Set Variable Set vZ = (vZ + r)
-------- Minimalgeschwindigkeit --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(r4 + r5) Less than JetPack_MaxTotalHeight
vZ Less than Gravity
Then - Actions
Set Variable Set vZ = Gravity
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(r4 + r5) Greater than (JetPack_MaxTotalHeight - Gravity)
Then - Actions
Set Variable Set vZ = "0.00"
Else - Actions
Else - Actions
Else - Actions
-------- Friction & min/max values --------
Set Variable Set vX = (vX x 0.98)
Set Variable Set vY = (vY x 0.98)
Set Variable Set vZ = (vZ x 0.95)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(vX)) Less than 0.50
Then - Actions
Set Variable Set vX = "0.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
vX Greater than 0.00
Then - Actions
Set Variable Set vX = (vX - 0.10)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
vX Greater than Velocity_Maximum
Then - Actions
Set Variable Set vX = Velocity_Maximum
Else - Actions
Else - Actions
Set Variable Set vX = (vX + 0.10)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
vX Less than Velocity_Minimum
Then - Actions
Set Variable Set vX = Velocity_Minimum
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(vY)) Less than 0.50
Then - Actions
Set Variable Set vY = "0.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
vY Greater than 0.00
Then - Actions
Set Variable Set vY = (vY - 0.10)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
vY Greater than Velocity_Maximum
Then - Actions
Set Variable Set vY = Velocity_Maximum
Else - Actions
Else - Actions
Set Variable Set vY = (vY + 0.10)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
vY Less than Velocity_Minimum
Then - Actions
Set Variable Set vY = Velocity_Minimum
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(vZ)) Less than 0.50
Then - Actions
Set Variable Set vZ = "0.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
vZ Greater than Velocity_Maximum
Then - Actions
Set Variable Set vZ = Velocity_Maximum
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
vZ Less than Velocity_Minimum
Then - Actions
Set Variable Set vZ = Velocity_Minimum
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
vZ Less than 0.00
r4 Less than or equal to 1.00
Then - Actions
Set Variable Set vZ = "0.00"
Else - Actions
-------- Erlaubte Flugrichtung --------
Set Variable Set r_x = (X of P)
Set Variable Set r_y = (Y of P)
Set Variable Set r_x2 = (r_x + vX)
Set Variable Set r_y2 = (r_y + vY)
-------- Out of Bounds --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Abs(vX)) Greater than 0.00
(Abs(vY)) Greater than 0.00
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_x2 Greater than or equal to Game_FlyBoundsRight
Then - Actions
Set Variable Set r_x2 = Game_FlyBoundsRight
Set Variable Set vX = "0.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_x2 Less than or equal to Game_FlyBoundsLeft
Then - Actions
Set Variable Set r_x2 = Game_FlyBoundsLeft
Set Variable Set vX = "0.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_y2 Greater than or equal to Game_FlyBoundsTop
Then - Actions
Set Variable Set r_y2 = Game_FlyBoundsTop
Set Variable Set vY = "0.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r_y2 Less than or equal to Game_FlyBoundsBottom
Then - Actions
Set Variable Set r_y2 = Game_FlyBoundsBottom
Set Variable Set vY = "0.00"
Else - Actions
Else - Actions
-------- Height Block --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(vX)) Greater than 0.00
Then - Actions
Set Variable Set P2 = (Point(r_x2, r_y))
Custom script: set udg_r2 = GetLocationZ(udg_P2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Greater than (r4 + r5)
Then - Actions
Set Variable Set r_x2 = r_x
Set Variable Set vX = "0.00"
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(vY)) Greater than 0.00
Then - Actions
Set Variable Set P2 = (Point(r_x, r_y2))
Custom script: set udg_r2 = GetLocationZ(udg_P2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Greater than (r4 + r5)
Then - Actions
Set Variable Set r_y2 = r_y
Set Variable Set vY = "0.00"
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Else - Actions
-------- Destr. Block --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Velocity_IsDroppedOffGhoul Equal to False
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(unit is alive) Equal to True
(Unit-type of unit) Equal to Marine
(Load 16 of x from Marine_Hash.) Equal to False
(Abs(vX)) Equal to 0.00
(Abs(vY)) Equal to 0.00
Then - Actions
Set Variable Set Velocity_MoveOffObstacle = "true"
Else - Actions
Set Variable Set Velocity_MoveOffObstacle = "false"
-------- x3 nicht erst in IF =0 setzen! siehe Marine FlyOffHindernis... --------
Set Variable Set x3 = "0"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Abs(vX)) Greater than 0.00
(Abs(vY)) Greater than 0.00
Velocity_MoveOffObstacle Equal to True
Then - Actions
Set Variable Set P2 = (Point(r_x2, r_y2))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Terrain pathing at P2 of type Walkability is off) Equal to False
Then - Actions
Destructible - Pick every destructible within 96.00 of P2 and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Equal to 0
Then - Actions
Set Variable Set dest = (Picked destructible)
Set Variable Set s = (Name of dest)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(s, 1, 8)) Equal to Blocker
Then - Actions
Set Variable Set x3 = (Integer((Substring(s, 9, 11))))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Destructible-type of dest) Equal to YTpb (Unexpected type: 'destructablecode')
Then - Actions
Set Variable Set x3 = "100"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(r4 + r5) Less than (Game_BaseTerrainHeight + (Real(x3)))
Then - Actions
-------- Um Ressourcen zu sparen einfach blocken anstatt rauszufinden ob vx oder vy gestoppt werden soll --------
Set Variable Set r_x2 = r_x
Set Variable Set vX = "0.00"
Set Variable Set r_y2 = r_y
Set Variable Set vY = "0.00"
Else - Actions
Set Variable Set x3 = "0"
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Else - Actions
-------- Von Hindernis runterfliegen (wenn Jetpack aus ist) --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Velocity_MoveOffObstacle Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Greater than 0
Then - Actions
Set Variable Set IsTriggerOrder = "true"
Unit - Order unit to Stop .
Set Variable Set IsTriggerOrder = "false"
Set Variable Set vZ = "0.00"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(X of P) Less than 0.00
And - All (Conditions) are true
Conditions
(X of P) Less than 500.00
(Abs((Y of P))) Less than 500.00
Then - Actions
Set Variable Set vX = (vX + 5.00)
Else - Actions
Set Variable Set vX = (vX - 5.00)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Y of P) Less than 0.00
Then - Actions
Set Variable Set vY = (vY + 5.00)
Else - Actions
Set Variable Set vY = (vY - 5.00)
Set Variable Set r_x2 = (r_x + vX)
Set Variable Set r_y2 = (r_y + vY)
Else - Actions
Else - Actions
Else - Actions
-------- Move unit --------
Custom script: call SetUnitX (udg_unit, udg_r_x2)
Custom script: call SetUnitY (udg_unit, udg_r_y2)
-------- New Flying Height --------
Set Variable Set P2 = (Point(r_x2, r_y2))
Set Variable Set r4 = (r4 + r5)
Custom script: set udg_r5 = GetLocationZ(udg_P2)
Set Variable Set r4 = (r4 - r5)
Set Variable Set r4 = (r4 + vZ)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r4 Less than 5.00
Then - Actions
Set Variable Set r4 = "0.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(r4 + r5) Greater than 2000.00
Then - Actions
Set Variable Set r4 = (2000.00 - r5)
Else - Actions
Animation - Change unit flying height to r4 at 0.00
-------- Save --------
Hashtable - Save vX as 6 of x in Hash_Main .
Hashtable - Save vY as 7 of x in Hash_Main .
Hashtable - Save vZ as 8 of x in Hash_Main .
-------- Remove from UG? --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
vX Equal to 0.00
vY Equal to 0.00
vZ Equal to 0.00
r4 Equal to 0.00
Then - Actions
Unit Group - Remove unit from UG_Velocity .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 9 of x from Hash_Main.) Equal to True
Then - Actions
Hashtable - Save False as 9 of x in Hash_Main .
Special Effect - Destroy (Load 10 of x in Hash_Main.)
Special Effect - Destroy (Load 11 of x in Hash_Main.)
Else - Actions
Else - Actions
-------- Landung --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
vZ Equal to 0.00
r4 Equal to 0.00
Then - Actions
-------- Jetpack Effekte weg --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 22 of x from Marine_Hash.) Equal to False
Then - Actions
Hashtable - Save True as 22 of x in Marine_Hash .
Special Effect - Destroy (Load 20 of x in Marine_Hash.)
Special Effect - Destroy (Load 21 of x in Marine_Hash.)
Else - Actions
-------- Staub Effekte --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Velocity_IsDroppedOffGhoul Equal to False
(Load 9 of x from Hash_Main.) Equal to False
(Square root(((vX x vX) + (vY x vY)))) Greater than 1.00
Then - Actions
Hashtable - Save True as 9 of x in Hash_Main .
Special Effect - Create a special effect attached to the foot, left (Unexpected type: 'attachpoint') of unit using SandBreathDamage.mdx
Hashtable - Save Handle Of (Last created special effect) as 10 of x in Hash_Main .
Special Effect - Create a special effect attached to the foot, right (Unexpected type: 'attachpoint') of unit using SandBreathDamage.mdx
Hashtable - Save Handle Of (Last created special effect) as 11 of x in Hash_Main .
Else - Actions
-------- Unpause monsters --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of unit) Equal to Player_Monsterowner
Then - Actions
Unit - Unpause unit
Unit - Turn collision for unit On .
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
Unit Group - Pick every unit in UG_FlyingAdjustHeight and do (Actions)
Loop - Actions
Set Variable Set unit = (Picked unit)
Set Variable Set x = (Key (Picked unit).)
Set Variable Set P = (Position of unit)
Set Variable Set r = (Load 23 of x from Hash_Main.)
Custom script: set udg_r2 = GetLocationZ(udg_P)
Set Variable Set r = (r2 - r)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of unit) Equal to Scavenger dropoff done
r Not equal to 0.00
Then - Actions
Set Variable Set r3 = (Current flying height of unit)
Set Variable Set r3 = (r3 - r)
-------- Scavenger abheben nach drop --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Equal to Scavenger dropoff done
Then - Actions
Set Variable Set r3 = (r3 + 10.00)
Else - Actions
Animation - Change unit flying height to r3 at 0.00
Hashtable - Save r2 as 23 of x in Hash_Main .
Else - Actions
Custom script: call RemoveLocation(udg_P)
Velocity PowerPush PPunit
Events
Conditions
Actions
Custom script: set udg_PowerPush_Key = GetHandleId(udg_PowerPush_Unit)
Unit Group - Add PowerPush_Unit to UG_Velocity
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of PowerPush_Unit) Equal to Player_Monsterowner
Then - Actions
Unit - Turn collision for PowerPush_Unit Off .
Unit - Pause PowerPush_Unit
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(PowerPush_PowerXY)) Greater than 0.00
Then - Actions
Set Variable Set PowerPush_r = (Load 6 of PowerPush_Key from Hash_Main.)
Set Variable Set PowerPush_r = (PowerPush_r + ((Cos(PowerPush_AngleXY)) x PowerPush_PowerXY))
Hashtable - Save PowerPush_r as 6 of PowerPush_Key in Hash_Main .
Set Variable Set PowerPush_r = (Load 7 of PowerPush_Key from Hash_Main.)
Set Variable Set PowerPush_r = (PowerPush_r + ((Sin(PowerPush_AngleXY)) x PowerPush_PowerXY))
Hashtable - Save PowerPush_r as 7 of PowerPush_Key in Hash_Main .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs(PowerPush_PowerZ)) Greater than 0.00
Then - Actions
Set Variable Set PowerPush_r = (Load 8 of PowerPush_Key from Hash_Main.)
Set Variable Set PowerPush_r = (PowerPush_r + PowerPush_PowerZ)
Hashtable - Save PowerPush_r as 8 of PowerPush_Key in Hash_Main .
Else - Actions
Trigger - Turn on Velocity <gen>
Velocity PowerPush PPPoint
Events
Conditions
Actions
Set Variable Set PowerPush_P = (Position of PowerPush_Unit)
Set Variable Set PowerPush_AngleXY = (Angle from PowerPush_P to PowerPush_Target)
Set Variable Set PowerPush_r2 = (Distance between PowerPush_P and PowerPush_Target)
Set Variable Set PowerPush_r2 = (PowerPush_r2 / 30.00)
Set Variable Set PowerPush_PowerXY = PowerPush_r2
Custom script: set udg_PowerPush_r = GetLocationZ(udg_PowerPush_P)
Custom script: set udg_PowerPush_r2 = GetLocationZ(udg_PowerPush_Target)
Set Variable Set PowerPush_r = (PowerPush_r2 - PowerPush_r)
Set Variable Set PowerPush_r2 = (Distance between PowerPush_P and PowerPush_Target)
Set Variable Set PowerPush_r = (PowerPush_r / PowerPush_r2)
Set Variable Set PowerPush_r = (PowerPush_r / 5.00)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
PowerPush_r Less than 40.00
Then - Actions
Set Variable Set PowerPush_r = "40.00"
Else - Actions
Set Variable Set PowerPush_PowerZ = PowerPush_r
Custom script: call RemoveLocation(udg_PowerPush_P)
Custom script: call RemoveLocation(udg_PowerPush_Target)
Trigger - Run Velocity_PowerPush_PPunit <gen> (checking conditions)
X1stFirst -> es müssen erst X vom Typ1 spawnen bevor eine Einheit vom Typ 2 spawnt.
MonsterType Init
Events
Map initialization
Conditions
Actions
Set Variable Set MonsterType_WaveCount = "12"
-------- Wenn WaveCount geändert wird: MonsterSpawnItems trigger anpassen --------
For each (Integer A) from 1 to MonsterType_WaveCount , do (Actions)
Loop - Actions
Set Variable Set MonsterType_1st_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_2nd_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_3rd_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_4th_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_WaveMsg[(Integer A)] = ""
Set Variable Set x = "1"
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "60"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "5"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r May the slaughter begin!"
Else - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r Shoot everything that moves!"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "4"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "10"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "30"
Set Variable Set MonsterType_3rd[x] = "u00E"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "4"
Set Variable Set MonsterType_3rdMaxCount[x] = "30"
Set Variable Set MonsterType_4th[x] = "u00D"
Set Variable Set MonsterType_4th_X4rdFirst[x] = "8"
Set Variable Set MonsterType_4thMaxCount[x] = "1"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n002"
Set Variable Set MonsterType_1stMaxCount[x] = "30"
Set Variable Set MonsterType_2nd[x] = "u00K"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "5"
Set Variable Set MonsterType_2nd_SpawnDist[x] = "2"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "70"
Set Variable Set MonsterType_2nd[x] = "n009"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "15"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n009"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "n00A"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "20"
Set Variable Set MonsterType_2ndMaxCount[x] = "1"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r Prepare yourselves, something big is on the screen here!"
Else - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r Be careful marines! There's a huge... well, you know..."
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "3"
Set Variable Set MonsterType_1st[x] = "n00D"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "u00E"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "2"
Set Variable Set MonsterType_2ndMaxCount[x] = "30"
Set Variable Set MonsterType_3rd[x] = "u004"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "5"
Set Variable Set MonsterType_3rdMaxCount[x] = "6"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n00D"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "u004"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "50"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n00E"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "n002"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "4"
Set Variable Set MonsterType_2ndMaxCount[x] = "10"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n00G"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "n00H"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "1"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r Watch out, a very fast moving creature is heading straight for you!"
Else - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r This big thing on the screen kills everything in it's way, be careful!"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_TypeCount[x] = "1"
Set Variable Set MonsterType_1st[x] = "n00I"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "u00E"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "80"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n003"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "n00L"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "1"
Set Variable Set MonsterType_2nd_SpawnDist[x] = "1"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "1"
Set Variable Set MonsterType_1st[x] = "h005"
Set Variable Set MonsterType_1stMaxCount[x] = "1"
Set Variable Set MonsterType_1st_SpawnDist[(Integer A)] = "2"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r Seems you wiped those hellspawns out!"
Else - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r You cleansed everything, good job!"
X1stFirst -> es müssen erst X vom Typ1 spawnen bevor eine Einheit vom Typ 2 spawnt.
MonsterType Init Relaxed
Events
Conditions
Actions
Set Variable Set MonsterType_WaveCount = "21"
For each (Integer A) from 1 to MonsterType_WaveCount , do (Actions)
Loop - Actions
Set Variable Set MonsterType_1st_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_2nd_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_3rd_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_4th_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_WaveMsg[(Integer A)] = ""
Set Variable Set x = "1"
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "60"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "5"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r May the slaughter begin!"
Else - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r Shoot everything that moves!"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "4"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "10"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "30"
Set Variable Set MonsterType_3rd[x] = "u00E"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "4"
Set Variable Set MonsterType_3rdMaxCount[x] = "30"
Set Variable Set MonsterType_4th[x] = "u00D"
Set Variable Set MonsterType_4th_X4rdFirst[x] = "8"
Set Variable Set MonsterType_4thMaxCount[x] = "1"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "3"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "20"
Set Variable Set MonsterType_3rd[x] = "u00E"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "4"
Set Variable Set MonsterType_3rdMaxCount[x] = "20"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n002"
Set Variable Set MonsterType_1stMaxCount[x] = "30"
Set Variable Set MonsterType_2nd[x] = "u00K"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "5"
Set Variable Set MonsterType_2nd_SpawnDist[x] = "2"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "3"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "20"
Set Variable Set MonsterType_3rd[x] = "u00E"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "4"
Set Variable Set MonsterType_3rdMaxCount[x] = "20"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "70"
Set Variable Set MonsterType_2nd[x] = "n009"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "15"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "3"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "20"
Set Variable Set MonsterType_3rd[x] = "u00E"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "2"
Set Variable Set MonsterType_3rdMaxCount[x] = "20"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n009"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "n00A"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "20"
Set Variable Set MonsterType_2ndMaxCount[x] = "1"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r Prepare yourselves, something big is on the screen here!"
Else - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r Be careful marines! There's a huge... well, you know..."
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "3"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "20"
Set Variable Set MonsterType_3rd[x] = "u00E"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "2"
Set Variable Set MonsterType_3rdMaxCount[x] = "20"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "3"
Set Variable Set MonsterType_1st[x] = "n00D"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "u00E"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "2"
Set Variable Set MonsterType_2ndMaxCount[x] = "30"
Set Variable Set MonsterType_3rd[x] = "u004"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "5"
Set Variable Set MonsterType_3rdMaxCount[x] = "6"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n00D"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "u004"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "50"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "3"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "20"
Set Variable Set MonsterType_3rd[x] = "n00D"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "1"
Set Variable Set MonsterType_3rdMaxCount[x] = "20"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n00E"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "n002"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "4"
Set Variable Set MonsterType_2ndMaxCount[x] = "10"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "80"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "3"
Set Variable Set MonsterType_2ndMaxCount[x] = "20"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n00G"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "n00H"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "1"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r Watch out, a very fast moving creature is heading straight for you!"
Else - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r This big thing on the screen kills everything in it's way, be careful!"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "3"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "60"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "2"
Set Variable Set MonsterType_2ndMaxCount[x] = "20"
Set Variable Set MonsterType_3rd[x] = "u00E"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "3"
Set Variable Set MonsterType_3rdMaxCount[x] = "20"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_TypeCount[x] = "1"
Set Variable Set MonsterType_1st[x] = "n00I"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "u00E"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "80"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "1"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "60"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n003"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "n00L"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "1"
Set Variable Set MonsterType_2nd_SpawnDist[x] = "1"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "3"
Set Variable Set MonsterType_1st[x] = "n00D"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "u00E"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "20"
Set Variable Set MonsterType_3rd[x] = "n009"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "2"
Set Variable Set MonsterType_3rdMaxCount[x] = "20"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "1"
Set Variable Set MonsterType_1st[x] = "h005"
Set Variable Set MonsterType_1stMaxCount[x] = "1"
Set Variable Set MonsterType_1st_SpawnDist[(Integer A)] = "2"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 2) Equal to 1
Then - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r Seems you wiped those hellspawns out!"
Else - Actions
Set Variable Set MonsterType_WaveMsg[x] = "|cff7DBEF1Operator:|r You cleansed everything, good job!"
X1stFirst -> es müssen erst X vom Typ1 spawnen bevor eine Einheit vom Typ 2 spawnt.
MonsterType Init Training
Events
Conditions
Actions
Set Variable Set MonsterType_WaveCount = "12"
For each (Integer A) from 1 to MonsterType_WaveCount , do (Actions)
Loop - Actions
Set Variable Set MonsterType_1st_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_2nd_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_3rd_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_4th_SpawnDist[(Integer A)] = "3"
Set Variable Set MonsterType_WaveMsg[(Integer A)] = ""
Set Variable Set x = "1"
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "140"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "10"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "4"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "120"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "60"
Set Variable Set MonsterType_3rd[x] = "u00E"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "4"
Set Variable Set MonsterType_3rdMaxCount[x] = "60"
Set Variable Set MonsterType_4th[x] = "u00D"
Set Variable Set MonsterType_4th_X4rdFirst[x] = "8"
Set Variable Set MonsterType_4thMaxCount[x] = "1"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n002"
Set Variable Set MonsterType_1stMaxCount[x] = "30"
Set Variable Set MonsterType_2nd[x] = "u00D"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "5"
Set Variable Set MonsterType_2nd_SpawnDist[x] = "2"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "70"
Set Variable Set MonsterType_2nd[x] = "n009"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "15"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n009"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "u00E"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "20"
Set Variable Set MonsterType_2ndMaxCount[x] = "20"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "3"
Set Variable Set MonsterType_1st[x] = "n00D"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "u00E"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "2"
Set Variable Set MonsterType_2ndMaxCount[x] = "30"
Set Variable Set MonsterType_3rd[x] = "n001"
Set Variable Set MonsterType_3rd_X2ndFirst[x] = "5"
Set Variable Set MonsterType_3rdMaxCount[x] = "6"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n00D"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "n000"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "50"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n00E"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "n002"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "4"
Set Variable Set MonsterType_2ndMaxCount[x] = "10"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n00G"
Set Variable Set MonsterType_1stMaxCount[x] = "60"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_TypeCount[x] = "1"
Set Variable Set MonsterType_1st[x] = "n001"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "u00E"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "1"
Set Variable Set MonsterType_2ndMaxCount[x] = "80"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n003"
Set Variable Set MonsterType_1stMaxCount[x] = "20"
Set Variable Set MonsterType_2nd[x] = "n00L"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "10"
Set Variable Set MonsterType_2ndMaxCount[x] = "1"
Set Variable Set MonsterType_2nd_SpawnDist[x] = "1"
Set Variable Set x = (x + 1)
Set Variable Set MonsterType_TypeCount[x] = "2"
Set Variable Set MonsterType_1st[x] = "n003"
Set Variable Set MonsterType_1stMaxCount[x] = "40"
Set Variable Set MonsterType_2nd[x] = "n00L"
Set Variable Set MonsterType_2nd_X1stFirst[x] = "30"
Set Variable Set MonsterType_2ndMaxCount[x] = "3"
Set Variable Set MonsterType_2nd_SpawnDist[x] = "1"
Monster Spawn
Events
Time - Every 10.00 seconds of game time
Conditions
Actions
Set Variable Set x = (15 + (5 x Game_Difficulty))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_1stSpawnedCount[MonsterType_WaveIndex] Greater than or equal to MonsterType_1stMaxCount[MonsterType_WaveIndex]
MonsterType_2ndSpawnedCount[MonsterType_WaveIndex] Greater than or equal to MonsterType_2ndMaxCount[MonsterType_WaveIndex]
MonsterType_3rdSpawnedCount[MonsterType_WaveIndex] Greater than or equal to MonsterType_3rdMaxCount[MonsterType_WaveIndex]
MonsterType_4thSpawnedCount[MonsterType_WaveIndex] Greater than or equal to MonsterType_4thMaxCount[MonsterType_WaveIndex]
(Player_Monsterowner Food used) Less than x
Then - Actions
Set Variable Set MonsterType_WaveIndex = (MonsterType_WaveIndex + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 2
Then - Actions
-------- Training --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_WaveIndex Greater than MonsterType_WaveCount
Then - Actions
Set Variable Set MonsterType_WaveIndex = "1"
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
Set Variable Set MonsterType_1stSpawnedCount[(Integer A)] = "0"
Set Variable Set MonsterType_2ndSpawnedCount[(Integer A)] = "0"
Set Variable Set MonsterType_3rdSpawnedCount[(Integer A)] = "0"
Set Variable Set MonsterType_4thSpawnedCount[(Integer A)] = "0"
Else - Actions
Game - Display to (All players) for 5.00 seconds the text: (|cffff0000Wave + (String(MonsterType_WaveIndex)))
Else - Actions
-------- Survival --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_WaveIndex Less than or equal to MonsterType_WaveCount
Then - Actions
Game - Display to (All players) for 5.00 seconds the text: (|cffff0000Wave + (String(MonsterType_WaveIndex)))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_WaveMsg[MonsterType_WaveIndex] Not equal to
Then - Actions
Game - Display to (All players) for 3.00 seconds the text: MonsterType_WaveMsg[MonsterType_WaveIndex]
Sound - Play walkie_talkie <gen>
Else - Actions
-------- Waffen & Ammo --------
Trigger - Run Monster_Spawn_Items <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_WaveIndex Equal to MonsterType_WaveCount
Then - Actions
Sound - Play N01Archimonde30 <gen>
Wait 5.00 seconds
Sound - Play U08Archimonde19 <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_WaveIndex Greater than MonsterType_WaveCount
Then - Actions
Trigger - Turn off (This trigger)
Trigger - Run E_GameEnd <gen> (checking conditions)
Skip remaining actions
Else - Actions
Else - Actions
For each (Integer A) from 1 to ((3 + Game_ActivePlayerCount) x (Game_Difficulty + 0)) , do (Actions)
Loop - Actions
Set Variable Set x = (50 + (20 x Game_Difficulty))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_AliveZombies) Less than x
(Player_Monsterowner Food used) Less than x
Then - Actions
-------- Spawn types --------
Set Variable Set x3 = MonsterType_1stSpawnedCount[MonsterType_WaveIndex]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Less than MonsterType_1stMaxCount[MonsterType_WaveIndex]
Then - Actions
Set Variable Set x3 = (x3 + 1)
Trigger - Run Monster_Spawn_GetPoint_1st <gen> (checking conditions)
Unit - Create 1 . MonsterType_1st[MonsterType_WaveIndex] for Player_Monsterowner at P facing (Random angle) degrees
Custom script: call RemoveLocation(udg_P)
Set Variable Set MonsterType_1stSpawnedCount[MonsterType_WaveIndex] = x3
Else - Actions
Set Variable Set x3 = MonsterType_2ndSpawnedCount[MonsterType_WaveIndex]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Less than MonsterType_2ndMaxCount[MonsterType_WaveIndex]
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
MonsterType_1stSpawnedCount[MonsterType_WaveIndex] Greater than or equal to MonsterType_1stMaxCount[MonsterType_WaveIndex]
(MonsterType_1stSpawnedCount[MonsterType_WaveIndex] mod MonsterType_2nd_X1stFirst[MonsterType_WaveIndex]) Equal to 0
Then - Actions
Set Variable Set x3 = (x3 + 1)
Trigger - Run Monster_Spawn_GetPoint_2nd <gen> (checking conditions)
Unit - Create 1 . MonsterType_2nd[MonsterType_WaveIndex] for Player_Monsterowner at P facing (Random angle) degrees
Custom script: call RemoveLocation(udg_P)
Set Variable Set MonsterType_2ndSpawnedCount[MonsterType_WaveIndex] = x3
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
MonsterType_2ndSpawnedCount[MonsterType_WaveIndex] Greater than or equal to MonsterType_2ndMaxCount[MonsterType_WaveIndex]
(MonsterType_1stSpawnedCount[MonsterType_WaveIndex] mod MonsterType_2nd_X1stFirst[MonsterType_WaveIndex]) Equal to 0
Then - Actions
Set Variable Set x3 = MonsterType_3rdSpawnedCount[MonsterType_WaveIndex]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Less than MonsterType_3rdMaxCount[MonsterType_WaveIndex]
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
MonsterType_2ndSpawnedCount[MonsterType_WaveIndex] Greater than or equal to MonsterType_2ndMaxCount[MonsterType_WaveIndex]
(MonsterType_2ndSpawnedCount[MonsterType_WaveIndex] mod MonsterType_3rd_X2ndFirst[MonsterType_WaveIndex]) Equal to 0
Then - Actions
Set Variable Set x3 = (x3 + 1)
Trigger - Run Monster_Spawn_GetPoint_3rd <gen> (checking conditions)
Unit - Create 1 . MonsterType_3rd[MonsterType_WaveIndex] for Player_Monsterowner at P facing (Random angle) degrees
Custom script: call RemoveLocation(udg_P)
Set Variable Set MonsterType_3rdSpawnedCount[MonsterType_WaveIndex] = x3
Else - Actions
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
MonsterType_3rdSpawnedCount[MonsterType_WaveIndex] Greater than or equal to MonsterType_3rdMaxCount[MonsterType_WaveIndex]
(MonsterType_2ndSpawnedCount[MonsterType_WaveIndex] mod MonsterType_3rd_X2ndFirst[MonsterType_WaveIndex]) Equal to 0
Then - Actions
Set Variable Set x3 = MonsterType_4thSpawnedCount[MonsterType_WaveIndex]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Less than MonsterType_4thMaxCount[MonsterType_WaveIndex]
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
MonsterType_3rdSpawnedCount[MonsterType_WaveIndex] Greater than or equal to MonsterType_3rdMaxCount[MonsterType_WaveIndex]
(MonsterType_3rdSpawnedCount[MonsterType_WaveIndex] mod MonsterType_4th_X4rdFirst[MonsterType_WaveIndex]) Equal to 0
Then - Actions
Set Variable Set x3 = (x3 + 1)
Trigger - Run Monster_Spawn_GetPoint_4th <gen> (checking conditions)
Unit - Create 1 . MonsterType_4th[MonsterType_WaveIndex] for Player_Monsterowner at P facing (Random angle) degrees
Custom script: call RemoveLocation(udg_P)
Set Variable Set MonsterType_4thSpawnedCount[MonsterType_WaveIndex] = x3
Else - Actions
Else - Actions
Else - Actions
Else - Actions
Unit Group - Add all units of UG_AliveZombies to UG_ZombiesAttackOrder
Trigger - Turn on Monster_AttackOrder <gen>
Monster Spawn Items
Events
Conditions
Actions
-------- Main drop (new guns etc) --------
Custom script: call RemoveLocation(udg_Wave_WeaponDropPoint)
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Set Variable Set Wave_WeaponDropPoint = (P offset by 0.01 towards 0 degrees.)
-------- All ammo types --------
Set Variable Set x3 = "0"
For each (Integer A) from 1 to MonsterType_WaveIndex , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Set Variable Set x = (Integer A)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Greater than WeaponData_GunSpawnCount
Then - Actions
Custom script: exitwhen true
Else - Actions
Set Variable Set x = WeaponData_GunSpawnList[x]
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create WeaponData_ItemTypeAmmoStck[x] at P2
Custom script: call RemoveLocation(udg_P2)
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 19 of x from WeaponData_Hash.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create WeaponData_ItemTypeAmmoAltStck[x] at P2
Custom script: call RemoveLocation(udg_P2)
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 19 of x from WeaponData_Hash.)
Else - Actions
Else - Actions
-------- New weapon --------
Set Variable Set x2 = MonsterType_WaveIndex
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_WaveIndex Greater than 3
MonsterType_WaveCount Greater than 12
Then - Actions
Set Variable Set x2 = ((x2 / 2) + 2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Less than or equal to WeaponData_GunSpawnCount
Or - Any (Conditions) are true
Conditions
MonsterType_WaveIndex Less than or equal to 3
(MonsterType_WaveIndex mod 2) Equal to 0
MonsterType_WaveCount Less than or equal to 12
Then - Actions
-------- Waffe/Ammo bei relaxed survival mode nur 1x droppen --------
Set Variable Set x = WeaponData_GunSpawnList[x2]
Item - Create WeaponData_ItemType[x] at P
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Last created item) Equal to No item
(Item-type of (Last created item)) Not equal to WeaponData_ItemType[x]
Then - Actions
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create WeaponData_ItemType[x] at P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 6 of x from WeaponData_Hash.)
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create WeaponData_ItemTypeAmmoStck[x] at P2
Custom script: call RemoveLocation(udg_P2)
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 19 of x from WeaponData_Hash.)
Else - Actions
-------- Armors --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and (Maxplayers + 2)) Less than or equal to Game_ActivePlayerCount
Then - Actions
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Item - Create |cff7DBEF1Liquid-Crystal-Suit (LQS) at P2
Else - Actions
Item - Create |cff7DBEF1Kevlar Vest at P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
-------- Nades --------
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Item - Create |cff7DBEF1Frags at P2
Item - Set charges remaining in (Last created item) to 3
Else - Actions
Item - Create |cff7DBEF1HE-Nades at P2
Item - Set charges remaining in (Last created item) to 3
Custom script: call RemoveLocation(udg_P2)
-------- Other stuff --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create |cff7DBEF1Barricades at P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create |cff7DBEF1Explosives at P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create |cff7DBEF1Road Flares at P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
-------- Medic Stuff --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create |cff7DBEF1Medkit at P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create |cff7DBEF1Anti-Virus at P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_WaveIndex Equal to 1
Then - Actions
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create |cff7DBEF1First Aid Kit at P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
-------- Deagle Ammo --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 4) Equal to 1
Then - Actions
Set Variable Set x = "11"
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create WeaponData_ItemTypeAmmoStck[x] at P2
Custom script: call RemoveLocation(udg_P2)
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 19 of x from WeaponData_Hash.)
Else - Actions
Custom script: call RemoveLocation(udg_P)
-------- Side Drops --------
-------- Extra basic weapons --------
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_WaveIndex Equal to 1
Then - Actions
Set Variable Set x = MonsterType_WaveIndex
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Less than or equal to WeaponData_GunSpawnCount
Then - Actions
-------- xm1014 Shotgun --------
Set Variable Set x = "12"
Item - Create WeaponData_ItemType[x] at P
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Last created item) Equal to No item
(Item-type of (Last created item)) Not equal to WeaponData_ItemType[x]
Then - Actions
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create WeaponData_ItemType[x] at P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 6 of x from WeaponData_Hash.)
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create WeaponData_ItemTypeAmmoStck[x] at P2
Custom script: call RemoveLocation(udg_P2)
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 19 of x from WeaponData_Hash.)
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_WaveIndex Equal to 2
Then - Actions
Set Variable Set x = MonsterType_WaveIndex
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Less than or equal to WeaponData_GunSpawnCount
Then - Actions
-------- Deagle --------
Set Variable Set x = "11"
Item - Create WeaponData_ItemType[x] at P
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Last created item) Equal to No item
(Item-type of (Last created item)) Not equal to WeaponData_ItemType[x]
Then - Actions
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create WeaponData_ItemType[x] at P2
Custom script: call RemoveLocation(udg_P2)
Else - Actions
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 6 of x from WeaponData_Hash.)
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create WeaponData_ItemTypeAmmoStck[x] at P2
Custom script: call RemoveLocation(udg_P2)
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 19 of x from WeaponData_Hash.)
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_WaveIndex Equal to 3
Then - Actions
Set Variable Set x = MonsterType_WaveIndex
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Less than or equal to WeaponData_GunSpawnCount
Then - Actions
Set Variable Set x = WeaponData_GunSpawnList[x]
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create WeaponData_ItemType[x] at P2
Custom script: call RemoveLocation(udg_P2)
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 6 of x from WeaponData_Hash.)
Trigger - Run Monster_Spawn_Items_Get_P2 <gen> (checking conditions)
Item - Create WeaponData_ItemTypeAmmoStck[x] at P2
Custom script: call RemoveLocation(udg_P2)
Item - Set the custom value of (Last created item) to x
Item - Set charges remaining in (Last created item) to (Load 19 of x from WeaponData_Hash.)
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P)
Monster Spawn Items Get P2
Events
Conditions
Actions
Set Variable Set x3 = (x3 + 1)
Set Variable Set P2 = (P offset by ((Real((1 + (x3 / 3)))) x 128.00) towards ((Real(x3)) x 30.00) degrees.)
Custom script: set udg_r6 = GetLocationZ(udg_P2)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Terrain cliff level at P2) Not equal to Game_BaseCliffLevel
(NoSpawn <gen> contains P2) Equal to True
((Playable map area) contains P2) Equal to False
(r6 + 20.00) Less than Game_BaseTerrainHeight
Then - Actions
Custom script: call RemoveLocation(udg_P2)
Set Variable Set P2 = (P offset by 1.00 towards 0 degrees.)
Else - Actions
Monster Spawn GetPoint 1st
Events
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_1st_SpawnDist[MonsterType_WaveIndex] Equal to 1
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_VeryCloseToMarines <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_1st_SpawnDist[MonsterType_WaveIndex] Equal to 2
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_CloseToMarines <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_1st_SpawnDist[MonsterType_WaveIndex] Equal to 3
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Else - Actions
Monster Spawn GetPoint 2nd
Events
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_2nd_SpawnDist[MonsterType_WaveIndex] Equal to 1
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_VeryCloseToMarines <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_2nd_SpawnDist[MonsterType_WaveIndex] Equal to 2
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_CloseToMarines <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_2nd_SpawnDist[MonsterType_WaveIndex] Equal to 3
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Else - Actions
Monster Spawn GetPoint 3rd
Events
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_3rd_SpawnDist[MonsterType_WaveIndex] Equal to 1
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_VeryCloseToMarines <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_3rd_SpawnDist[MonsterType_WaveIndex] Equal to 2
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_CloseToMarines <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_3rd_SpawnDist[MonsterType_WaveIndex] Equal to 3
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Else - Actions
Monster Spawn GetPoint 4th
Events
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_4th_SpawnDist[MonsterType_WaveIndex] Equal to 1
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_VeryCloseToMarines <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_4th_SpawnDist[MonsterType_WaveIndex] Equal to 2
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_CloseToMarines <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MonsterType_4th_SpawnDist[MonsterType_WaveIndex] Equal to 3
Then - Actions
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Else - Actions
Monster AttackOrder
Events
Time - Every 0.02 seconds of game time
Conditions
Actions
Set Variable Set IsTriggerOrder = "true"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_ZombiesAttackOrder) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
Set Variable Set unit = (Random unit from UG_ZombiesAttackOrder)
Unit Group - Remove unit from UG_ZombiesAttackOrder .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Not equal to Heretic
(Current order of unit) Not equal to (Order(attack))
(unit is in UG_CrawlUpMonsters.) Equal to False
Then - Actions
Set Variable Set x = (Player number of (Owner of unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Less than or equal to Maxplayers
Then - Actions
Set Variable Set unit2 = (Random unit from UG_EnemyAliveMarines[x])
Else - Actions
Set Variable Set unit2 = (Random unit from UG_AliveMarines)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of unit) Not equal to Sutured Cadavre
(Unit-type of unit) Not equal to Carnivore
Then - Actions
Set Variable Set P = (Position of unit2)
Unit - Order unit to Attack-Move To . P
Custom script: call RemoveLocation(udg_P)
Else - Actions
Unit - Order unit to Right-Click . unit2
Else - Actions
Set Variable Set IsTriggerOrder = "false"
Monster Spawn Heretics
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Heretic Spawn Placeholder
Actions
Set Variable Set P = (Position of (Triggering unit))
For each (Integer A) from 1 to 6 , do (Actions)
Loop - Actions
Set Variable Set r = ((Real((Integer A))) x (360.00 / 6.00))
Set Variable Set P2 = (P offset by 196.00 towards r degrees.)
Set Variable Set x = "0"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Terrain cliff level at P2) Not equal to Game_BaseCliffLevel
((Playable map area) contains P2) Equal to False
Then - Actions
Set Variable Set x = "1"
Else - Actions
Destructible - Pick every destructible within 196.00 of P2 and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked destructible) is alive) Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Destructible-type of (Picked destructible)) Equal to OTip (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to OTis (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTlb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to Ytlc (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTpb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to YTfb (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to JTtw (Unexpected type: 'destructablecode')
(Substring((Name of (Picked destructible)), 1, 7)) Equal to Blocker
Then - Actions
Set Variable Set x = "1"
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 0
Then - Actions
Unit - Create 1 Heretic for (Owner of (Triggering unit)) at P2 facing P
Animation - Play (Last created unit) 's work animation
Animation - Queue (Last created unit) 's work animation
Unit Group - Add (Last created unit) to UG_Heretics
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Last created unit) using Abilities\Spells\Undead\Unsummon\UnsummonTarget.mdl
Special Effect - Destroy (Last created special effect)
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Last created unit) using Abilities\Weapons\PhoenixMissile\Phoenix_Missile_mini.mdl
Special Effect - Destroy (Last created special effect)
Hashtable - Save (Key (Triggering unit).) as 16 of (Key (Last created unit).) in Hash_Main .
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Hashtable - Save Handle Of P as 17 of (Key (Triggering unit).) in Hash_Main .
Trigger - Turn on Monster_Heretic_Summon <gen>
Monster Spawn Effects Events
Events
Unit - A unit enters (Playable map area)
Conditions
(Race of (Triggering unit)) Equal to Undead
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Unit - Change color of (Triggering unit) to Maroon
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Not equal to Scavenger dropoff done
Then - Actions
Unit Group - Add (Triggering unit) to UG_AliveZombies
-------- Eigene Monster färben --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
For each (Integer x_ZombieEnterMap ) from 1 to Maxplayers , do (Actions)
Loop - Actions
Set Variable Set player = (Player(x_ZombieEnterMap))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Triggering unit)) Equal to player
Then - Actions
Custom script: if GetLocalPlayer( ) == udg_player then
Animation - Change (Triggering unit) 's vertex coloring to ( 0.00 %, 100.00 %, 0.00 %) with 0 % transparency
Custom script: endif
Else - Actions
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Shadow Dancer
Then - Actions
Animation - Change (Triggering unit) 's vertex coloring to ( 50.00 %, 100.00 %, 100.00 %) with 80.00 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Souldrainer
Then - Actions
Animation - Change (Triggering unit) 's vertex coloring to ( 20.00 %, 40.00 %, 100.00 %) with 80.00 % transparency
Unit - Turn collision for (Triggering unit) Off .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Triggering unit) is A flying unit) Equal to True
Then - Actions
Set Variable Set P_ZombieEnterMap = (Position of (Triggering unit))
Custom script: set udg_r_ZombieEnterMap = GetLocationZ(udg_P_ZombieEnterMap)
Hashtable - Save r_ZombieEnterMap as 23 of (Key (Triggering unit).) in Hash_Main .
Custom script: call RemoveLocation(udg_P_ZombieEnterMap)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Scavenger
Then - Actions
Hashtable - Save 2 as 20 of (Key (Triggering unit).) in Hash_Main .
Special Effect - Create a special effect attached to the foot, left (Unexpected type: 'attachpoint') of (Triggering unit) using units\undead\Ghoul\Ghoul.mdl
Hashtable - Save Handle Of (Last created special effect) as 21 of (Key (Triggering unit).) in Hash_Main .
Special Effect - Create a special effect attached to the foot, right (Unexpected type: 'attachpoint') of (Triggering unit) using units\undead\Ghoul\Ghoul.mdl
Hashtable - Save Handle Of (Last created special effect) as 22 of (Key (Triggering unit).) in Hash_Main .
Unit Group - Add (Triggering unit) to UG_FlyingAdjustHeight
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Flesh Thing
Then - Actions
Trigger - Add to Monster_Abom_Death <gen> the event ((Triggering unit) Takes damage)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to The Rejected
Then - Actions
Trigger - Add to Monster_Acid_Spit <gen> the event ((Triggering unit) Starts the effect of an ability)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Mind Flayer
Then - Actions
Trigger - Add to Monster_Black_Hole_Cast <gen> the event ((Triggering unit) Starts the effect of an ability)
Trigger - Add to Monster_MindFlayer_Death <gen> the event ((Triggering unit) Dies)
Unit - Change color of (Triggering unit) to Teal
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Undead\Unsummon\UnsummonTarget.mdl
Special Effect - Destroy (Last created special effect)
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Undead\Unsummon\UnsummonTarget.mdl
Special Effect - Destroy (Last created special effect)
Special Effect - Create a special effect attached to the left,hand (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Undead\Unsummon\UnsummonTarget.mdl
Special Effect - Destroy (Last created special effect)
Special Effect - Create a special effect attached to the right,hand (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Undead\Unsummon\UnsummonTarget.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Triggering unit)) Equal to Carnivore
Then - Actions
Trigger - Add to Monster_Carnivore_SpawnBreed_Cast <gen> the event ((Triggering unit) Starts the effect of an ability)
Trigger - Add to Monster_Carnivore_SpawnBreed_Order <gen> the event ((Triggering unit) Takes damage)
Animation - Play (Triggering unit) 's birth animation
Animation - Queue (Triggering unit) 's stand animation
Wait 0.30 seconds
Custom script: set udg_unit = tempunit
Set Variable Set P = (Position of unit)
Set Variable Set UG = (Units within 300.00 of P matching ((((Matching unit) is alive) Equal to True) and (unit Not equal to (Matching unit))).)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Picked unit)) Not equal to Orc
(Current flying height of (Picked unit)) Less than 100.00
(Unit-type of (Picked unit)) Not equal to Tank
(Unit-type of (Picked unit)) Not equal to Stationary MG
Then - Actions
Set Variable Set P2 = (Position of (Picked unit))
Set Variable Set PowerPush_Unit = (Picked unit)
Set Variable Set PowerPush_AngleXY = (Angle from P to P2)
Set Variable Set PowerPush_PowerXY = ((Distance between P and P2) / 10.00)
Set Variable Set PowerPush_PowerXY = (35.00 - PowerPush_PowerXY)
Set Variable Set PowerPush_PowerZ = "25.00"
Custom script: call RemoveLocation(udg_P2)
Unit - Create 1 . Dummy (Default 5sec) for Neutral Passive at P facing Default building facing degrees
Unit - Add Stun (1sec) to (Last created unit)
Unit - Order (Last created unit) to Neutral - Firebolt . PowerPush_Unit
Trigger - Run Velocity_PowerPush_PPunit <gen> (checking conditions)
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Wait 2.00 seconds
Set Variable Set Monster_Carnivore_AllowSpawn = "true"
Else - Actions
Monster FlyingAddToAdjustUG
Events
Unit - A unit enters AdjustFlyingHeight01 <gen>
Unit - A unit enters AdjustFlyingHeight02 <gen>
Unit - A unit enters AdjustFlyingHeight03 <gen>
Unit - A unit enters AdjustFlyingHeight04 <gen>
Unit - A unit enters AdjustFlyingHeight05 <gen>
Conditions
((Triggering unit) is A flying unit) Equal to True
(Race of (Triggering unit)) Not equal to Orc
Actions
Custom script: local unit tempunit
Unit Group - Add (Triggering unit) to UG_FlyingAdjustHeight
Custom script: set tempunit = GetTriggerUnit()
Wait 0.50 seconds
Custom script: set udg_unit = tempunit
Unit Group - Add unit to UG_FlyingAdjustHeight
Trigger - Turn on Velocity <gen>
Monster FlyingRemFromAdjustUG
Events
Unit - A unit leaves AdjustFlyingHeight01 <gen>
Unit - A unit leaves AdjustFlyingHeight02 <gen>
Unit - A unit leaves AdjustFlyingHeight03 <gen>
Unit - A unit leaves AdjustFlyingHeight04 <gen>
Unit - A unit leaves AdjustFlyingHeight05 <gen>
Conditions
((Triggering unit) is A flying unit) Equal to True
(Race of (Triggering unit)) Not equal to Orc
Actions
Custom script: local unit tempunit
Unit Group - Remove (Triggering unit) from UG_FlyingAdjustHeight .
Custom script: set tempunit = GetTriggerUnit()
Wait 0.50 seconds
Custom script: set udg_unit = tempunit
Unit Group - Remove (Triggering unit) from UG_FlyingAdjustHeight .
Monster SpellCooldown
Events
Time - Every 2 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_MonsterSpellCooldown) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
Unit Group - Pick every unit in UG_MonsterSpellCooldown and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is alive) Equal to False
Then - Actions
Unit Group - Remove (Picked unit) from UG_MonsterSpellCooldown .
Else - Actions
Set Variable Set r = (Load 19 of (Key (Picked unit).) from Hash_Main.)
Set Variable Set r2 = (Load 24 of (Key (Picked unit).) from Hash_Main.)
Set Variable Set r = (r - 2.00)
Set Variable Set r2 = (r2 - 2.00)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Less than or equal to 0.00
Then - Actions
Set Variable Set r = "0.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Less than or equal to 0.00
Then - Actions
Set Variable Set r2 = "0.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Equal to 0.00
r2 Equal to 0.00
Then - Actions
Unit Group - Remove (Picked unit) from UG_MonsterSpellCooldown .
Else - Actions
Hashtable - Save r as 19 of (Key (Picked unit).) in Hash_Main .
Hashtable - Save r2 as 24 of (Key (Picked unit).) in Hash_Main .
Monster WithinRange Spells Far
Events
Conditions
((Triggering unit) is in UG_Velocity.) Equal to False
(Load 19 of (Key (Triggering unit).) from Hash_Main.) Equal to 0.00
Or - Any (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to The Rejected
(Unit-type of (Triggering unit)) Equal to Shadow Dancer
(Unit-type of (Triggering unit)) Equal to Bloodfiend
(Unit-type of (Triggering unit)) Equal to The Crusher
(Unit-type of (Triggering unit)) Equal to Flayer
(Unit-type of (Triggering unit)) Equal to Souldrainer
(Unit-type of (Triggering unit)) Equal to Mind Flayer
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Wait 0.10 seconds
Custom script: set udg_unit = tempunit
Custom script: set udg_x = GetHandleId(udg_unit)
Set Variable Set unittype = (Unit-type of unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 19 of x from Hash_Main.) Greater than 0.00
Then - Actions
Skip remaining actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
unittype Equal to Shadow Dancer
unittype Equal to The Rejected
unittype Equal to Souldrainer
Then - Actions
Set Variable Set P = (Position of unit)
Set Variable Set UG = (Units within 1000.00 of P matching (((((Matching unit) is alive) Equal to True) and (((Matching unit) is paused) Equal to False)) and (((Race of (Matching unit)) Not equal to Orc) and (((Owner of (Matching unit)) is an enemy of (Owner of unit).) Equal to True))).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG) Greater than 0
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unittype Equal to Souldrainer
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of unit using Abilities\Weapons\ZigguratFrostMissile\ZigguratFrostMissile.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of unit using Abilities\Spells\Undead\Possession\PossessionMissile.mdl
Special Effect - Destroy (Last created special effect)
Set Variable Set unit2 = (Random unit from UG)
Set Variable Set P2 = (Position of unit2)
Set Variable Set r = (Angle from P2 to P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unittype Equal to The Rejected
Then - Actions
Set Variable Set P3 = (P2 offset by 256.00 towards r degrees.)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unittype Equal to Souldrainer
Then - Actions
Set Variable Set P3 = (P2 offset by 48.00 towards r degrees.)
Else - Actions
Set Variable Set P3 = (P2 offset by 128.00 towards r degrees.)
Unit - Move unit instantly to P3 , facing (r + 180.00) degrees
Custom script: call RemoveLocation(udg_P3)
Custom script: call RemoveLocation(udg_P2)
Animation - Play unit 's spell animation
Animation - Queue unit 's stand animation
Hashtable - Save 5.00 as 19 of x in Hash_Main .
Unit Group - Add unit to UG_MonsterSpellCooldown
Trigger - Turn on Monster_SpellCooldown <gen>
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unittype Equal to Flayer
(unit is in UG_Velocity.) Equal to False
Then - Actions
Set Variable Set P = (Position of unit)
Set Variable Set UG = (Units within 1500.00 of P matching (((((Matching unit) is alive) Equal to True) and (((Matching unit) is paused) Equal to False)) and (((Race of (Matching unit)) Not equal to Orc) and (((Owner of (Matching unit)) is an enemy of (Owner of unit).) Equal to True))).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG) Greater than 0
Then - Actions
Animation - Play unit 's spell animation
Animation - Queue unit 's stand animation
Set Variable Set unit2 = (Random unit from UG)
Set Variable Set PowerPush_Unit = unit
Set Variable Set PowerPush_Target = (Position of unit2)
Unit - Make (Triggering unit) face PowerPush_Target over 0 seconds
Set Variable Set IsTriggerOrder = "true"
Unit - Order (Triggering unit) to Attack . unit2
Set Variable Set IsTriggerOrder = "false"
Trigger - Run Velocity_PowerPush_PPPoint <gen> (checking conditions)
Hashtable - Save 5.00 as 19 of x in Hash_Main .
Unit Group - Add unit to UG_MonsterSpellCooldown
Trigger - Turn on Monster_SpellCooldown <gen>
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
unittype Equal to Bloodfiend
unittype Equal to The Crusher
(unit is in UG_Stampede.) Equal to False
Then - Actions
Set Variable Set P = (Position of unit)
Set Variable Set UG = (Units within 1500.00 of P matching ((((Matching unit) is alive) Equal to True) and (((Unit-type of (Matching unit)) Equal to Marine) and (((Matching unit) belongs to an enemy of (Owner of unit).) Equal to True))).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG) Greater than 0
Then - Actions
Animation - Change unit 's animation speed to 300.00 % of its original speed
Set Variable Set unit2 = (Random unit from UG)
Set Variable Set P2 = (Position of unit2)
Set Variable Set r = (Angle from P to P2)
Custom script: call RemoveLocation(udg_P2)
Unit - Make unit face r over 0 seconds
Hashtable - Save r as 26 of x in Hash_Main .
Hashtable - Save 0.00 as 25 of x in Hash_Main .
Unit Group - Add unit to UG_Stampede
Animation - Play unit 's walk animation
Custom script: call SetUnitAnimationByIndex(udg_unit,0)
Trigger - Turn on Monster_Stampede <gen>
Hashtable - Save 5.00 as 19 of x in Hash_Main .
Unit Group - Add unit to UG_MonsterSpellCooldown
Trigger - Turn on Monster_SpellCooldown <gen>
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unittype Equal to The Crusher
Then - Actions
Player Group - Pick every player in (All players) and do (Actions)
Loop - Actions
Camera - Shake the camera for (Picked player) with magnitude 10.00
Else - Actions
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unittype Equal to Mind Flayer
Then - Actions
Set Variable Set P = (Position of unit)
Set Variable Set UG = (Units within 1500.00 of P matching (((((Matching unit) is alive) Equal to True) and (((Matching unit) is paused) Equal to False)) and (((Race of (Matching unit)) Not equal to Orc) and (((Owner of (Matching unit)) is an enemy of (Owner of unit).) Equal to True))).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG) Greater than 0
Then - Actions
Hashtable - Save 5.00 as 19 of x in Hash_Main .
Unit Group - Add unit to UG_MonsterSpellCooldown
Trigger - Turn on Monster_SpellCooldown <gen>
Set Variable Set IsTriggerOrder = "true"
Unit - Order unit to Special Rexxar - Battle Roar .
Set Variable Set IsTriggerOrder = "false"
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Monster WithinRange Spells Close
Events
Conditions
Or - Any (Conditions) are true
Conditions
And - All (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to Bloodfiend
(Load 24 of (Key (Triggering unit).) from Hash_Main.) Equal to 0.00
And - All (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to The Rejected
(Load 24 of (Key (Triggering unit).) from Hash_Main.) Equal to 0.00
And - All (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to Scavenger
(Load 20 of (Key (Triggering unit).) from Hash_Main.) Greater than 0
And - All (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to Sutured Cadavre
((Triggering unit) is in UG_SuturedCadavreBlow.) Equal to False
And - All (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to Carnivore
Monster_Carnivore_AllowSpawn Equal to True
(Number of units in UG_AliveZombies) Less than 60
(Load 24 of (Key (Triggering unit).) from Hash_Main.) Equal to 0.00
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Wait 0.10 seconds
Custom script: set udg_unit = tempunit
Custom script: set udg_x = GetHandleId(udg_unit)
Set Variable Set unittype = (Unit-type of unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 24 of x from Hash_Main.) Greater than 0.00
Then - Actions
Skip remaining actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unittype Equal to Bloodfiend
Then - Actions
Hashtable - Save 15.00 as 24 of x in Hash_Main .
Unit Group - Add unit to UG_MonsterSpellCooldown
Trigger - Turn on Monster_SpellCooldown <gen>
Set Variable Set IsTriggerOrder = "true"
Unit - Order unit to Orc Troll Berserker - Berserk .
Set Variable Set IsTriggerOrder = "false"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unittype Equal to The Rejected
Then - Actions
Hashtable - Save 3.00 as 24 of x in Hash_Main .
Unit Group - Add unit to UG_MonsterSpellCooldown
Trigger - Turn on Monster_SpellCooldown <gen>
Set Variable Set P = (Position of unit)
Set Variable Set UG = (Units within 425.00 of P matching ((((Matching unit) is alive) Equal to True) and (((Unit-type of (Matching unit)) Equal to Marine) and (((Matching unit) belongs to an enemy of (Owner of unit).) Equal to True))).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG) Greater than 0
Then - Actions
Set Variable Set IsTriggerOrder = "true"
Unit - Order unit to Special Rexxar - Battle Roar .
Set Variable Set IsTriggerOrder = "false"
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unittype Equal to Scavenger
(Load 20 of x from Hash_Main.) Greater than 0
Then - Actions
Custom script: set udg_x = GetHandleId(udg_unit)
Hashtable - Save 0 as 20 of x in Hash_Main .
Special Effect - Destroy (Load 21 of x in Hash_Main.)
Special Effect - Destroy (Load 22 of x in Hash_Main.)
Set Variable Set P = (Position of unit)
Unit - Create 1 . Corpse Muncher for (Owner of unit) at P facing (Facing of unit) degrees
Animation - Change (Last created unit) flying height to (Current flying height of unit) at 0.00
Set Variable Set PowerPush_Unit = (Last created unit)
Set Variable Set PowerPush_AngleXY = (Facing of (Last created unit))
Set Variable Set PowerPush_PowerXY = "15.00"
Trigger - Run Velocity_PowerPush_PPunit <gen> (checking conditions)
Unit - Create 1 . Corpse Muncher for (Owner of unit) at P facing (Facing of unit) degrees
Animation - Change (Last created unit) flying height to (Current flying height of unit) at 0.00
Set Variable Set PowerPush_Unit = (Last created unit)
Set Variable Set PowerPush_AngleXY = (Facing of (Last created unit))
Set Variable Set PowerPush_PowerXY = "15.00"
Trigger - Run Velocity_PowerPush_PPunit <gen> (checking conditions)
Custom script: call RemoveLocation(udg_P)
Unit - Replace unit with a Scavenger dropoff done using The new unit's max life and mana
Set Variable Set P = (Random point in (Playable map area))
Set Variable Set x = "0"
Trigger - Run GetPoint_AwayFromMarines <gen> (checking conditions)
Set Variable Set IsTriggerOrder = "true"
Unit - Order (Last replaced unit) to Move To . P
Set Variable Set IsTriggerOrder = "false"
Unit - Add a 10.00 second Generic expiration timer to (Last replaced unit)
Unit Group - Add (Last replaced unit) to UG_FlyingAdjustHeight
Hashtable - Save -1.00 as 23 of (Key (Last replaced unit).) in Hash_Main .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unittype Equal to Sutured Cadavre
(unit is in UG_SuturedCadavreBlow.) Equal to False
Then - Actions
Set Variable Set x2 = "0"
Set Variable Set P = (Position of unit)
Unit Group - Pick every unit in UG_AliveMarines and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) belongs to an enemy of (Owner of unit).) Equal to True
Then - Actions
Set Variable Set P2 = (Position of (Picked unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P and P2) Less than or equal to 450.00
Then - Actions
Set Variable Set x2 = "1"
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Else - Actions
Custom script: call RemoveLocation(udg_P)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Equal to 1
Then - Actions
Unit Group - Add unit to UG_SuturedCadavreBlow
Trigger - Turn on Monster_SuturedCadavre_Blow <gen>
-------- Doesn't work while walking --------
Custom script: call SetUnitAnimationByIndex(udg_unit,4)
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
unittype Equal to Carnivore
Then - Actions
Hashtable - Save 5.00 as 24 of x in Hash_Main .
Unit Group - Add unit to UG_MonsterSpellCooldown
Trigger - Turn on Monster_SpellCooldown <gen>
Set Variable Set IsTriggerOrder = "true"
Unit - Order unit to Special Rexxar - Battle Roar .
Set Variable Set IsTriggerOrder = "false"
Else - Actions
Monster CrawlUpDown Start
Events
Time - Every 2 seconds of game time
Conditions
Actions
Unit Group - Pick every unit in UG_AliveZombies and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Picked unit)) Equal to Living Slime
(Unit-type of (Picked unit)) Equal to Corpse Muncher
(Unit-type of (Picked unit)) Equal to Flayer
(Unit-type of (Picked unit)) Equal to Shadow Dancer
(Unit-type of (Picked unit)) Equal to The Rejected
((Picked unit) is in UG_Velocity.) Equal to False
Then - Actions
Set Variable Set P = (Position of (Picked unit))
Set Variable Set P2 = (P offset by 256.00 towards (Facing of (Picked unit)) degrees.)
Custom script: set udg_r = GetLocationZ(udg_P)
Custom script: set udg_r2 = GetLocationZ(udg_P2)
-------- Crawl Up --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Greater than r
Or - Any (Conditions) are true
Conditions
(Unit-type of (Picked unit)) Equal to Corpse Muncher
(Unit-type of (Picked unit)) Equal to Living Slime
Then - Actions
Set Variable Set x = "0"
Destructible - Pick every destructible within 128.00 of P2 and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Destructible-type of (Picked destructible)) Equal to OTip (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to OTis (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to B00H (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to B00I (Unexpected type: 'destructablecode')
Then - Actions
Set Variable Set x = "1"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 1
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is in UG_Burning.) Equal to True
Then - Actions
Special Effect - Destroy (Load 2 of (Key (Picked unit).) in Hash_Main.)
Else - Actions
Hashtable - Clear all child hashtables of child (Key (Picked unit).) in Hash_Main .
Set Variable Set P3 = (P offset by 64.00 towards (Facing of (Picked unit)) degrees.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Corpse Muncher
Then - Actions
Unit - Create 1 . Corpse Muncher + for (Owner of (Picked unit)) at P3 facing ((Facing of (Picked unit)) + 90.00) degrees
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Living Slime
Then - Actions
Unit - Create 1 . Living Slime + for (Owner of (Picked unit)) at P3 facing ((Facing of (Picked unit)) + 90.00) degrees
Else - Actions
Unit - Turn collision for (Last created unit) Off .
Custom script: call RemoveLocation(udg_P3)
Unit - Set life of (Last created unit) to (Life of (Picked unit)) %
Unit - Pause (Last created unit)
Unit Group - Add (Last created unit) to UG_AliveZombies
Unit Group - Add (Last created unit) to UG_CrawlUpMonsters
Trigger - Turn on Monster_CrawlUp <gen>
Hashtable - Save (Facing of (Picked unit)) as 18 of (Key (Last created unit).) in Hash_Main .
Animation - Change (Last created unit) 's animation speed to 200.00 % of its original speed
Custom script: call SetUnitAnimationByIndex(bj_lastCreatedUnit, 1)
Unit - Remove (Picked unit) from the game
Else - Actions
Else - Actions
-------- Jump Down --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Less than r
(Load 12 of (Key (Picked unit).) from Hash_Main.) Equal to 0
Then - Actions
Set Variable Set x = "0"
Destructible - Pick every destructible within 256.00 of P and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Destructible-type of (Picked destructible)) Equal to OTip (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to OTis (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to B00H (Unexpected type: 'destructablecode')
(Destructible-type of (Picked destructible)) Equal to B00I (Unexpected type: 'destructablecode')
Then - Actions
Set Variable Set x = "1"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 1
Then - Actions
-------- Souldrainer Teleport down --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Picked unit)) Equal to Shadow Dancer
(Unit-type of (Picked unit)) Equal to The Rejected
Then - Actions
Set Variable Set unit = (Picked unit)
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of unit using Abilities\Spells\Undead\Possession\PossessionMissile.mdl
Special Effect - Destroy (Last created special effect)
Unit - Move unit instantly to P2
Animation - Play unit 's spell animation
Animation - Queue unit 's stand animation
Custom script: set udg_x = GetHandleId(udg_unit)
Hashtable - Save 5.00 as 19 of x in Hash_Main .
Unit Group - Add unit to UG_MonsterSpellCooldown
Trigger - Turn on Monster_SpellCooldown <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Corpse Muncher
Then - Actions
Animation - Play (Picked unit) 's victory animation
Unit - Remove Ghost (Visible) from (Picked unit)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Flayer
Then - Actions
Animation - Play (Picked unit) 's spell animation
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Living Slime
Then - Actions
Animation - Play (Picked unit) 's attack animation
Unit - Remove Ghost (Visible) from (Picked unit)
Else - Actions
Animation - Queue (Picked unit) 's stand animation
Set Variable Set PowerPush_Unit = (Picked unit)
Set Variable Set PowerPush_AngleXY = (Facing of (Picked unit))
Set Variable Set PowerPush_PowerXY = "15.00"
Set Variable Set PowerPush_PowerZ = "30.00"
Trigger - Run Velocity_PowerPush_PPunit <gen> (checking conditions)
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Monster CrawlUp
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_CrawlUpMonsters) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
-------- Increase summon progress --------
Unit Group - Pick every unit in UG_CrawlUpMonsters and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is alive) Equal to False
Then - Actions
Unit Group - Remove (Picked unit) from UG_CrawlUpMonsters .
Else - Actions
Set Variable Set r4 = (Load 18 of (Key (Picked unit).) from Hash_Main.)
Set Variable Set P = (Position of (Picked unit))
Set Variable Set P2 = (P offset by 128.00 towards r4 degrees.)
Custom script: set udg_r = GetLocationZ(udg_P)
Custom script: set udg_r2 = GetLocationZ(udg_P2)
Set Variable Set r3 = (Current flying height of (Picked unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r2 Greater than (r + r3)
Then - Actions
Animation - Change (Picked unit) flying height to (r3 + 5.00) at 0.00
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is in UG_Burning.) Equal to True
Then - Actions
Special Effect - Destroy (Load 2 of (Key (Picked unit).) in Hash_Main.)
Else - Actions
-------- Normal form --------
Hashtable - Clear all child hashtables of child (Key (Picked unit).) in Hash_Main .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Corpse Muncher +
Then - Actions
Unit - Create 1 . Corpse Muncher for (Owner of (Picked unit)) at P2 facing r4 degrees
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to Living Slime +
Then - Actions
Unit - Create 1 . Living Slime for (Owner of (Picked unit)) at P2 facing r4 degrees
Else - Actions
Unit - Add Ghost (Visible) to (Last created unit)
Unit - Set life of (Last created unit) to (Life of (Picked unit)) %
Unit Group - Add (Last created unit) to UG_AliveZombies
Unit - Remove (Picked unit) from the game
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
x: Summon progress

x: Heretic SummonProgress
x2: Heretic SummonProgress TogetherKey
Monster Heretic Summon
Events
Time - Every 2.00 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_Heretics) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
-------- Increase summon progress --------
Unit Group - Pick every unit in UG_Heretics and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is alive) Equal to False
Then - Actions
Unit Group - Remove (Picked unit) from UG_Heretics .
Else - Actions
Animation - Queue (Picked unit) 's work animation
Set Variable Set x2 = (Load 16 of (Key (Picked unit).) from Hash_Main.)
Set Variable Set x = (Load 15 of x2 from Hash_Main.)
Set Variable Set x = (x + 1)
Hashtable - Save x as 15 of x2 in Hash_Main .
-------- Summon finished --------
Unit Group - Pick every unit in UG_Heretics and do (Actions)
Loop - Actions
Set Variable Set x2 = (Load 16 of (Key (Picked unit).) from Hash_Main.)
Set Variable Set x = (Load 15 of x2 from Hash_Main.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 0
Then - Actions
Unit - Kill (Picked unit)
Unit Group - Remove (Picked unit) from UG_Heretics .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Greater than or equal to 30
Then - Actions
Unit - Kill (Picked unit)
Unit Group - Remove (Picked unit) from UG_Heretics .
Set Variable Set P = (Load 17 of x2 in Hash_Main.)
Unit - Create 1 . Flesh Thing for (Owner of (Picked unit)) at P facing (Random angle) degrees
Animation - Play (Last created unit) 's stand animation, using only Rare animations
Animation - Queue (Last created unit) 's stand animation
Special Effect - Create a special effect at P using Abilities\Weapons\PhoenixMissile\Phoenix_Missile.mdl
Special Effect - Destroy (Last created special effect)
Custom script: call RemoveLocation(udg_P)
Hashtable - Clear all child hashtables of child x2 in Hash_Main .
Else - Actions

100: Abom Blow index
101...105: Abom Blow effect
Monster Abom Death
Events
Conditions
(Unit-type of (Triggering unit)) Equal to Flesh Thing
(Damage taken) Greater than or equal to (Life of (Triggering unit))
Actions
Unit - Make (Triggering unit) Invulnerable
Unit - Pause (Triggering unit)
Animation - Change (Triggering unit) 's animation speed to 300.00 % of its original speed
Animation - Play (Triggering unit) 's death animation
Set Variable Set HealthBar = (Load 0 of (Key (Triggering unit).) in HealthHash)
Floating Text - Destroy HealthBar
Hashtable - Clear all child hashtables of child (Key (Triggering unit).) in HealthHash .
Unit Group - Remove (Triggering unit) from HealthBar_UG .
Hashtable - Save 100.00 as 100 of (Key (Triggering unit).) in Hash_Main .
Unit Group - Add (Triggering unit) to UG_Monster_AbomBlow
Trigger - Turn on Monster_Abom_Blow <gen>
06: Velocity X
07: Velocity Y
08: Velocity Z
Monster Abom Blow
Events
Time - Every 0.05 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_Monster_AbomBlow) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
Unit Group - Pick every unit in UG_Monster_AbomBlow and do (Actions)
Loop - Actions
Set Variable Set r = (Load 100 of (Key (Picked unit).) from Hash_Main.)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Greater than or equal to 100.00
Then - Actions
Set Variable Set r2 = (0.05 x (1.00 - (r / 200.00)))
Set Variable Set r2 = (r2 + 1.00)
Set Variable Set r = (r x r2)
Set Variable Set r = (r + 1.00)
Hashtable - Save r as 100 of (Key (Picked unit).) in Hash_Main .
Animation - Change (Picked unit) 's size to ( r %, r %, r %) of its original size
Set Variable Set r2 = "61.00"
Set Variable Set r2 = (r2 x (1 - (r / 200.00)))
Animation - Change (Picked unit) 's vertex coloring to ( 100 %, r2 %, r2 %) with 0 % transparency
Set Variable Set r2 = (210.00 - r)
Set Variable Set r2 = (0.60 x r2)
Animation - Change (Picked unit) 's animation speed to r2 % of its original speed
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Greater than 200.00
Then - Actions
Trigger - Add to Monster_Abom_Death_Infection <gen> the event ((Picked unit) Dies)
Unit - Kill (Picked unit)
Animation - Change (Picked unit) 's animation speed to 300.00 % of its original speed
Set Variable Set r = "90.00"
Hashtable - Save r as 100 of (Key (Picked unit).) in Hash_Main .
Set Variable Set P = (Position of (Picked unit))
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Picked unit) using Blood Explosion.mdx
Hashtable - Save Handle Of (Last created special effect) as 101 of (Key (Picked unit).) in Hash_Main .
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Picked unit) using Blood Burst.mdx
Hashtable - Save Handle Of (Last created special effect) as 102 of (Key (Picked unit).) in Hash_Main .
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of (Picked unit) using Units\Undead\Abomination\AbominationExplosion.mdl
Hashtable - Save Handle Of (Last created special effect) as 103 of (Key (Picked unit).) in Hash_Main .
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Picked unit) using Objects\Spawnmodels\Orc\OrcLargeDeathExplode\OrcLargeDeathExplode.mdl
Hashtable - Save Handle Of (Last created special effect) as 104 of (Key (Picked unit).) in Hash_Main .
Special Effect - Create a special effect at P using Blood Explosion.mdx
Hashtable - Save Handle Of (Last created special effect) as 105 of (Key (Picked unit).) in Hash_Main .
Special Effect - Create a special effect at P using Abilities\Weapons\DemolisherFireMissile\DemolisherFireMissile.mdl
Special Effect - Destroy (Last created special effect)
Set Variable Set P2 = (P offset by 1000.00 towards (Facing of (Picked unit)) degrees.)
For each (Integer A) from 1 to (Random integer number between 10 and 15) , do (Actions)
Loop - Actions
Unit - Create 1 . Maggot for (Owner of (Picked unit)) at P facing (Facing of (Picked unit)) degrees
Set Variable Set PowerPush_Unit = (Last created unit)
Set Variable Set PowerPush_AngleXY = (Facing of (Picked unit))
Set Variable Set PowerPush_PowerXY = (Random real number between 20.00 and 30.00)
Set Variable Set PowerPush_PowerZ = (Random real number between 20.00 and 100.00)
Trigger - Run Velocity_PowerPush_PPunit <gen> (checking conditions)
Custom script: call RemoveLocation(udg_P2)
Set Variable Set P2 = (P offset by (r x 0.10) towards ((Facing of (Picked unit)) + 180.00) degrees.)
Unit - Move (Picked unit) instantly to P2
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
Camera - Shake the camera for (Player((Integer A))) with magnitude (1.50 x r)
Camera - Sway the camera source for (Player((Integer A))) with magnitude (1.00 x r) and velocity 0.1
Else - Actions
Else - Actions
Set Variable Set r = (r - 10.00)
Hashtable - Save r as 100 of (Key (Picked unit).) in Hash_Main .
Set Variable Set P = (Position of (Picked unit))
Set Variable Set P2 = (P offset by (r x 0.10) towards ((Facing of (Picked unit)) + 180.00) degrees.)
Unit - Move (Picked unit) instantly to P2
Set Variable Set P3 = (P2 offset by 156.00 towards ((Facing of (Picked unit)) + 180.00) degrees.)
Special Effect - Destroy (Load 105 of (Key (Picked unit).) in Hash_Main.)
Set Variable Set x = (Random integer number between 1 and 3)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 1
Then - Actions
Special Effect - Create a special effect at P3 using Blood Burst.mdx
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 2
Then - Actions
Special Effect - Create a special effect at P3 using Objects\Spawnmodels\Orc\OrcLargeDeathExplode\OrcLargeDeathExplode.mdl
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Equal to 3
Then - Actions
Special Effect - Create a special effect at P3 using Objects\Spawnmodels\Undead\UndeadLargeDeathExplode\UndeadLargeDeathExplode.mdl
Else - Actions
Hashtable - Save Handle Of (Last created special effect) as 105 of (Key (Picked unit).) in Hash_Main .
Custom script: call RemoveLocation(udg_P3)
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
Camera - Shake the camera for (Player((Integer A))) with magnitude (1.50 x r)
Camera - Sway the camera source for (Player((Integer A))) with magnitude (1.00 x r) and velocity 0.1
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Less than or equal to 0.00
Then - Actions
Unit Group - Remove (Picked unit) from UG_Monster_AbomBlow .
For each (Integer A) from 1 to 4 , do (Actions)
Loop - Actions
Special Effect - Destroy (Load (100 + (Integer A)) of (Key (Picked unit).) in Hash_Main.)
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
Camera - Stop swaying/shaking the camera for (Player((Integer A))) .
Else - Actions
Monster Abom Death Infection
Events
Conditions
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Wait 0.50 seconds
Custom script: set udg_unit = tempunit
Set Variable Set P = (Position of unit)
Set Variable Set UG = (Units within 350.00 of P matching ((((Matching unit) is alive) Equal to True) and ((Unit-type of (Matching unit)) Equal to Marine)).)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Set Variable Set Marine_Infection_x = (Load 13 of (Key (Picked unit).) from Marine_Hash.)
Set Variable Set Marine_Infection_x = (Marine_Infection_x - (Random integer number between 20 and 40))
Hashtable - Save Marine_Infection_x as 13 of (Key (Picked unit).) in Marine_Hash .
Unit Group - Add (Picked unit) to UG_RemoveInfection
Trigger - Turn on MS_Infection_Remove <gen>
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Monster Acid Spit
Events
Conditions
(Ability being cast) Equal to Spit Blood
Actions
Set Variable Set P = (Position of (Triggering unit))
Set Variable Set r = (Facing of (Triggering unit))
Set Variable Set P2 = (P offset by 256.00 towards r degrees.)
Unit - Create 1 . BloodSpit Effect Dummy for (Owner of (Triggering unit)) at P2 facing (r + (90.00 + (Random real number between -25.00 and 25.00))) degrees
Unit - Create 1 . BloodSpit Effect Dummy for (Owner of (Triggering unit)) at P2 facing (r + (90.00 + (Random real number between -25.00 and 25.00))) degrees
Unit - Create 1 . BloodSpit Effect Dummy for (Owner of (Triggering unit)) at P2 facing (r + (90.00 + (Random real number between -25.00 and 25.00))) degrees
Unit - Create 1 . BloodSpit Effect Dummy for (Owner of (Triggering unit)) at P2 facing (r + (90.00 + (Random real number between -25.00 and 25.00))) degrees
Unit - Create 1 . BloodSpit Effect Dummy for (Owner of (Triggering unit)) at P2 facing (r + (90.00 + (Random real number between -25.00 and 25.00))) degrees
Set Variable Set UG = (Units within 256.00 of P2 matching ((((Matching unit) is alive) Equal to True) and ((Unit-type of (Matching unit)) Equal to Marine)).)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Set Variable Set Marine_Infection_x = (Load 13 of (Key (Picked unit).) from Marine_Hash.)
Set Variable Set Marine_Infection_x = (Marine_Infection_x - 60)
Hashtable - Save Marine_Infection_x as 13 of (Key (Picked unit).) in Marine_Hash .
Unit Group - Add (Picked unit) to UG_RemoveInfection
Custom script: call DestroyGroup(udg_UG)
Trigger - Turn on MS_Infection_Remove <gen>
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
Monster Stampede
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_Stampede) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
Unit Group - Pick every unit in UG_Stampede and do (Actions)
Loop - Actions
Set Variable Set r = (Load 25 of (Key (Picked unit).) from Hash_Main.)
Set Variable Set r = (r + 0.03)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
r Greater than 2.00
((Picked unit) is alive) Equal to False
Then - Actions
Set Variable Set r = "0.00"
Unit Group - Remove (Picked unit) from UG_Stampede .
Animation - Change (Picked unit) 's animation speed to 100.00 % of its original speed
Animation - Reset (Picked unit) 's animation
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is alive) Equal to False
Then - Actions
Set Variable Set unit = (Picked unit)
Custom script: call SetUnitAnimationByIndex(udg_unit,3)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to The Crusher
Then - Actions
Player Group - Pick every player in (All players) and do (Actions)
Loop - Actions
Camera - Stop swaying/shaking the camera for (Picked player) .
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 5) Equal to 1
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 1) Equal to 1
Then - Actions
Special Effect - Create a special effect attached to the foot, left (Unexpected type: 'attachpoint') of (Picked unit) using Abilities\Weapons\AncientProtectorMissile\AncientProtectorMissile.mdl
Else - Actions
Special Effect - Create a special effect attached to the foot, right (Unexpected type: 'attachpoint') of (Picked unit) using Abilities\Weapons\AncientProtectorMissile\AncientProtectorMissile.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
Set Variable Set r2 = (Load 26 of (Key (Picked unit).) from Hash_Main.)
Set Variable Set P = (Position of (Picked unit))
Set Variable Set P2 = (P offset by 32.00 towards r2 degrees.)
Unit - Move (Picked unit) instantly to P2 , facing r2 degrees
Set Variable Set P3 = (Position of (Picked unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between P2 and P3) Greater than 4.00
Then - Actions
Set Variable Set r = "5.00"
Unit - Move (Picked unit) instantly to P
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of (Picked unit)) Equal to The Crusher
Then - Actions
-------- Unit dmg collide --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Less than 5.00
Then - Actions
Set Variable Set UG = (Units within 225.00 of P2 matching (((((Matching unit) is alive) Equal to True) and ((Race of (Matching unit)) Not equal to Orc)) and (((Owner of (Picked unit)) is an enemy of (Owner of (Matching unit)).) Equal to True)).)
Else - Actions
Set Variable Set UG = (Units within 225.00 of P matching (((((Matching unit) is alive) Equal to True) and ((Race of (Matching unit)) Not equal to Orc)) and (((Owner of (Picked unit)) is an enemy of (Owner of (Matching unit)).) Equal to True)).)
Set Variable Set x = (Number of units in UG)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Greater than 0
Then - Actions
For each (Integer A) from 1 to x , do (Actions)
Loop - Actions
Set Variable Set PowerPush_Unit = (Random unit from UG)
Unit Group - Remove PowerPush_Unit from UG .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Current flying height of PowerPush_Unit) Less than or equal to 128.00
Then - Actions
Custom script: call RemoveLocation(udg_P3)
Set Variable Set P2 = (Position of PowerPush_Unit)
Set Variable Set PowerPush_AngleXY = (Angle from P to P2)
Custom script: call RemoveLocation(udg_P3)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Abs(PowerPush_AngleXY)) Less than 70.00
(Abs(PowerPush_AngleXY)) Greater than 290.00
Then - Actions
Unit - Create 1 . Dummy (Default 5sec) for Neutral Passive at P facing Default building facing degrees
Unit - Add Stun (1sec) to (Last created unit)
Unit - Order (Last created unit) to Neutral - Firebolt . PowerPush_Unit
Unit - Cause (Picked unit) to damage PowerPush_Unit , dealing 50.00 damage of attack type Siege and damage type Normal
Else - Actions
Else - Actions
Else - Actions
Custom script: call DestroyGroup(udg_UG)
-------- Ground shake --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 5) Equal to 1
Then - Actions
Set Variable Set UG = (Units within 1200.00 of P matching (((((Matching unit) is alive) Equal to True) and ((Race of (Matching unit)) Not equal to Orc)) and (((Matching unit) is in UG_Velocity.) Equal to False)).)
Set Variable Set x = (Number of units in UG)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x Greater than 0
Then - Actions
For each (Integer A) from 1 to x , do (Actions)
Loop - Actions
Set Variable Set PowerPush_Unit = (Random unit from UG)
Unit Group - Remove PowerPush_Unit from UG .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
PowerPush_Unit Not equal to (Picked unit)
(Unit-type of PowerPush_Unit) Not equal to Tank
(Unit-type of PowerPush_Unit) Not equal to Stationary MG
Then - Actions
Set Variable Set PowerPush_AngleXY = (Random angle)
Set Variable Set PowerPush_PowerXY = "15.00"
Set Variable Set PowerPush_PowerZ = "20.00"
Unit - Create 1 . Dummy (Default 5sec) for Neutral Passive at P facing Default building facing degrees
Unit - Add Stun (1sec) to (Last created unit)
Unit - Order (Last created unit) to Neutral - Firebolt . PowerPush_Unit
Trigger - Run Velocity_PowerPush_PPunit <gen> (checking conditions)
Else - Actions
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Else - Actions
Else - Actions
Custom script: call RemoveLocation(udg_P3)
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
Hashtable - Save r as 25 of (Key (Picked unit).) in Hash_Main .
06: Velocity X
07: Velocity Y
08: Velocity Z
Monster SuturedCadavre Blow
Events
Time - Every 0.05 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in UG_SuturedCadavreBlow) Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
Unit Group - Pick every unit in UG_SuturedCadavreBlow and do (Actions)
Loop - Actions
Set Variable Set r = (Load 27 of (Key (Picked unit).) from Hash_Main.)
Set Variable Set r = (r + 0.05)
Set Variable Set r2 = (100.00 + (100.00 x r))
Animation - Change (Picked unit) 's size to ( r2 %, r2 %, r2 %) of its original size
Set Variable Set r2 = (25.00 - (16.50 x r))
Animation - Change (Picked unit) 's animation speed to r2 % of its original speed
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Greater than or equal to 1.50
Then - Actions
Trigger - Add to Monster_Abom_Death_Infection <gen> the event ((Picked unit) Dies)
Unit - Kill (Picked unit)
Set Variable Set r = "-0.50"
Animation - Change (Picked unit) 's animation speed to 300.00 % of its original speed
Set Variable Set P = (Position of (Picked unit))
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Picked unit) using Blood Explosion.mdx
Hashtable - Save Handle Of (Last created special effect) as 101 of (Key (Picked unit).) in Hash_Main .
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Picked unit) using Blood Burst.mdx
Hashtable - Save Handle Of (Last created special effect) as 102 of (Key (Picked unit).) in Hash_Main .
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of (Picked unit) using Units\Undead\Abomination\AbominationExplosion.mdl
Hashtable - Save Handle Of (Last created special effect) as 103 of (Key (Picked unit).) in Hash_Main .
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Picked unit) using Objects\Spawnmodels\Orc\OrcLargeDeathExplode\OrcLargeDeathExplode.mdl
Hashtable - Save Handle Of (Last created special effect) as 104 of (Key (Picked unit).) in Hash_Main .
Special Effect - Create a special effect at P using Blood Explosion.mdx
Hashtable - Save Handle Of (Last created special effect) as 105 of (Key (Picked unit).) in Hash_Main .
Special Effect - Create a special effect at P using Abilities\Weapons\DemolisherFireMissile\DemolisherFireMissile.mdl
Special Effect - Destroy (Last created special effect)
Custom script: call RemoveLocation(udg_P2)
Set Variable Set Explosion_Caster = (Picked unit)
Set Variable Set Explosion_Origin = (Position of (Picked unit))
Set Variable Set Explosion_Range = "400.00"
Set Variable Set Explosion_MaxDmg = "200.00"
Set Variable Set Explosion_Type = "3"
Trigger - Run Create_Explosion <gen> (checking conditions)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
r Less than 0.00
r Greater than or equal to -0.10
Then - Actions
Unit Group - Remove (Picked unit) from UG_SuturedCadavreBlow .
Hashtable - Clear all child hashtables of child (Key (Picked unit).) in Marine_Hash .
Hashtable - Clear all child hashtables of child (Key (Picked unit).) in Missle_Hash .
Unit Group - Remove (Picked unit) from UG_DeadUnits .
Unit - Remove (Picked unit) from the game
For each (Integer A) from 1 to 4 , do (Actions)
Loop - Actions
Special Effect - Destroy (Load (100 + (Integer A)) of (Key (Picked unit).) in Hash_Main.)
Else - Actions
Hashtable - Save r as 27 of (Key (Picked unit).) in Hash_Main .
Monster Carnivore SpawnBreed Order
Events
Conditions
(Load 24 of (Key (Triggering unit).) from Hash_Main.) Equal to 0.00
Monster_Carnivore_AllowSpawn Equal to True
(Number of units in UG_AliveZombies) Less than 60
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Wait 0.10 seconds
Custom script: set udg_unit = tempunit
Custom script: set udg_x = GetHandleId(udg_unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 24 of x from Hash_Main.) Equal to 0.00
Then - Actions
Trigger - Turn off (This trigger)
Hashtable - Save 5.00 as 24 of x in Hash_Main .
Unit Group - Add unit to UG_MonsterSpellCooldown
Trigger - Turn on Monster_SpellCooldown <gen>
Set Variable Set IsTriggerOrder = "true"
Unit - Order unit to Special Rexxar - Battle Roar .
Set Variable Set IsTriggerOrder = "false"
Wait 5.00 seconds
Trigger - Turn on (This trigger)
Else - Actions
Monster Carnivore SpawnBreed Cast
Events
Conditions
(Ability being cast) Equal to Spawn Breed
Actions
Set Variable Set Monster_Carnivore = (Triggering unit)
Trigger - Turn off Monster_Carnivore_SpawnBreed_Cast <gen>
Trigger - Turn off Monster_Carnivore_SpawnBreed_Order <gen>
Trigger - Turn on Monster_Carnivore_SpawnBreed_Main <gen>
Wait (Random real number between 2.00 and 3.00) seconds
Trigger - Turn off Monster_Carnivore_SpawnBreed_Main <gen>
Trigger - Turn on Monster_Carnivore_SpawnBreed_Cast <gen>
Trigger - Turn on Monster_Carnivore_SpawnBreed_Order <gen>
Monster Carnivore SpawnBreed Main
Events
Time - Every 0.25 seconds of game time
Conditions
Actions
Custom script: local effect eff
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Monster_Carnivore is alive) Equal to True
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of Monster_Carnivore using Objects\Spawnmodels\Undead\UndeadLargeDeathExplode\UndeadLargeDeathExplode.mdl
Custom script: set eff = bj_lastCreatedEffect
Set Variable Set P = (Position of Monster_Carnivore)
Unit - Create 1 . Living Slime for (Owner of Monster_Carnivore) at P facing (Random angle) degrees
Custom script: call RemoveLocation(udg_P)
Unit Group - Add (Last created unit) to UG_AliveZombies
Animation - Play (Last created unit) 's attack animation
Animation - Queue (Last created unit) 's stand animation
Set Variable Set PowerPush_Unit = (Last created unit)
Set Variable Set PowerPush_AngleXY = (Facing of (Last created unit))
Set Variable Set PowerPush_PowerXY = (Random real number between 10.00 and 30.00)
Set Variable Set PowerPush_PowerZ = (Random real number between 70.00 and 100.00)
Trigger - Run Velocity_PowerPush_PPunit <gen> (checking conditions)
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Else - Actions
Trigger - Turn off (This trigger)
Monster Black Hole Cast
Events
Conditions
(Ability being cast) Equal to Dimensional Shift
Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Undead\Unsummon\UnsummonTarget.mdl
Special Effect - Destroy (Last created special effect)
Set Variable Set Monster_EndBoss = (Triggering unit)
Set Variable Set P = (Position of (Triggering unit))
For each (Integer A) from 1 to 4 , do (Actions)
Loop - Actions
Unit - Create 1 . Black Hole (Mind Flayer) for (Owner of (Triggering unit)) at P facing (Random angle) degrees
Unit - Change color of (Last created unit) to Maroon
Animation - Change (Last created unit) 's animation speed to 10.00 % of its original speed
Unit - Add a 1.00 second Generic expiration timer to (Last created unit)
Unit - Turn collision for (Last created unit) Off .
Unit - Move (Last created unit) instantly to P
Animation - Change (Triggering unit) 's animation speed to 30.00 % of its original speed
Unit - Pause (Triggering unit)
Custom script: call RemoveLocation(udg_P)
Trigger - Turn on Monster_Black_Hole_Main <gen>
Wait 1.00 seconds
Trigger - Turn off Monster_Black_Hole_Main <gen>
Animation - Change Monster_EndBoss 's animation speed to 100.00 % of its original speed
Unit - Unpause Monster_EndBoss
Set Variable Set IsTriggerOrder = "true"
Unit - Order Monster_EndBoss to Stop .
Set Variable Set IsTriggerOrder = "false"
Unit Group - Add Monster_EndBoss to UG_ZombiesAttackOrder
Trigger - Turn on Monster_AttackOrder <gen>
Monster Black Hole Main
Events
Time - Every 0.10 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Monster_EndBoss is alive) Equal to True
Then - Actions
Set Variable Set P = (Position of Monster_EndBoss)
Set Variable Set UG = (Units within 1500.00 of P matching ((((Matching unit) is alive) Equal to True) and (((Owner of Monster_EndBoss) is an enemy of (Owner of (Matching unit)).) Equal to True)).)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Picked unit)) Not equal to Orc
Then - Actions
Set Variable Set P2 = (Position of (Picked unit))
Set Variable Set r = (Distance between P and P2)
Set Variable Set r = (r / 250.00)
Set Variable Set PowerPush_Unit = (Picked unit)
Set Variable Set PowerPush_AngleXY = (Angle from P2 to P)
Set Variable Set PowerPush_PowerXY = r
Custom script: call RemoveLocation(udg_P2)
Set Variable Set PowerPush_PowerZ = "0.00"
Trigger - Run Velocity_PowerPush_PPunit <gen> (checking conditions)
Else - Actions
Custom script: call DestroyGroup(udg_UG)
Custom script: call RemoveLocation(udg_P)
Else - Actions
Trigger - Turn off (This trigger)
Monster MindFlayer Death
Events
Conditions
Actions
Custom script: local effect eff
Custom script: local effect eff2
Custom script: local effect eff3
Custom script: local effect eff4
Wait 0.10 seconds
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Undead\Unsummon\UnsummonTarget.mdl
Special Effect - Destroy (Last created special effect)
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Units\NightElf\Wisp\WispExplode.mdl
Custom script: set eff = bj_lastCreatedEffect
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Undead\DeathCoil\DeathCoilSpecialArt.mdl
Custom script: set eff2 = bj_lastCreatedEffect
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Undead\Unsummon\UnsummonTarget.mdl
Custom script: set eff3 = bj_lastCreatedEffect
Special Effect - Create a special effect attached to the foot (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Undead\Unsummon\UnsummonTarget.mdl
Custom script: set eff4 = bj_lastCreatedEffect
Set Variable Set P = (Position of (Triggering unit))
For each (Integer A) from 1 to 10 , do (Actions)
Loop - Actions
Set Variable Set P2 = (P offset by (Random real number between 200.00 and 400.00) towards (36.00 x (Real((Integer A)))) degrees.)
Special Effect - Create a special effect at P2 using Abilities\Spells\Undead\Unsummon\UnsummonTarget.mdl
Special Effect - Destroy (Last created special effect)
Custom script: call RemoveLocation(udg_P2)
For each (Integer A) from 1 to 10 , do (Actions)
Loop - Actions
Set Variable Set P2 = (P offset by (Random real number between 100.00 and 250.00) towards (36.00 x (Real((Integer A)))) degrees.)
Special Effect - Create a special effect at P2 using Abilities\Spells\Undead\Unsummon\UnsummonTarget.mdl
Special Effect - Destroy (Last created special effect)
Custom script: call RemoveLocation(udg_P2)
Unit - Create 1 . Death Effect (Mind Flayer) for Neutral Passive at P facing Default building facing degrees
Unit - Kill (Last created unit)
Custom script: call RemoveLocation(udg_P)
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff3)
Custom script: call DestroyEffectBJ(eff4)
Wait 1.00 seconds
Custom script: call DestroyEffectBJ(eff)
Custom script: call DestroyEffectBJ(eff2)
Music Init
Events
Map initialization
Conditions
Actions
Sound - Stop music Immediately
-------- Random Sound List --------
Set Variable Set Music_RndSoundList_Count = "18"
Set Variable Set Music_RndSoundList[1] = spooky15 <gen>
Set Variable Set Music_RndSoundList[2] = spooky16 <gen>
Set Variable Set Music_RndSoundList[3] = spooky17 <gen>
Set Variable Set Music_RndSoundList[4] = spooky1 <gen>
Set Variable Set Music_RndSoundList[5] = spooky2 <gen>
Set Variable Set Music_RndSoundList[6] = spooky3 <gen>
Set Variable Set Music_RndSoundList[7] = spooky4 <gen>
Set Variable Set Music_RndSoundList[8] = spooky5 <gen>
Set Variable Set Music_RndSoundList[9] = spooky6 <gen>
Set Variable Set Music_RndSoundList[10] = spooky7 <gen>
Set Variable Set Music_RndSoundList[11] = spooky8 <gen>
Set Variable Set Music_RndSoundList[12] = spooky9 <gen>
Set Variable Set Music_RndSoundList[13] = spooky10 <gen>
Set Variable Set Music_RndSoundList[14] = spooky11 <gen>
Set Variable Set Music_RndSoundList[15] = spooky12 <gen>
Set Variable Set Music_RndSoundList[16] = spooky13 <gen>
Set Variable Set Music_RndSoundList[17] = spooky14 <gen>
Set Variable Set Music_RndSoundList[18] = spooky18 <gen>
-------- Music List --------
Set Variable Set Music_Soundlist_Count = "5"
For each (Integer A) from 1 to Music_Soundlist_Count , do (Actions)
Loop - Actions
Set Variable Set Music_Soundlist_Pitch[(Integer A)] = "0.20"
Set Variable Set Music_Soundlist[1] = Doom <gen>
Set Variable Set Music_Soundlist_Pitch[1] = "0.10"
Set Variable Set Music_Soundlist_Duration[1] = (66.00 / 0.10)
Set Variable Set Music_Soundlist[2] = Tension <gen>
Set Variable Set Music_Soundlist_Duration[2] = (19.50 / 0.20)
Set Variable Set Music_Soundlist[3] = TragicConfrontation <gen>
Set Variable Set Music_Soundlist_Duration[3] = (72.00 / 0.20)
Set Variable Set Music_Soundlist[4] = Undead1 <gen>
Set Variable Set Music_Soundlist_Duration[4] = (303.50 / 0.20)
Set Variable Set Music_Soundlist[5] = BloodElfTheme <gen>
Set Variable Set Music_Soundlist_Duration[5] = (144.50 / 0.20)
-------- Randomize --------
For each (Integer A) from 1 to 5 , do (Actions)
Loop - Actions
Set Variable Set x = (Random integer number between 1 and Music_Soundlist_Count)
Set Variable Set x2 = (Random integer number between 1 and Music_Soundlist_Count)
Set Variable Set Music_Soundlist_Duration[0] = Music_Soundlist_Duration[x]
Set Variable Set Music_Soundlist_Duration[x] = Music_Soundlist_Duration[x2]
Set Variable Set Music_Soundlist_Duration[x2] = Music_Soundlist_Duration[0]
Set Variable Set Music_Soundlist[0] = Music_Soundlist[x]
Set Variable Set Music_Soundlist[x] = Music_Soundlist[x2]
Set Variable Set Music_Soundlist[x2] = Music_Soundlist[0]
Wait 0.10 seconds
Sound - Clear the music list
Sound - Stop music Immediately
Sound - Play Music_Soundlist[1]
Set Variable Set Music_TimePassed = "0.00"
Set Variable Set Music_CurrentTrackIndex = "1"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
Set Variable Set Music_PlayerOn[(Integer A)] = "true"
Music Play
Events
Time - Every 5.00 seconds of game time
Conditions
Actions
Set Variable Set Music_TimePassed = (Music_TimePassed + 5.00)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Music_TimePassed Greater than or equal to Music_Soundlist_Duration[Music_CurrentTrackIndex]
Then - Actions
Sound - Stop Music_Soundlist[Music_CurrentTrackIndex] After fading
Set Variable Set Music_CurrentTrackIndex = (Music_CurrentTrackIndex + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Music_CurrentTrackIndex Greater than Music_Soundlist_Count
Then - Actions
Set Variable Set Music_CurrentTrackIndex = "1"
Else - Actions
Set Variable Set Music_TimePassed = "0.00"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Music_PlayerOn[(Integer A)] Equal to True
Then - Actions
Set Variable Set player = (Player((Integer A)))
Custom script: if GetLocalPlayer( ) == udg_player then
Sound - Play Music_Soundlist[Music_CurrentTrackIndex]
Custom script: endif
Else - Actions
Else - Actions
Wait 1.00 seconds
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 5) Equal to 1
Then - Actions
Sound - Play Music_RndSoundList[(Random integer number between 1 and Music_RndSoundList_Count)]
Else - Actions
Weather Main
Events
Time - Every 120.00 seconds of game time
Conditions
Actions
Environment - Turn (Last created weather effect) Off
Wait 5.00 seconds
Environment - Remove (Last created weather effect)
Wait 5.00 seconds
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 5) Equal to 1
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Environment - Create at EntireMap <gen> the weather effect Ashenvale Rain (Light)
Else - Actions
Environment - Create at EntireMap <gen> the weather effect Ashenvale Rain (Heavy)
Environment - Turn (Last created weather effect) On
Else - Actions
Command Init
Events
Map initialization
Conditions
Actions
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
Trigger - Add to Command_Input <gen> the event ((Player((Integer A))) types a chat message containing - (Unexpected type: 'stringnoformat') as A substring)
Command Input
Events
Conditions
(Substring((Entered chat string), 1, 1)) Equal to -
Actions
Set Variable Set x = (Player number of (Triggering player))
Set Variable Set player = (Triggering player)
Set Variable Set PG = (Player group((Triggering player)))
Set Variable Set x2 = "0"
For each (Integer A) from 1 to (Length of (Entered chat string)) , do (Actions)
Loop - Actions
Set Variable Set s = (Substring((Entered chat string), (Integer A), (Integer A)))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
s Equal to -
(Integer A) Equal to (Length of (Entered chat string))
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Greater than 0
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Integer A) Equal to (Length of (Entered chat string))
Then - Actions
Set Variable Set s = (Substring((Entered chat string), (x2 + 1), (Integer A)))
Else - Actions
Set Variable Set s = (Substring((Entered chat string), (x2 + 1), ((Integer A) - 1)))
-------- Music --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Substring(s, 1, 5)) Equal to music
(Substring(s, 1, 1)) Equal to m
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Music_PlayerOn[x] Equal to True
Then - Actions
Set Variable Set Music_PlayerOn[x] = "false"
Game - Display to PG for 1.00 seconds the text: Music turned off.
Custom script: if GetLocalPlayer( ) == udg_player then
Sound - Stop Music_Soundlist[Music_CurrentTrackIndex] After fading
Custom script: endif
Else - Actions
Set Variable Set Music_PlayerOn[x] = "true"
Game - Display to PG for 1.00 seconds the text: Music turned on.
Else - Actions
-------- Camera --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Substring(s, 1, 6)) Equal to camera
(Substring(s, 1, 3)) Equal to cam
And - All (Conditions) are true
Conditions
(Substring(s, 1, 1)) Equal to c
(Substring(s, 1, 5)) Not equal to class
Then - Actions
-------- extract cam command --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(s, 1, 6)) Equal to camera
Then - Actions
Set Variable Set s = (Substring(s, 7, (Length of s)))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(s, 1, 3)) Equal to cam
Then - Actions
Set Variable Set s = (Substring(s, 4, (Length of s)))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(s, 1, 1)) Equal to c
Then - Actions
Set Variable Set s = (Substring(s, 2, (Length of s)))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(s, 1, 1)) Equal to
Then - Actions
Set Variable Set s = (Substring(s, 2, (Length of s)))
Else - Actions
-------- camlock --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
s Equal to lock
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_CamLock[x] Equal to True
Then - Actions
Set Variable Set Player_CamLock[x] = "false"
Else - Actions
Set Variable Set Player_CamLock[x] = "true"
Else - Actions
-------- distance --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
s Equal to close
s Equal to near
s Equal to 1
Then - Actions
Set Variable Set Player_CamDistance[x] = "2500.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
s Equal to medium
s Equal to normal
s Equal to default
s Equal to standard
s Equal to 2
Then - Actions
Set Variable Set Player_CamDistance[x] = "2900.00"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
s Equal to far
s Equal to distant
s Equal to 3
Then - Actions
Set Variable Set Player_CamDistance[x] = "3300.00"
Else - Actions
Set Variable Set x3 = "0"
Set Variable Set x3 = (Integer(s))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Greater than or equal to 2000
x3 Less than or equal to 3300
Then - Actions
Set Variable Set Player_CamDistance[x] = (Real(x3))
Else - Actions
Set Variable Set Player_CamSet = (Triggering player)
Trigger - Run Camera_SetForPlayer_PlayerCamSet <gen> (checking conditions)
Else - Actions
-------- Difficulty --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of Set Difficulty for Player_Marine[x]) Equal to 1
(Substring(s, 1, 1)) Equal to d
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
s Equal to d1
Then - Actions
Set Variable Set Game_Difficulty = "1"
Game - Display to (All players) for 10.00 seconds the text: |cff949596Difficulty set to |cffFF0000hard|cff949596. You like it hard? Then hard you shall get it!
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
s Equal to d2
Then - Actions
Set Variable Set Game_Difficulty = "2"
Game - Display to (All players) for 10.00 seconds the text: |cff949596Difficulty set to |cffFF0000very hard|cff949596. Are you fcking crazy?
Sound - Play SargerasRoar <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
s Equal to d3
Then - Actions
Set Variable Set Game_Difficulty = "3"
Game - Display to (All players) for 10.00 seconds the text: |cff949596Difficulty set to |cffFF0000extremely hard|cff949596. Prepare to die!
Sound - Play SargerasLaugh <gen>
Else - Actions
Else - Actions
-------- Auto-Attack --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Substring(s, 1, 2)) Equal to aa
(Substring(s, 1, 7)) Equal to autoatt
(Substring(s, 1, 10)) Equal to autoattack
(Substring(s, 1, 11)) Equal to auto attack
Then - Actions
Unit - Remove Player_AutoAttackDummy[x] from the game
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_AutoAttackON[x] Equal to True
Then - Actions
Set Variable Set Player_AutoAttackON[x] = "false"
Game - Display to PG for 1.00 seconds the text: Automatic attacking turned off.
Else - Actions
Set Variable Set Player_AutoAttackON[x] = "true"
Game - Display to PG for 1.00 seconds the text: Automatic attacking turned on.
Set Variable Set P = (Position of Player_Marine[x])
Unit - Create 1 . Marine Auto-Attack (1400) for (Triggering player) at P facing (Facing of Player_Marine[x]) degrees
Custom script: call RemoveLocation(udg_P)
Unit - Turn collision for (Last created unit) Off .
Set Variable Set Player_AutoAttackDummy[x] = (Last created unit)
Trigger - Turn on AutoAttack_MoveDummy <gen>
Trigger - Turn on AutoAttack_DmgTake <gen>
Trigger - Turn on AutoAttack_AttackUnit <gen>
Else - Actions
-------- Choose new class --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(s, 1, 5)) Equal to class
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Game_Mod Equal to 1
Game_Mod Equal to 2
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_AllowSelectClass[x] Equal to True
Then - Actions
Set Variable Set Player_AllowSelectClass[x] = "false"
Set Variable Set unit = Player_Marine[x]
Set Variable Set UG = (Units owned by (Triggering player) of type Detonate remote-controlled mines)
Unit Group - Pick every unit in UG and do (Actions)
Loop - Actions
Unit - Remove (Picked unit) from the game
Custom script: call DestroyGroup(udg_UG)
Unit - Remove Airstrike from unit
Unit - Remove Airstrike Target from unit
Unit - Remove Ping Dropoff Point from unit
Unit - Remove Track Enemies from unit
Unit - Remove Motivation Aura from unit
Unit - Remove Construct Barricade from unit
Unit - Remove Setup Stationary MG from unit
Unit - Remove Pack Up Stationary MG from unit
Unit - Remove First Aid Treatment from unit
Unit - Remove Inject Combat Cocktail from unit
Unit - Remove Revive from unit
Unit - Remove Place Anti-Person Mine from unit
Unit - Remove Place Anti-Tank Mine from unit
Unit - Remove Place Remote-Controlled Mine from unit
Unit - Remove Leap from unit
Unit - Remove Concentrate from unit
Unit - Remove Scarify Bullets from unit
Unit - Remove Select Class from unit
Unit - Add Select Class to unit
Else - Actions
Game - Display to PG for 1.00 seconds the text: You can change your class only once after reviving.
Else - Actions
Game - Display to PG for 1.00 seconds the text: You can't choose a new class in this mod.
Else - Actions
-------- Game Mode: No jetpack --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(s, 1, 2)) Equal to nj
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Triggering player) Equal to Game_AdminPlayer
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Options_NoJetpack Equal to True
Then - Actions
Set Variable Set Game_Options_NoJetpack = "false"
Game - Display to (All players) for 1.00 seconds the text: >> Jetpacks enabled.
For each (Integer B) from 1 to Maxplayers , do (Actions)
Loop - Actions
Set Variable Set JetPackOff_unit = Player_Marine[(Integer B)]
Unit - Remove Toggle Jetpack from JetPackOff_unit
Unit - Add Toggle Jetpack to JetPackOff_unit
Else - Actions
Set Variable Set Game_Options_NoJetpack = "true"
Game - Display to (All players) for 1.00 seconds the text: >> Jetpacks disabled.
For each (Integer B) from 1 to Maxplayers , do (Actions)
Loop - Actions
Set Variable Set JetPackOff_unit = Player_Marine[(Integer B)]
Unit - Remove Toggle Jetpack from JetPackOff_unit
Trigger - Run Jet_Pack_TurnOff_JetPack_unit <gen> (checking conditions)
Else - Actions
Game - Display to PG for 1.00 seconds the text: (Only the admin ( + (Player_ColorCode[(Player number of Game_AdminPlayer)] + ((Name of Game_AdminPlayer) + |r) can change options.)))
Else - Actions
-------- Game Mode: Half Damage --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(s, 1, 2)) Equal to hd
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Triggering player) Equal to Game_AdminPlayer
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Options_MissleDmgFactor Equal to 1.00
Then - Actions
Set Variable Set Game_Options_MissleDmgFactor = "0.50"
Game - Display to (All players) for 1.00 seconds the text: >> Half damage taken from missles.
Else - Actions
Set Variable Set Game_Options_MissleDmgFactor = "1.00"
Game - Display to (All players) for 1.00 seconds the text: >> Full damage taken from missles.
Else - Actions
Game - Display to PG for 1.00 seconds the text: (Only the admin ( + (Player_ColorCode[(Player number of Game_AdminPlayer)] + ((Name of Game_AdminPlayer) + |r) can change options.)))
Else - Actions
Game - Display to PG for 1.00 seconds the text: Half missle damage is possible in Arena Mode only.
Else - Actions
-------- Game Mode: Credit limit --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(s, 1, 5)) Equal to limit
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Triggering player) Equal to Game_AdminPlayer
Then - Actions
Set Variable Set s = (Substring(s, 6, (Length of s)))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Substring(s, 1, 1)) Equal to
Then - Actions
Set Variable Set s = (Substring(s, 2, (Length of s)))
Else - Actions
Set Variable Set x3 = "0"
Set Variable Set x3 = (Integer(s))
-------- Set minimum --------
For each (Integer B) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x3 Less than (((Player((Integer B))) Current gold) + 1000)
Then - Actions
Set Variable Set x3 = (((Player((Integer B))) Current gold) + 1000)
Else - Actions
Set Variable Set AM_CreditLimitVictory = x3
Set Variable Set AM_CreditLimitVictory = ((x3 / 1000) x 1000)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
AM_CreditLimitVictory Less than x3
Then - Actions
Set Variable Set AM_CreditLimitVictory = (AM_CreditLimitVictory + 1000)
Else - Actions
Game - Display to (All players) for 5.00 seconds the text: (>> Credit limit for victory set to + ((String(AM_CreditLimitVictory)) + .))
Multiboard - Change the title of MB_Marines to (|cff949596Class/Name/Credits [max= + ((String((AM_CreditLimitVictory / 1000))) + k]|r))
Else - Actions
Game - Display to PG for 1.00 seconds the text: (Only the admin ( + (Player_ColorCode[(Player number of Game_AdminPlayer)] + ((Name of Game_AdminPlayer) + |r) can change options.)))
Else - Actions
Game - Display to PG for 1.00 seconds the text: The credit limit applies in Arena Mode only.
Else - Actions
Else - Actions
Set Variable Set x2 = (Integer A)
Else - Actions
Custom script: call DestroyForce(udg_PG)
Camera SetForPlayer PlayerCamSet
Events
Conditions
Game_Over Equal to False
Actions
Set Variable Set Player_CamSetx = (Player number of Player_CamSet)
Custom script: set udg_Player_CamSetx2 = GetHandleId(udg_Player_Marine[udg_Player_CamSetx])
-------- camlock --------
Camera - Reset camera for Player_CamSet to standard game-view over 0 seconds
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[Player_CamSetx] is alive) Equal to True
Or - Any (Conditions) are true
Conditions
Player_CamLock[Player_CamSetx] Equal to True
(Load 16 of Player_CamSetx2 from Marine_Hash.) Equal to True
Then - Actions
Camera - Lock camera target for Player_CamSet to Player_Marine[Player_CamSetx] , offset by ( 0 , 0 ) using Default rotation
Else - Actions
-------- distance --------
Camera - Set Player_CamSet 's camera Distance to target to Player_CamDistance[Player_CamSetx] over 0 seconds
Trigger - Turn on Camera_SetForPlayer_Nightvision <gen>
Camera SetForPlayer Nightvision
Events
Time - Every 0.01 seconds of game time
Conditions
Actions
Trigger - Turn off (This trigger)
Set Variable Set Player_CamSet_r = "100.00"
Player Group - Pick every player in (All players) and do (Actions)
Loop - Actions
Set Variable Set Player_CamSet = (Picked player)
Set Variable Set Player_CamSetx = (Player number of (Picked player))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[Player_CamSetx] has buff Immolation) Equal to True
Then - Actions
Custom script: if GetLocalPlayer( ) == udg_Player_CamSet then
Environment - Set fog to style Linear , z-start (-600.00 + Player_CamDistance[Player_CamSetx]) , z-end (3550.00 + (Player_CamDistance[Player_CamSetx] / 2.00)) , density 0.50 and color ( 8.00 %, 5.00 %, 10.00 %)
Set Variable Set Player_CamSet_r = "50.00"
Custom script: call SetDayNightModels("","Environment\\DNC\\DNCAshenvale\\DNCAshenvaleUnit\\DNCAshenvaleUnit.mdl")
Custom script: endif
Else - Actions
Custom script: if GetLocalPlayer( ) == udg_Player_CamSet then
Environment - Set fog to style Linear , z-start (-900.00 + Player_CamDistance[Player_CamSetx]) , z-end (1950.00 + (Player_CamDistance[Player_CamSetx] / 2.00)) , density 0.50 and color ( 8.00 %, 5.00 %, 10.00 %)
Custom script: call SetDayNightModels("","")
Custom script: endif
Cinematic - Apply a filter over 9999.00 seconds using Additive blending on texture White Mask , starting with color ( 0.00 %, 100 %, 0.00 %) and Player_CamSet_r % transparency and ending with color ( 0 %, 100.00 %, 0 %) and Player_CamSet_r % transparency
Cinematic - Show filter
Set Variable Set Player_CamSet_r = "100.00"
Difficulty Set Chooser
Events
Time - Every 5.00 seconds of game time
Conditions
Actions
Trigger - Turn off (This trigger)
Set Variable Set x = "0"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
x Equal to 0
Then - Actions
Set Variable Set x = "1"
Unit - Add Set Difficulty to Player_Marine[(Integer A)]
Set Variable Set PG = (Player group((Player((Integer A)))))
Game - Display to PG for 10.00 seconds the text: |cff949596You are in charge of choosing the difficulty.Look at your command card for more details.|r
Custom script: call DestroyForce(udg_PG)
Else - Actions
AutoAttack MoveDummy
Events
Time - Every 2 seconds of game time
Conditions
Actions
Set Variable Set x2 = "0"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Player_AutoAttackON[(Integer A)] Equal to True
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set x2 = "1"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Player_Marine[(Integer A)] is alive) Equal to True
Then - Actions
Unit - Unpause Player_AutoAttackDummy[(Integer A)]
Set Variable Set P = (Position of Player_Marine[(Integer A)])
Unit - Move Player_AutoAttackDummy[(Integer A)] instantly to P
Custom script: call RemoveLocation(udg_P)
Else - Actions
Unit - Pause Player_AutoAttackDummy[(Integer A)]
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Trigger - Run AutoAttack_DmgTake <gen> (checking conditions)
Trigger - Run AutoAttack_AttackUnit <gen> (checking conditions)
Else - Actions
Hash_Main:
29: SentryBotAI missle has hit unit (bool)
-> wenn false neues target suchen
AutoAttack AttackUnit
Events
Unit - A unit Is attacked
Conditions
(Substring((Name of (Attacking unit)), 1, (Length of Marine Auto-Attack))) Equal to Marine Auto-Attack
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetAttacker()
Set Variable Set AutoAttack_Unit = Player_Marine[(Player number of (Owner of (Attacking 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 Player_SelectedUnit[(Player number of (Owner of (Triggering unit)))]) Equal to Stationary MG
(Unit-type of Player_SelectedUnit[(Player number of (Owner of (Triggering unit)))]) Equal to Tank
(AutoAttack_Unit is alive) Equal to False
Then - Actions
Skip remaining actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Current order of AutoAttack_Unit) Not equal to (Order(stop))
(Current order of AutoAttack_Unit) Not equal to (Order(holdposition))
(Current order of AutoAttack_Unit) Not equal to (Order())
Then - Actions
Skip remaining actions
Else - Actions
Custom script: set udg_AutoAttack_key = GetHandleId(udg_AutoAttack_Unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Load 2 of AutoAttack_key from Marine_Hash.) Equal to True
(Load 16 of AutoAttack_key from Marine_Hash.) Equal to True
Then - Actions
Skip remaining actions
Else - Actions
Set Variable Set NPCSmartOrder_key = (Key (Attacking unit).)
-------- Prüfen ob unit getroffen werden kann --------
Set Variable Set NPCSmartOrder_AllowFire = "false"
Set Variable Set NPCSmartOrder_P = (Position of AutoAttack_Unit)
Set Variable Set NPCSmartOrder_Target = (Position of (Attacked unit))
Custom script: set udg_NPCSmartOrder_r = GetLocationZ(udg_NPCSmartOrder_P)
Custom script: set udg_NPCSmartOrder_r2 = GetLocationZ(udg_NPCSmartOrder_Target)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Abs((NPCSmartOrder_r - NPCSmartOrder_r2))) Less than 100.00
(Load 29 of NPCSmartOrder_key from Hash_Main.) Equal to True
Or - Any (Conditions) are true
Conditions
(Unit-type of (Attacked unit)) Not equal to Souldrainer
(Distance between NPCSmartOrder_P and NPCSmartOrder_Target) Less than 500.00
Then - Actions
Set Variable Set NPCSmartOrder_AllowFire = "true"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
NPCSmartOrder_AllowFire Equal to True
Then - Actions
Hashtable - Save False as 29 of NPCSmartOrder_key in Hash_Main .
Hashtable - Save True as 41 of AutoAttack_key in Marine_Hash .
Hashtable - Save Handle Of (Attacked unit) as 42 of AutoAttack_key in Marine_Hash .
Set Variable Set NPCSmartOrder_r = (Angle from NPCSmartOrder_P to NPCSmartOrder_Target)
Unit - Make AutoAttack_Unit face NPCSmartOrder_r over 0.00 seconds
Hashtable - Save NPCSmartOrder_r as 37 of AutoAttack_key in Marine_Hash .
Set Variable Set NPCSmartOrder_r = (Distance between NPCSmartOrder_P and NPCSmartOrder_Target)
Hashtable - Save NPCSmartOrder_r as 38 of AutoAttack_key in Marine_Hash .
Unit Group - Add AutoAttack_Unit to UG_FireWhenAngleOk
Trigger - Turn on Marine_FireWhenAngleOk <gen>
Custom script: call RemoveLocation(udg_NPCSmartOrder_P)
Custom script: call RemoveLocation(udg_NPCSmartOrder_Target)
Else - Actions
Custom script: call RemoveLocation(udg_NPCSmartOrder_P)
Custom script: call RemoveLocation(udg_NPCSmartOrder_Target)
Wait 0.50 seconds
Custom script: set udg_unit = tempunit
Custom script: set udg_NPCSmartOrder_key = GetHandleId(udg_unit)
Unit - Order unit to Stop .
Hashtable - Save True as 29 of NPCSmartOrder_key in Hash_Main .
AutoAttack DmgTake
Events
Conditions
(Substring((Name of (Damage source)), 1, (Length of Marine Auto-Attack))) Equal to Marine Auto-Attack
Actions
Unit - Set life of (Triggering unit) to ((Life of (Triggering unit)) + (Damage taken))
MB Create
Events
Conditions
Actions
Wait 0.10 seconds
Multiboard - Destroy MB_Marines
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Game_Mod Equal to 0
Game_Mod Equal to 2
Then - Actions
Multiboard - Create a multiboard with 2 columns and Game_ActivePlayerCount rows, titled |cff949596Class/Name/Kills|r .
Else - Actions
Multiboard - Create a multiboard with 2 columns and Game_ActivePlayerCount rows, titled (|cff949596Class/Name/Credits [max= + ((String((AM_CreditLimitVictory / 1000))) + k]|r)) .
Set Variable Set MB_Marines = (Last created multiboard)
Multiboard - Set the display style for (Last created multiboard) item in column 2 , row 0 to Show text and Hide icons
Multiboard - Set the display style for (Last created multiboard) item in column 1 , row 0 to Show text and Show icons
Multiboard - Set the width for (Last created multiboard) item in column 1 , row 0 to 10.00 % of the total screen width
Multiboard - Set the width for (Last created multiboard) item in column 2 , row 0 to 5.00 % of the total screen width
Set Variable Set x = "0"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set x = (x + 1)
Multiboard - Set the text for (Last created multiboard) item in column 1 , row x to (Player_ColorCode[(Integer A)] + ((Name of (Player((Integer A)))) + |r))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Game_Mod Equal to 0
Game_Mod Equal to 2
Then - Actions
Multiboard - Set the text for (Last created multiboard) item in column 2 , row x to (Player_ColorCode[(Integer A)] + (( + (String(Player_Kills[(Integer A)]))) + |r))
Else - Actions
Set Variable Set x2 = ((Player((Integer A))) Current gold)
Set Variable Set x2 = (x2 / 100)
Set Variable Set s = (String(x2))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Less than 10
Then - Actions
Set Variable Set s = (0 + s)
Else - Actions
Set Variable Set s = ((Substring(s, 1, ((Length of s) - 1))) + (. + ((Substring(s, (Length of s), (Length of s))) + k)))
Multiboard - Set the text for (Last created multiboard) item in column 2 , row x to (Player_ColorCode[(Integer A)] + (( + s) + |r))
Set Variable Set unit = Player_Marine[(Integer A)]
Custom script: set udg_x2 = GetHandleId(udg_unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 0
Then - Actions
Multiboard - Set the icon for (Last created multiboard) item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNmarine.tga
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 1
Then - Actions
Multiboard - Set the icon for (Last created multiboard) item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNhealth.tga
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 2
Then - Actions
Multiboard - Set the icon for (Last created multiboard) item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNBox.blp
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 3
Then - Actions
Multiboard - Set the icon for (Last created multiboard) item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNGoblinLandMine.blp
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 4
Then - Actions
Multiboard - Set the icon for (Last created multiboard) item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNdropoff_point.tga
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 5
Then - Actions
Multiboard - Set the icon for (Last created multiboard) item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNShoot.tga
Else - Actions
Else - Actions
Trigger - Turn on MB_Refresh <gen>
MB Create Zombie
Events
Conditions
Actions
Wait 0.10 seconds
Multiboard - Destroy MB_Zombies
Multiboard - Create a multiboard with 11 columns and (Game_ActivePlayerCount + 1) rows, titled |cff949596Purchased Zombie Spawns|r .
Set Variable Set MB_Zombies = (Last created multiboard)
Multiboard - Set the width for MB_Zombies item in column 0 , row 0 to 1.25 % of the total screen width
Multiboard - Set the display style for MB_Zombies item in column 0 , row 0 to Show text and Hide icons
Multiboard - Set the display style for MB_Zombies item in column 0 , row 1 to Hide text and Show icons
For each (Integer A) from 1 to 11 , do (Actions)
Loop - Actions
Multiboard - Set the icon for MB_Zombies item in column (Integer A) , row 1 to AM_MonsterSpawn_IconPath[(Integer A)]
Set Variable Set x = "1"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set x = (x + 1)
For each (Integer B) from 1 to 11 , do (Actions)
Loop - Actions
Set Variable Set x2 = (Load (Integer B) of (Integer A) from AM_MonsterSpawnTable.)
Multiboard - Set the text for (Last created multiboard) item in column (Integer B) , row x to (Player_ColorCode[(Integer A)] + ((String(x2)) + |r))
Else - Actions
MB Refresh
Events
Time - Every 2.00 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
Set Variable Set MB_ToggleState = (MB_ToggleState + 1)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MB_ToggleState Less than 4
Then - Actions
Multiboard - Hide MB_Zombies
-------- Marines --------
Set Variable Set x = "0"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set x = (x + 1)
Set Variable Set unit = Player_Marine[(Integer A)]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(unit is alive) Equal to True
Then - Actions
Multiboard - Set the text for MB_Marines item in column 1 , row x to (Player_ColorCode[(Integer A)] + ((Name of (Player((Integer A)))) + |r))
Else - Actions
Multiboard - Set the text for MB_Marines item in column 1 , row x to (Player_ColorCode[(Integer A)] + ((† + (Name of (Player((Integer A))))) + |r))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
Game_Mod Equal to 0
Game_Mod Equal to 2
Then - Actions
Multiboard - Set the text for MB_Marines item in column 2 , row x to (Player_ColorCode[(Integer A)] + (( + (String(Player_Kills[(Integer A)]))) + |r))
Else - Actions
Set Variable Set x2 = ((Player((Integer A))) Current gold)
Set Variable Set x2 = (x2 / 100)
Set Variable Set s = (String(x2))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
x2 Less than 10
Then - Actions
Set Variable Set s = (0 + s)
Else - Actions
Set Variable Set s = ((Substring(s, 1, ((Length of s) - 1))) + (. + ((Substring(s, (Length of s), (Length of s))) + k)))
Multiboard - Set the text for MB_Marines item in column 2 , row x to (Player_ColorCode[(Integer A)] + (( + s) + |r))
Custom script: set udg_x2 = GetHandleId(udg_unit)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 0
Then - Actions
Multiboard - Set the icon for MB_Marines item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNmarine.tga
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 1
Then - Actions
Multiboard - Set the icon for MB_Marines item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNhealth.tga
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 2
Then - Actions
Multiboard - Set the icon for MB_Marines item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNBox.blp
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 3
Then - Actions
Multiboard - Set the icon for MB_Marines item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNGoblinLandMine.blp
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 4
Then - Actions
Multiboard - Set the icon for MB_Marines item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNdropoff_point.tga
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 26 of x2 from Marine_Hash.) Equal to 5
Then - Actions
Multiboard - Set the icon for MB_Marines item in column 1 , row x to ReplaceableTextures\CommandButtons\BTNShoot.tga
Else - Actions
Else - Actions
Multiboard - Show MB_Marines
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MB_ToggleState Greater than or equal to 6
Then - Actions
Set Variable Set MB_ToggleState = "0"
Else - Actions
Multiboard - Hide MB_Marines
-------- Zombies --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Game_Mod Equal to 1
Then - Actions
Set Variable Set x = "1"
For each (Integer A) from 1 to Maxplayers , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set x = (x + 1)
For each (Integer B) from 1 to 11 , do (Actions)
Loop - Actions
Set Variable Set x2 = (Load (Integer B) of (Integer A) from AM_MonsterSpawnTable.)
Multiboard - Set the text for (Last created multiboard) item in column (Integer B) , row x to (Player_ColorCode[(Integer A)] + ((String(x2)) + |r))
Else - Actions
Else - Actions
Multiboard - Show MB_Zombies
HealthHash:
0: HealthBar
1: ManaBar
HealthBar Init
Events
Map initialization
Conditions
Actions
Hashtable - Create a hashtable
Set Variable Set HealthHash = (Last created hashtable)
HealthBar AddUnit
Events
Unit - A unit enters (Playable map area)
Unit - A unit Finishes reviving
Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Triggering unit)) Equal to Barricade
(Unit-type of (Triggering unit)) Equal to Remote-Controlled Mine
(Unit-type of (Triggering unit)) Equal to Marine
(Unit-type of (Triggering unit)) Equal to Heretic
(Unit-type of (Triggering unit)) Equal to Sentry Bot
(Unit-type of (Triggering unit)) Equal to Armed Citizen
And - All (Conditions) are true
Conditions
(Race of (Triggering unit)) Not equal to Orc
(Max life of (Triggering unit)) Greater than or equal to 2000.00
Actions
Custom script: local unit tempunit
Custom script: set tempunit = GetTriggerUnit()
Wait 0.10 seconds
Custom script: set udg_unit = tempunit
Custom script: set udg_x = GetHandleId(udg_unit)
Unit Group - Add unit to HealthBar_UG
Trigger - Add to HealthBar_RemoveUnit <gen> the event (unit Dies)
Set Variable Set P = (Position of unit)
Floating Text - Create floating text that reads at P with Z offset 90.00 , using font size 6.00 , color ( 100.00 %, 100.00 %, 100.00 %), and 0 % transparency
Hashtable - Save Handle Of (Last created floating text) as 0 of x in HealthHash .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Max mana of unit) Greater than 0.00
Then - Actions
Floating Text - Create floating text that reads at P with Z offset 90.00 , using font size 6.00 , color ( 100.00 %, 100.00 %, 100.00 %), and 0 % transparency
Hashtable - Save Handle Of (Last created floating text) as 1 of x in HealthHash .
Else - Actions
Custom script: call RemoveLocation(udg_P)
Trigger - Turn on HealthBar_Loop <gen>
HealthBar RemoveUnit
Events
Conditions
((Triggering unit) is in HealthBar_UG.) Equal to True
Actions
Unit Group - Remove (Triggering unit) from HealthBar_UG .
Set Variable Set HealthBar = (Load 0 of (Key (Triggering unit).) in HealthHash)
Floating Text - Destroy HealthBar
Set Variable Set HealthBar = (Load 1 of (Key (Triggering unit).) in HealthHash)
Floating Text - Destroy HealthBar
Hashtable - Clear all child hashtables of child (Key (Triggering unit).) in HealthHash .
HealthBar Loop
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(HealthBar_UG is empty) Equal to True
Then - Actions
Trigger - Turn off (This trigger)
Skip remaining actions
Else - Actions
Unit Group - Pick every unit in HealthBar_UG and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Picked unit)) Equal to Undead
Then - Actions
Set Variable Set StateString = "oooooooooooooooooooooooooo"
Set Variable Set r_x = "-100.00"
Else - Actions
Set Variable Set StateString = "ooooooooooooo"
Set Variable Set r_x = "-50.00"
Set Variable Set HealthBar = (Load 0 of (Key (Picked unit).) in HealthHash)
Set Variable Set HealthStatus = (((Life of (Picked unit)) / (Max life of (Picked unit))) x (Real((Length of StateString))))
Floating Text - Change text of HealthBar to (((|cffff0000 + (Substring(StateString, 1, (Integer(HealthStatus))))) + |r) + ((|c00444444 + (Substring(StateString, (Integer((HealthStatus + 1))), (Length of StateString)))) + |r)) using font size 2.00
Set Variable Set P = (Position of (Picked unit))
Set Variable Set P2 = (P offset by (r_x, 50.00))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Or - Any (Conditions) are true
Conditions
(Unit-type of (Picked unit)) Equal to The Rejected
(Unit-type of (Picked unit)) Equal to The Crusher
Then - Actions
Floating Text - Change the position of HealthBar to P2 with Z offset ((100.00 + (Real((Point-value of (Picked unit))))) + (Current flying height of (Picked unit)))
Else - Actions
Floating Text - Change the position of HealthBar to P2 with Z offset ((50.00 + (Real((Point-value of (Picked unit))))) + (Current flying height of (Picked unit)))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Max mana of (Picked unit)) Greater than 0.00
Then - Actions
Set Variable Set HealthBar = (Load 1 of (Key (Picked unit).) in HealthHash)
Set Variable Set HealthStatus = (((Mana of (Picked unit)) / (Max mana of (Picked unit))) x (Real((Length of StateString))))
Floating Text - Change text of HealthBar to (((|cff0041FF + (Substring(StateString, 1, (Integer(HealthStatus))))) + |r) + ((|c00444444 + (Substring(StateString, (Integer((HealthStatus + 1))), (Length of StateString)))) + |r)) using font size 2.00
Floating Text - Change the position of HealthBar to P2 with Z offset ((45.00 + (Real((Point-value of (Picked unit))))) + (Current flying height of (Picked unit)))
Else - Actions
Custom script: call RemoveLocation(udg_P2)
Custom script: call RemoveLocation(udg_P)
HeatlhBar LoopVisibility
Events
Time - Every 0.50 seconds of game time
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(HealthBar_UG is empty) Equal to True
Then - Actions
Skip remaining actions
Else - Actions
Unit Group - Pick every unit in HealthBar_UG and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Race of (Picked unit)) Not equal to Undead
Then - Actions
Set Variable Set unit = (Picked unit)
Set Variable Set PG = (All enemies of (Owner of unit).)
Set Variable Set P = (Position of unit)
Player Group - Remove all players from HealthPGThatCanSee .
Player Group - Pick every player in PG and do (Actions)
Loop - Actions
Set Variable Set player = (Picked player)
Custom script: if IsUnitVisible(udg_unit, udg_player) then
Player Group - Add player to HealthPGThatCanSee
Custom script: endif
Custom script: call RemoveLocation(udg_P)
Set Variable Set HealthBar = (Load 0 of (Key (Picked unit).) in HealthHash)
Set Variable Set HealthBar2 = (Load 1 of (Key (Picked unit).) in HealthHash)
Floating Text - Hide HealthBar for PG
Floating Text - Hide HealthBar2 for PG
Player Group - Pick every player in HealthPGThatCanSee and do (Actions)
Loop - Actions
Floating Text - Show HealthBar for HealthPGThatCanSee
Floating Text - Show HealthBar2 for HealthPGThatCanSee
Custom script: call DestroyForce(udg_PG)
Else - Actions
Top