Community
Maps
Tutorials
Gallery
Support Us
Install the app
-
Listen to a special audio message from Bill Roper to the Hive Workshop community (Bill is a former Vice President of Blizzard Entertainment, Producer, Designer, Musician, Voice Actor) 🔗Click here to hear his message!
-
Read Evilhog's interview with Gregory Alper, the original composer of the music for WarCraft: Orcs & Humans 🔗Click here to read the full interview.
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an alternative browser.
You should upgrade or use an alternative browser.
Triggers
Random World Rpg 1.08a.w3x
Variables
Generate
Generate 1
Generate 2
Generate 3
Generate 4
Generate 5
Generate 6
Generate 7
Items Generate
Heroes
Heroes Items 1
Heroes Items 2
Items Generate 1
Items Generate 2
Items Generate 3
Items Generate 4
Items Generate 5
Items Generate 6
Damage Engine
Unit Indexer
---------------------------
Damage Engine
Damage Engine Config
Damage Tag
Set Damage
Is Unit Moving
Ability Text
Items Remove
Item Remove 1
Item Remove 2
Item Remove 3
---------------------------
Random Quest
Quest Check
Random Quest 1
Random Quest 2
Random Quest Kill 1
Kill Check
Units Ping
Commands
MS
HP
MP
XP
Roll
Info
Info
Xp rate
Xp rate 1 A
Difficulity
Dif 1
Dif 2
Dif 3
Dif 4
Dif 5
Dif 6
Dif 7
Load Game
Load Game
Enter map-specific custom script code below. This text will be included in the map script after variables are declared and before any trigger code.
| Name | Type | is_array | initial_value |
| AffectedRegion | rect | No | |
| AfterDamageEvent | real | No | |
| AMSAmount | real | Yes | |
| AMSReal | real | No | |
| ClearDamageEvent | trigger | No | |
| DAMAGE_FACTOR_BRACERS | real | No | |
| DAMAGE_FACTOR_ELUNES | real | No | |
| DAMAGE_FACTOR_ETHEREAL | real | No | |
| DamageBlockingAbility | abilcode | No | |
| DamageEvent | real | No | |
| DamageEventAmount | real | No | |
| DamageEventOverride | boolean | No | |
| DamageEventPrevAmt | real | No | |
| DamageEventSource | unit | No | |
| DamageEventsWasted | integer | No | |
| DamageEventTarget | unit | No | |
| DamageEventTrigger | trigger | No | |
| DamageEventType | integer | No | |
| DamageModifierEvent | real | No | |
| DamageTypeBlocked | integer | No | |
| DamageTypeCriticalStrike | integer | No | |
| DamageTypeExplosive | integer | No | |
| DamageTypeHeal | integer | No | |
| DamageTypeReduced | integer | No | |
| Destructables | destructablecode | Yes | |
| Dif_Dialog | dialog | No | |
| Dif_Dialog_B_1 | button | No | |
| Dif_Dialog_B_2 | button | No | |
| Dif_Dialog_B_3 | button | No | |
| Dif_Dialog_B_4 | button | No | |
| Dif_Real_1 | real | No | |
| Dif_Real_2 | real | No | |
| Dif_Real_3 | real | No | |
| DmgEvBracers | itemcode | No | |
| DmgEvMana | real | No | |
| DmgEvManaMult | real | No | |
| DmgEvMSlvl | integer | No | |
| DmgEvRecursionN | integer | No | |
| DmgEvRunning | boolean | No | |
| DmgEvStarted | boolean | No | |
| DmgEvTimer | timer | No | |
| DmgEvTrig | trigger | No | |
| GeneratorSeed | integer | No | |
| Gold | integer | No | |
| HideDamageFrom | boolean | Yes | |
| IsDamageSpell | boolean | No | |
| Item_For_Heroes | integer | No | 1 |
| Item_Remove | timer | No | |
| Kills | integer | No | |
| Kills_Leaderboard | leaderboard | No | |
| LastDamageHP | real | No | |
| LastDmgPrevAmount | real | Yes | |
| LastDmgPrevType | integer | Yes | |
| LastDmgSource | unit | Yes | |
| LastDmgTarget | unit | Yes | |
| LastDmgValue | real | Yes | |
| LastDmgWasSpell | boolean | Yes | |
| Leaderboard_Quest_1 | leaderboard | No | |
| Loop | integervar | No | |
| NextDamageOverride | boolean | No | |
| NextDamageType | integer | No | |
| Quest_Kill_Count | integer | No | |
| Quest_Kill_Count_Ok | real | No | |
| Quest_Killing_Point | location | No | |
| Quest_Killing_Reward_1 | integer | No | |
| Quest_Killing_Reward_2 | integer | No | |
| Quest_Unit | unitcode | No | |
| Quest_Unit_Integer | integer | No | |
| Quest_Unit_Name | string | No | |
| Quest_Unit_Ok | unit | No | |
| SpellDamageAbility | abilcode | No | |
| TempGroup | group | No | |
| TempPoint | location | No | |
| TempX | real | No | |
| TempY | real | No | |
| TerrainTypes | terraintype | Yes | |
| Time_1 | integer | No | 1200 |
| UDex | integer | No | |
| UDexGen | integer | No | |
| UDexNext | integer | Yes | |
| UDexPrev | integer | Yes | |
| UDexRecycle | integer | No | |
| UDexUnits | unit | Yes | |
| UDexWasted | integer | No | |
| UMovNext | integer | Yes | |
| UMovPrev | integer | Yes | |
| Unit_Group_All | group | No | |
| UnitDamageRegistered | boolean | Yes | |
| UnitIndexerEnabled | boolean | No | |
| UnitIndexEvent | real | No | |
| UnitIndexLock | integer | Yes | |
| UnitMoving | boolean | Yes | |
| UnitMovingEvent | real | No | |
| UnitMovingX | real | Yes | |
| UnitMovingY | real | Yes | |
| Version | string | No | 1.08a |
| Xp | real | No | |
| Xp_Rate_1 | integer | No | |
| Xp_Rate_Ok_1 | integer | No |
Created by Lord Mahdi.
function Trig_ooooooooo_Actions takes nothing returns nothing
set udg_Xp_Rate_Ok_1 = R2I(GetPlayerHandicapXPBJ(Player(0)))
call PauseAllUnitsBJ( true )
call CinematicModeBJ( true, GetPlayersAll() )
call CinematicFilterGenericBJ( 0.00, BLEND_MODE_MODULATE, "ReplaceableTextures\\CameraMasks\\Black_mask.blp", 100, 100, 100, 100, 0, 0, 0, 0 )
set udg_Xp = 135.00
set udg_Xp_Rate_1 = R2I(GetPlayerHandicapXPBJ(Player(0)))
call SetPlayerHandicapXPBJ( Player(0), udg_Xp )
call SetPlayerFlagBJ( PLAYER_STATE_GIVES_BOUNTY, true, Player(PLAYER_NEUTRAL_AGGRESSIVE) )
call SetPlayerFlagBJ( PLAYER_STATE_GIVES_BOUNTY, true, Player(0) )
call DisplayTimedTextToForce( GetPlayersAll(), 120.00, "TRIGSTR_666" )
call DisplayTimedTextToForce( GetPlayersAll(), 11.00, ( "|c0018EBF5" + (udg_Version) ) )
call CreateFogModifierRectBJ( true, Player(0), FOG_OF_WAR_VISIBLE, gg_rct_Region_001 )
call FogModifierStart( GetLastCreatedFogModifier() )
call CameraSetSmoothingFactorBJ( 1.20 )
set udg_Destructables[1] = 'LTlt'
set udg_Destructables[2] = 'FTtw'
set udg_Destructables[3] = 'WTtw'
set udg_Destructables[4] = 'ATtr'
set udg_Destructables[5] = 'ATtc'
set udg_TerrainTypes[1] = 'Lgrd'
set udg_TerrainTypes[2] = 'Lgrs'
set udg_TerrainTypes[3] = 'Lrok'
set udg_TerrainTypes[4] = 'Ldrg'
set udg_TerrainTypes[5] = 'Ldro'
set udg_GeneratorSeed = 160
set udg_AffectedRegion = GetPlayableMapRect()
call TriggerSleepAction( 0.50 )
call DisplayTimedTextToForce( GetPlayersAll(), 3600.00, "TRIGSTR_652" )
endfunction
//===========================================================================
function InitTrig_Generate_1 takes nothing returns nothing
set gg_trg_Generate_1 = CreateTrigger( )
call TriggerAddAction( gg_trg_Generate_1, function Trig_ooooooooo_Actions )
endfunction
function Trig_ooooooooooooooo_Func002Func001C takes nothing returns boolean
if ( not ( GetOwningPlayer(GetEnumUnit()) == Player(1) ) ) then
return false
endif
return true
endfunction
function Trig_ooooooooooooooo_Func002A takes nothing returns nothing
if ( Trig_ooooooooooooooo_Func002Func001C() ) then
call UnitAddItemByIdSwapped( 'I000', GetEnumUnit() )
else
endif
endfunction
function Trig_ooooooooooooooo_Actions takes nothing returns nothing
call SetPlayerHandicapBJ( Player(1), ( GetPlayerHandicapBJ(Player(1)) + 7.50 ) )
call ForGroupBJ( GetUnitsInRectAll(GetPlayableMapRect()), function Trig_ooooooooooooooo_Func002A )
set udg_Xp = ( udg_Xp + 7.50 )
set udg_Gold = ( udg_Gold + 1 )
endfunction
//===========================================================================
function InitTrig_Generate_2 takes nothing returns nothing
set gg_trg_Generate_2 = CreateTrigger( )
call TriggerRegisterTimerEventPeriodic( gg_trg_Generate_2, 500.00 )
call TriggerAddAction( gg_trg_Generate_2, function Trig_ooooooooooooooo_Actions )
endfunction
function Trig_oo_Func003Func001Func002C takes nothing returns boolean
if ( not ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrt' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oo_Func003Func001Func005C takes nothing returns boolean
if ( not ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrt' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oo_Func003Func001Func008C takes nothing returns boolean
if ( not ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrt' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oo_Func003Func001Func011C takes nothing returns boolean
if ( not ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrt' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oo_Actions takes nothing returns nothing
set udg_Loop = 1
loop
exitwhen udg_Loop > R2I(( GetRectWidthBJ(GetPlayableMapRect()) / I2R(udg_GeneratorSeed) ))
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = R2I(( GetRectHeightBJ(GetPlayableMapRect()) / I2R(udg_GeneratorSeed) ))
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
set udg_TempPoint = Location(( I2R(udg_Loop) * I2R(udg_GeneratorSeed) ), ( I2R(GetForLoopIndexA()) * I2R(udg_GeneratorSeed) ))
if ( Trig_oo_Func003Func001Func002C() ) then
call SetTerrainTypeBJ( udg_TempPoint, udg_TerrainTypes[GetRandomInt(1, 5)], -1, GetRandomInt(1, 5), 0 )
else
endif
call RemoveLocation(udg_TempPoint)
set udg_TempPoint = Location(( I2R(udg_Loop) * ( -1.00 * I2R(udg_GeneratorSeed) ) ), ( I2R(GetForLoopIndexA()) * I2R(udg_GeneratorSeed) ))
if ( Trig_oo_Func003Func001Func005C() ) then
call SetTerrainTypeBJ( udg_TempPoint, udg_TerrainTypes[GetRandomInt(1, 5)], -1, GetRandomInt(1, 5), 0 )
else
endif
call RemoveLocation(udg_TempPoint)
set udg_TempPoint = Location(( I2R(udg_Loop) * I2R(udg_GeneratorSeed) ), ( I2R(GetForLoopIndexA()) * ( -1.00 * I2R(udg_GeneratorSeed) ) ))
if ( Trig_oo_Func003Func001Func008C() ) then
call SetTerrainTypeBJ( udg_TempPoint, udg_TerrainTypes[GetRandomInt(1, 5)], -1, GetRandomInt(1, 5), 0 )
else
endif
call RemoveLocation(udg_TempPoint)
set udg_TempPoint = Location(( I2R(udg_Loop) * ( -1.00 * I2R(udg_GeneratorSeed) ) ), ( I2R(GetForLoopIndexA()) * ( -1.00 * I2R(udg_GeneratorSeed) ) ))
if ( Trig_oo_Func003Func001Func011C() ) then
call SetTerrainTypeBJ( udg_TempPoint, udg_TerrainTypes[GetRandomInt(1, 5)], -1, GetRandomInt(1, 5), 0 )
else
endif
call RemoveLocation(udg_TempPoint)
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call PolledWait( 0.01 )
set udg_Loop = udg_Loop + 1
endloop
call ConditionalTriggerExecute( gg_trg_Generate_5 )
endfunction
//===========================================================================
function InitTrig_Generate_3 takes nothing returns nothing
set gg_trg_Generate_3 = CreateTrigger( )
call TriggerRegisterTimerEventSingle( gg_trg_Generate_3, 1.00 )
call TriggerRegisterGameLoadedEventBJ( gg_trg_Generate_3 )
call TriggerAddAction( gg_trg_Generate_3, function Trig_oo_Actions )
endfunction
function Trig_oooooooooooooo_Func001Func001Func002Func001C takes nothing returns boolean
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrt' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldro' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrg' ) ) then
return true
endif
return false
endfunction
function Trig_oooooooooooooo_Func001Func001Func002Func002Func002Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 265) < 5 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func002Func002Func002Func003C takes nothing returns boolean
if ( not ( GetRandomInt(1, 75) < 8 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func002Func002Func002C takes nothing returns boolean
if ( not ( CountUnitsInGroup(udg_TempGroup) == 0 ) ) then
return false
endif
if ( not ( GetTerrainTypeBJ(udg_TempPoint) != 'Lrok' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func002Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) <= 15 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func002C takes nothing returns boolean
if ( not Trig_oooooooooooooo_Func001Func001Func002Func001C() ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func003Func001C takes nothing returns boolean
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Lgrs' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Lgrd' ) ) then
return true
endif
return false
endfunction
function Trig_oooooooooooooo_Func001Func001Func003Func002Func002Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 275) < 5 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func003Func002Func002Func003C takes nothing returns boolean
if ( not ( GetRandomInt(1, 80) < 8 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func003Func002Func002C takes nothing returns boolean
if ( not ( CountUnitsInGroup(udg_TempGroup) == 0 ) ) then
return false
endif
if ( not ( GetTerrainTypeBJ(udg_TempPoint) != 'Lrok' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func003Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) <= 25 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func003C takes nothing returns boolean
if ( not Trig_oooooooooooooo_Func001Func001Func003Func001C() ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func006Func001C takes nothing returns boolean
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrt' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldro' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrg' ) ) then
return true
endif
return false
endfunction
function Trig_oooooooooooooo_Func001Func001Func006Func002Func002Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 275) < 5 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func006Func002Func002Func003C takes nothing returns boolean
if ( not ( GetRandomInt(1, 80) < 8 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func006Func002Func002C takes nothing returns boolean
if ( not ( CountUnitsInGroup(udg_TempGroup) == 0 ) ) then
return false
endif
if ( not ( GetTerrainTypeBJ(udg_TempPoint) != 'Lrok' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func006Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) <= 15 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func006C takes nothing returns boolean
if ( not Trig_oooooooooooooo_Func001Func001Func006Func001C() ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func007Func001C takes nothing returns boolean
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Lgrs' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Lgrd' ) ) then
return true
endif
return false
endfunction
function Trig_oooooooooooooo_Func001Func001Func007Func002Func002Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 275) < 5 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func007Func002Func002Func003C takes nothing returns boolean
if ( not ( GetRandomInt(1, 78) < 8 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func007Func002Func002C takes nothing returns boolean
if ( not ( CountUnitsInGroup(udg_TempGroup) == 0 ) ) then
return false
endif
if ( not ( GetTerrainTypeBJ(udg_TempPoint) != 'Lrok' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func007Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) <= 25 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func007C takes nothing returns boolean
if ( not Trig_oooooooooooooo_Func001Func001Func007Func001C() ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func010Func001C takes nothing returns boolean
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrt' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldro' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrg' ) ) then
return true
endif
return false
endfunction
function Trig_oooooooooooooo_Func001Func001Func010Func002Func002Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 275) < 5 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func010Func002Func002Func003C takes nothing returns boolean
if ( not ( GetRandomInt(1, 79) < 8 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func010Func002Func002C takes nothing returns boolean
if ( not ( CountUnitsInGroup(udg_TempGroup) == 0 ) ) then
return false
endif
if ( not ( GetTerrainTypeBJ(udg_TempPoint) != 'Lrok' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func010Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) <= 15 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func010C takes nothing returns boolean
if ( not Trig_oooooooooooooo_Func001Func001Func010Func001C() ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func011Func001C takes nothing returns boolean
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Lgrs' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Lgrd' ) ) then
return true
endif
return false
endfunction
function Trig_oooooooooooooo_Func001Func001Func011Func002Func002Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 275) < 5 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func011Func002Func002Func003C takes nothing returns boolean
if ( not ( GetRandomInt(1, 80) < 8 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func011Func002Func002C takes nothing returns boolean
if ( not ( CountUnitsInGroup(udg_TempGroup) == 0 ) ) then
return false
endif
if ( not ( GetTerrainTypeBJ(udg_TempPoint) != 'Lrok' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func011Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) <= 25 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func011C takes nothing returns boolean
if ( not Trig_oooooooooooooo_Func001Func001Func011Func001C() ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func014Func001C takes nothing returns boolean
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrt' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldro' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Ldrg' ) ) then
return true
endif
return false
endfunction
function Trig_oooooooooooooo_Func001Func001Func014Func002Func002Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 275) < 5 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func014Func002Func002Func003C takes nothing returns boolean
if ( not ( GetRandomInt(1, 78) < 8 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func014Func002Func002C takes nothing returns boolean
if ( not ( CountUnitsInGroup(udg_TempGroup) == 0 ) ) then
return false
endif
if ( not ( GetTerrainTypeBJ(udg_TempPoint) != 'Lrok' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func014Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) <= 15 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func014C takes nothing returns boolean
if ( not Trig_oooooooooooooo_Func001Func001Func014Func001C() ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func015Func001C takes nothing returns boolean
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Lgrs' ) ) then
return true
endif
if ( ( GetTerrainTypeBJ(udg_TempPoint) == 'Lgrd' ) ) then
return true
endif
return false
endfunction
function Trig_oooooooooooooo_Func001Func001Func015Func002Func002Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 275) < 5 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func015Func002Func002Func003C takes nothing returns boolean
if ( not ( GetRandomInt(1, 81) < 8 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func015Func002Func002C takes nothing returns boolean
if ( not ( CountUnitsInGroup(udg_TempGroup) == 0 ) ) then
return false
endif
if ( not ( GetTerrainTypeBJ(udg_TempPoint) != 'Lrok' ) ) then
return false
endif
if ( not ( RectContainsLoc(udg_AffectedRegion, udg_TempPoint) == true ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func015Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) <= 25 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func001Func001Func015C takes nothing returns boolean
if ( not Trig_oooooooooooooo_Func001Func001Func015Func001C() ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func008Func001C takes nothing returns boolean
if ( not ( GetOwningPlayer(GetEnumUnit()) == Player(1) ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooooo_Func008A takes nothing returns nothing
if ( Trig_oooooooooooooo_Func008Func001C() ) then
call UnitAddAbilityBJ( 'AInv', GetEnumUnit() )
else
endif
endfunction
function Trig_oooooooooooooo_Actions takes nothing returns nothing
set udg_Loop = 1
loop
exitwhen udg_Loop > R2I(( GetRectWidthBJ(GetPlayableMapRect()) / I2R(udg_GeneratorSeed) ))
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = R2I(( GetRectHeightBJ(GetPlayableMapRect()) / I2R(udg_GeneratorSeed) ))
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
set udg_TempPoint = Location(( I2R(udg_Loop) * I2R(udg_GeneratorSeed) ), ( I2R(GetForLoopIndexA()) * I2R(udg_GeneratorSeed) ))
if ( Trig_oooooooooooooo_Func001Func001Func002C() ) then
if ( Trig_oooooooooooooo_Func001Func001Func002Func002C() ) then
set udg_TempGroup = GetUnitsInRangeOfLocAll(400.00, udg_TempPoint)
if ( Trig_oooooooooooooo_Func001Func001Func002Func002Func002C() ) then
call CreateDestructableLoc( udg_Destructables[GetRandomInt(1, 5)], udg_TempPoint, GetRandomDirectionDeg(), 1, 0 )
if ( Trig_oooooooooooooo_Func001Func001Func002Func002Func002Func002C() ) then
call CreateNUnitsAtLoc( 1, 'ngme', Player(PLAYER_NEUTRAL_PASSIVE), udg_TempPoint, bj_UNIT_FACING )
call AddItemToStockBJ( ChooseRandomItemBJ(1), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(2), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(3), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(4), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(5), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(6), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(7), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(8), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(9), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(10), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(11), GetLastCreatedUnit(), 1, 1 )
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func002Func002Func002Func003C() ) then
call CreateNUnitsAtLoc( 1, ChooseRandomCreepBJ(GetRandomInt(1, 10)), Player(1), udg_TempPoint, bj_UNIT_FACING )
call GroupAddUnitSimple( GetLastCreatedUnit(), udg_Unit_Group_All )
else
endif
else
endif
call DestroyGroup(udg_TempGroup)
else
endif
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func003C() ) then
if ( Trig_oooooooooooooo_Func001Func001Func003Func002C() ) then
set udg_TempGroup = GetUnitsInRangeOfLocAll(400.00, udg_TempPoint)
if ( Trig_oooooooooooooo_Func001Func001Func003Func002Func002C() ) then
call CreateDestructableLoc( udg_Destructables[GetRandomInt(1, 5)], udg_TempPoint, GetRandomDirectionDeg(), 1, 0 )
if ( Trig_oooooooooooooo_Func001Func001Func003Func002Func002Func002C() ) then
call CreateNUnitsAtLoc( 1, 'ngme', Player(PLAYER_NEUTRAL_PASSIVE), udg_TempPoint, bj_UNIT_FACING )
call AddItemToStockBJ( ChooseRandomItemBJ(1), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(2), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(3), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(4), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(5), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(6), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(7), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(8), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(9), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(10), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(11), GetLastCreatedUnit(), 1, 1 )
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func003Func002Func002Func003C() ) then
call CreateNUnitsAtLoc( 1, ChooseRandomCreepBJ(GetRandomInt(1, 10)), Player(1), udg_TempPoint, bj_UNIT_FACING )
call GroupAddUnitSimple( GetLastCreatedUnit(), udg_Unit_Group_All )
else
endif
else
endif
call DestroyGroup(udg_TempGroup)
else
endif
else
endif
call RemoveLocation(udg_TempPoint)
set udg_TempPoint = Location(( I2R(udg_Loop) * ( -1.00 * I2R(udg_GeneratorSeed) ) ), ( I2R(GetForLoopIndexA()) * I2R(udg_GeneratorSeed) ))
if ( Trig_oooooooooooooo_Func001Func001Func006C() ) then
if ( Trig_oooooooooooooo_Func001Func001Func006Func002C() ) then
set udg_TempGroup = GetUnitsInRangeOfLocAll(400.00, udg_TempPoint)
if ( Trig_oooooooooooooo_Func001Func001Func006Func002Func002C() ) then
call CreateDestructableLoc( udg_Destructables[GetRandomInt(1, 5)], udg_TempPoint, GetRandomDirectionDeg(), 1, 0 )
if ( Trig_oooooooooooooo_Func001Func001Func006Func002Func002Func002C() ) then
call CreateNUnitsAtLoc( 1, 'ngme', Player(PLAYER_NEUTRAL_PASSIVE), udg_TempPoint, bj_UNIT_FACING )
call AddItemToStockBJ( ChooseRandomItemBJ(1), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(2), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(3), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(4), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(5), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(6), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(7), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(8), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(9), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(10), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(11), GetLastCreatedUnit(), 1, 1 )
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func006Func002Func002Func003C() ) then
call CreateNUnitsAtLoc( 1, ChooseRandomCreepBJ(GetRandomInt(1, 10)), Player(1), udg_TempPoint, bj_UNIT_FACING )
call GroupAddUnitSimple( GetLastCreatedUnit(), udg_Unit_Group_All )
else
endif
else
endif
call DestroyGroup(udg_TempGroup)
else
endif
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func007C() ) then
if ( Trig_oooooooooooooo_Func001Func001Func007Func002C() ) then
set udg_TempGroup = GetUnitsInRangeOfLocAll(400.00, udg_TempPoint)
if ( Trig_oooooooooooooo_Func001Func001Func007Func002Func002C() ) then
call CreateDestructableLoc( udg_Destructables[GetRandomInt(1, 5)], udg_TempPoint, GetRandomDirectionDeg(), 1, 0 )
if ( Trig_oooooooooooooo_Func001Func001Func007Func002Func002Func002C() ) then
call CreateNUnitsAtLoc( 1, 'ngme', Player(PLAYER_NEUTRAL_PASSIVE), udg_TempPoint, bj_UNIT_FACING )
call AddItemToStockBJ( ChooseRandomItemBJ(1), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(2), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(3), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(4), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(5), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(6), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(7), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(8), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(9), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(10), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(11), GetLastCreatedUnit(), 1, 1 )
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func007Func002Func002Func003C() ) then
call CreateNUnitsAtLoc( 1, ChooseRandomCreepBJ(GetRandomInt(1, 11)), Player(1), udg_TempPoint, bj_UNIT_FACING )
call GroupAddUnitSimple( GetLastCreatedUnit(), udg_Unit_Group_All )
else
endif
else
endif
call DestroyGroup(udg_TempGroup)
else
endif
else
endif
call RemoveLocation(udg_TempPoint)
set udg_TempPoint = Location(( I2R(udg_Loop) * I2R(udg_GeneratorSeed) ), ( I2R(GetForLoopIndexA()) * ( -1.00 * I2R(udg_GeneratorSeed) ) ))
if ( Trig_oooooooooooooo_Func001Func001Func010C() ) then
if ( Trig_oooooooooooooo_Func001Func001Func010Func002C() ) then
set udg_TempGroup = GetUnitsInRangeOfLocAll(400.00, udg_TempPoint)
if ( Trig_oooooooooooooo_Func001Func001Func010Func002Func002C() ) then
call CreateDestructableLoc( udg_Destructables[GetRandomInt(1, 5)], udg_TempPoint, GetRandomDirectionDeg(), 1, 0 )
if ( Trig_oooooooooooooo_Func001Func001Func010Func002Func002Func002C() ) then
call CreateNUnitsAtLoc( 1, 'ngme', Player(PLAYER_NEUTRAL_PASSIVE), udg_TempPoint, bj_UNIT_FACING )
call AddItemToStockBJ( ChooseRandomItemBJ(1), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(2), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(3), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(4), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(5), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(6), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(7), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(8), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(9), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(10), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(11), GetLastCreatedUnit(), 1, 1 )
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func010Func002Func002Func003C() ) then
call CreateNUnitsAtLoc( 1, ChooseRandomCreepBJ(GetRandomInt(1, 10)), Player(1), udg_TempPoint, bj_UNIT_FACING )
call GroupAddUnitSimple( GetLastCreatedUnit(), udg_Unit_Group_All )
else
endif
else
endif
call DestroyGroup(udg_TempGroup)
else
endif
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func011C() ) then
if ( Trig_oooooooooooooo_Func001Func001Func011Func002C() ) then
set udg_TempGroup = GetUnitsInRangeOfLocAll(400.00, udg_TempPoint)
if ( Trig_oooooooooooooo_Func001Func001Func011Func002Func002C() ) then
call CreateDestructableLoc( udg_Destructables[GetRandomInt(1, 5)], udg_TempPoint, GetRandomDirectionDeg(), 1, 0 )
if ( Trig_oooooooooooooo_Func001Func001Func011Func002Func002Func002C() ) then
call CreateNUnitsAtLoc( 1, 'ngme', Player(PLAYER_NEUTRAL_PASSIVE), udg_TempPoint, bj_UNIT_FACING )
call AddItemToStockBJ( ChooseRandomItemBJ(1), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(2), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(3), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(4), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(5), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(6), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(7), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(8), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(9), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(10), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(11), GetLastCreatedUnit(), 1, 1 )
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func011Func002Func002Func003C() ) then
call CreateNUnitsAtLoc( 1, ChooseRandomCreepBJ(GetRandomInt(1, 10)), Player(1), udg_TempPoint, bj_UNIT_FACING )
call GroupAddUnitSimple( GetLastCreatedUnit(), udg_Unit_Group_All )
else
endif
else
endif
call DestroyGroup(udg_TempGroup)
else
endif
else
endif
call RemoveLocation(udg_TempPoint)
set udg_TempPoint = Location(( I2R(udg_Loop) * ( -1.00 * I2R(udg_GeneratorSeed) ) ), ( I2R(GetForLoopIndexA()) * ( -1.00 * I2R(udg_GeneratorSeed) ) ))
if ( Trig_oooooooooooooo_Func001Func001Func014C() ) then
if ( Trig_oooooooooooooo_Func001Func001Func014Func002C() ) then
set udg_TempGroup = GetUnitsInRangeOfLocAll(400.00, udg_TempPoint)
if ( Trig_oooooooooooooo_Func001Func001Func014Func002Func002C() ) then
call CreateDestructableLoc( udg_Destructables[GetRandomInt(1, 5)], udg_TempPoint, GetRandomDirectionDeg(), 1, 0 )
if ( Trig_oooooooooooooo_Func001Func001Func014Func002Func002Func002C() ) then
call CreateNUnitsAtLoc( 1, 'ngme', Player(PLAYER_NEUTRAL_PASSIVE), udg_TempPoint, bj_UNIT_FACING )
call AddItemToStockBJ( ChooseRandomItemBJ(1), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(2), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(3), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(4), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(5), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(6), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(7), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(8), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(9), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(10), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(11), GetLastCreatedUnit(), 1, 1 )
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func014Func002Func002Func003C() ) then
call CreateNUnitsAtLoc( 1, ChooseRandomCreepBJ(GetRandomInt(1, 11)), Player(1), udg_TempPoint, bj_UNIT_FACING )
call GroupAddUnitSimple( GetLastCreatedUnit(), udg_Unit_Group_All )
else
endif
else
endif
call DestroyGroup(udg_TempGroup)
else
endif
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func015C() ) then
if ( Trig_oooooooooooooo_Func001Func001Func015Func002C() ) then
set udg_TempGroup = GetUnitsInRangeOfLocAll(400.00, udg_TempPoint)
if ( Trig_oooooooooooooo_Func001Func001Func015Func002Func002C() ) then
call CreateDestructableLoc( udg_Destructables[GetRandomInt(1, 5)], udg_TempPoint, GetRandomDirectionDeg(), 1, 0 )
if ( Trig_oooooooooooooo_Func001Func001Func015Func002Func002Func002C() ) then
call CreateNUnitsAtLoc( 1, 'ngme', Player(PLAYER_NEUTRAL_PASSIVE), udg_TempPoint, bj_UNIT_FACING )
call AddItemToStockBJ( ChooseRandomItemBJ(1), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(2), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(3), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(4), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(5), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(6), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(7), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(8), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(9), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(10), GetLastCreatedUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(11), GetLastCreatedUnit(), 1, 1 )
else
endif
if ( Trig_oooooooooooooo_Func001Func001Func015Func002Func002Func003C() ) then
call CreateNUnitsAtLoc( 1, ChooseRandomCreepBJ(GetRandomInt(1, 10)), Player(1), udg_TempPoint, bj_UNIT_FACING )
call GroupAddUnitSimple( GetLastCreatedUnit(), udg_Unit_Group_All )
else
endif
else
endif
call DestroyGroup(udg_TempGroup)
else
endif
else
endif
call RemoveLocation(udg_TempPoint)
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call PolledWait( 0.01 )
set udg_Loop = udg_Loop + 1
endloop
call SuspendHeroXPBJ( false, gg_unit_Huth_0000 )
call ConditionalTriggerExecute( gg_trg_Heroes_Items_2 )
call SetUnitOwner( gg_unit_Huth_0000, Player(0), true )
call ConditionalTriggerExecute( gg_trg_Random_Quest_1 )
call ClearTextMessagesBJ( GetPlayersAll() )
call DisplayTextToForce( GetPlayersAll(), "TRIGSTR_650" )
call PauseAllUnitsBJ( false )
call PauseUnitBJ( false, gg_unit_Huth_0000 )
call CinematicModeBJ( false, GetPlayersAll() )
call DisplayCineFilterBJ( false )
call PanCameraToTimedLocForPlayer( Player(0), GetUnitLoc(gg_unit_Eevi_0003), 0 )
call ForGroupBJ( GetUnitsInRectAll(GetPlayableMapRect()), function Trig_oooooooooooooo_Func008A )
endfunction
//===========================================================================
function InitTrig_Generate_4 takes nothing returns nothing
set gg_trg_Generate_4 = CreateTrigger( )
call TriggerAddAction( gg_trg_Generate_4, function Trig_oooooooooooooo_Actions )
endfunction
function Trig_ooooo_Actions takes nothing returns nothing
set udg_Loop = 1
loop
exitwhen udg_Loop > R2I(( GetRectWidthBJ(GetPlayableMapRect()) / I2R(udg_GeneratorSeed) ))
set bj_forLoopAIndex = 1
set bj_forLoopAIndexEnd = R2I(( GetRectHeightBJ(GetPlayableMapRect()) / I2R(udg_GeneratorSeed) ))
loop
exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
set udg_TempPoint = Location(( I2R(udg_Loop) * I2R(udg_GeneratorSeed) ), ( I2R(GetForLoopIndexA()) * I2R(udg_GeneratorSeed) ))
call TerrainDeformationCraterBJ( 0.10, true, udg_TempPoint, GetRandomReal(64.00, 512.00), ( -1.00 * GetRandomReal(-32.00, 32.00) ) )
call RemoveLocation(udg_TempPoint)
set udg_TempPoint = Location(( I2R(udg_Loop) * I2R(( -1 * udg_GeneratorSeed )) ), ( I2R(GetForLoopIndexA()) * I2R(udg_GeneratorSeed) ))
call TerrainDeformationCraterBJ( 0.10, true, udg_TempPoint, GetRandomReal(64.00, 512.00), ( -1.00 * GetRandomReal(-32.00, 32.00) ) )
call RemoveLocation(udg_TempPoint)
set udg_TempPoint = Location(( I2R(udg_Loop) * I2R(udg_GeneratorSeed) ), ( I2R(GetForLoopIndexA()) * I2R(( -1 * udg_GeneratorSeed )) ))
call TerrainDeformationCraterBJ( 0.10, true, udg_TempPoint, GetRandomReal(64.00, 512.00), ( -1.00 * GetRandomReal(-32.00, 32.00) ) )
call RemoveLocation(udg_TempPoint)
set udg_TempPoint = Location(( I2R(udg_Loop) * I2R(( -1 * udg_GeneratorSeed )) ), ( I2R(GetForLoopIndexA()) * I2R(( -1 * udg_GeneratorSeed )) ))
call TerrainDeformationCraterBJ( 0.10, true, udg_TempPoint, GetRandomReal(64.00, 512.00), ( -1.00 * GetRandomReal(-32.00, 32.00) ) )
call RemoveLocation(udg_TempPoint)
set bj_forLoopAIndex = bj_forLoopAIndex + 1
endloop
call PolledWait( 0.01 )
set udg_Loop = udg_Loop + 1
endloop
call ConditionalTriggerExecute( gg_trg_Generate_4 )
endfunction
//===========================================================================
function InitTrig_Generate_5 takes nothing returns nothing
set gg_trg_Generate_5 = CreateTrigger( )
call TriggerAddAction( gg_trg_Generate_5, function Trig_ooooo_Actions )
endfunction
function Trig_oooooooooooo_Conditions takes nothing returns boolean
if ( not ( IsUnitType(GetDyingUnit(), UNIT_TYPE_HERO) == false ) ) then
return false
endif
if ( not ( GetOwningPlayer(GetDyingUnit()) == Player(1) ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooo_Func002C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) < 17 ) ) then
return false
endif
return true
endfunction
function Trig_oooooooooooo_Actions takes nothing returns nothing
call AdjustPlayerStateBJ( ( GetUnitLevel(GetDyingUnit()) * 9 ), Player(0), PLAYER_STATE_RESOURCE_GOLD )
call CreateTextTagUnitBJ( I2S(( ( GetUnitLevel(GetDyingUnit()) * 8 ) + S2I("|c00EFF933 Gold!") )), GetDyingUnit(), 0, 7.75, 100, 100, 100, 0 )
call SetTextTagPermanentBJ( GetLastCreatedTextTag(), false )
call SetTextTagVelocityBJ( GetLastCreatedTextTag(), GetRandomReal(55.00, 75.00), 90 )
call SetTextTagLifespanBJ( GetLastCreatedTextTag(), GetRandomReal(5.00, 4.00) )
call SetTextTagFadepointBJ( GetLastCreatedTextTag(), GetRandomReal(4.00, 3.00) )
if ( Trig_oooooooooooo_Func002C() ) then
call CreateItemLoc( ChooseRandomItemBJ(GetUnitLevel(GetDyingUnit())), GetUnitLoc(GetDyingUnit()) )
else
endif
call TriggerSleepAction( 90.00 )
call CreateNUnitsAtLoc( 1, GetUnitTypeId(GetDyingUnit()), Player(1), GetUnitLoc(GetDyingUnit()), bj_UNIT_FACING )
endfunction
//===========================================================================
function InitTrig_Generate_6 takes nothing returns nothing
set gg_trg_Generate_6 = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Generate_6, EVENT_PLAYER_UNIT_DEATH )
call TriggerAddCondition( gg_trg_Generate_6, Condition( function Trig_oooooooooooo_Conditions ) )
call TriggerAddAction( gg_trg_Generate_6, function Trig_oooooooooooo_Actions )
endfunction
Generate 7
Events
Time - Elapsed game time is 120.50 seconds
Conditions
Actions
Unit - Pause all units
function Trig_s_Actions takes nothing returns nothing
call AdjustPlayerStateBJ( 1500, Player(0), PLAYER_STATE_RESOURCE_GOLD )
call CreateNUnitsAtLoc( 1, 'Nalc', Player(1), GetRandomLocInRect(GetPlayableMapRect()), bj_UNIT_FACING )
call SetHeroLevelBJ( GetLastCreatedUnit(), 5, false )
call CreateNUnitsAtLoc( 1, 'Nngs', Player(1), GetRandomLocInRect(GetPlayableMapRect()), bj_UNIT_FACING )
call SetHeroLevelBJ( GetLastCreatedUnit(), 5, false )
call CreateNUnitsAtLoc( 1, 'Ntin', Player(1), GetRandomLocInRect(GetPlayableMapRect()), bj_UNIT_FACING )
call SetHeroLevelBJ( GetLastCreatedUnit(), 5, false )
call CreateNUnitsAtLoc( 1, 'Nbst', Player(1), GetRandomLocInRect(GetPlayableMapRect()), bj_UNIT_FACING )
call SetHeroLevelBJ( GetLastCreatedUnit(), 5, false )
call CreateNUnitsAtLoc( 1, 'Nbrn', Player(1), GetRandomLocInRect(GetPlayableMapRect()), bj_UNIT_FACING )
call SetHeroLevelBJ( GetLastCreatedUnit(), 5, false )
call CreateNUnitsAtLoc( 1, 'Npbm', Player(1), GetRandomLocInRect(GetPlayableMapRect()), bj_UNIT_FACING )
call SetHeroLevelBJ( GetLastCreatedUnit(), 5, false )
call CreateNUnitsAtLoc( 1, 'Nplh', Player(1), GetRandomLocInRect(GetPlayableMapRect()), bj_UNIT_FACING )
call SetHeroLevelBJ( GetLastCreatedUnit(), 5, false )
call CreateNUnitsAtLoc( 1, 'Nfir', Player(1), GetRandomLocInRect(GetPlayableMapRect()), bj_UNIT_FACING )
call SetHeroLevelBJ( GetLastCreatedUnit(), 5, false )
endfunction
//===========================================================================
function InitTrig_Heroes takes nothing returns nothing
set gg_trg_Heroes = CreateTrigger( )
call TriggerRegisterTimerEventSingle( gg_trg_Heroes, 13.00 )
call TriggerAddAction( gg_trg_Heroes, function Trig_s_Actions )
endfunction
Heroes Items 1
Events
Time - Every 700.00 seconds of game time
Conditions
Actions
Set Variable Set Item_For_Heroes = (Item_For_Heroes + 1)
Unit Group - Pick every unit in (Units in Region_003 <gen>) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Picked unit)) Equal to Player 2 (Blue)
((Picked unit) is A Hero) Equal to True
Then - Actions
Item - Remove (Item carried by (Picked unit) in slot 1)
Item - Remove (Item carried by (Picked unit) in slot 2)
Item - Remove (Item carried by (Picked unit) in slot 3)
Item - Remove (Item carried by (Picked unit) in slot 4)
Item - Remove (Item carried by (Picked unit) in slot 5)
Item - Remove (Item carried by (Picked unit) in slot 6)
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Item - Pick every item in (Playable map area) and do (Actions)
Loop - Actions
Item - Remove (Picked item)
Else - Actions
Heroes Items 2
Events
Conditions
Actions
Unit Group - Pick every unit in (Units in Region_003 <gen>) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Picked unit)) Equal to Player 2 (Blue)
((Picked unit) is A Hero) Equal to True
Then - Actions
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Hero - Create (Random level Item_For_Heroes item-type) and give it to (Picked unit)
Item - Pick every item in (Playable map area) and do (Actions)
Loop - Actions
Item - Remove (Picked item)
Else - Actions
function Trig_ss_Func001Func001C takes nothing returns boolean
if ( not ( GetUnitTypeId(GetEnumUnit()) == 'ngme' ) ) then
return false
endif
return true
endfunction
function Trig_ss_Func001Func002C takes nothing returns boolean
if ( not ( IsUnitType(GetEnumUnit(), UNIT_TYPE_HERO) == true ) ) then
return false
endif
if ( not ( GetOwningPlayer(GetEnumUnit()) == Player(PLAYER_NEUTRAL_AGGRESSIVE) ) ) then
return false
endif
return true
endfunction
function Trig_ss_Func001A takes nothing returns nothing
if ( Trig_ss_Func001Func001C() ) then
call AddItemToStockBJ( ChooseRandomItemBJ(1), GetEnumUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(2), GetEnumUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(3), GetEnumUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(4), GetEnumUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(5), GetEnumUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(6), GetEnumUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(7), GetEnumUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(8), GetEnumUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(9), GetEnumUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(10), GetEnumUnit(), 1, 1 )
call AddItemToStockBJ( ChooseRandomItemBJ(11), GetEnumUnit(), 1, 1 )
else
endif
if ( Trig_ss_Func001Func002C() ) then
call AddHeroXPSwapped( ( 2500 * ( GetHeroLevel(GetEnumUnit()) / 5 ) ), GetTriggerUnit(), false )
call ModifyHeroStat( bj_HEROSTAT_STR, GetEnumUnit(), bj_MODIFYMETHOD_ADD, 10 )
call ModifyHeroStat( bj_HEROSTAT_AGI, GetEnumUnit(), bj_MODIFYMETHOD_ADD, 5 )
call ModifyHeroStat( bj_HEROSTAT_INT, GetEnumUnit(), bj_MODIFYMETHOD_ADD, 5 )
else
endif
endfunction
function Trig_ss_Actions takes nothing returns nothing
call ForGroupBJ( GetUnitsInRectAll(GetPlayableMapRect()), function Trig_ss_Func001A )
endfunction
//===========================================================================
function InitTrig_Items_Generate_1 takes nothing returns nothing
set gg_trg_Items_Generate_1 = CreateTrigger( )
call TriggerRegisterTimerEventPeriodic( gg_trg_Items_Generate_1, 500.00 )
call TriggerAddAction( gg_trg_Items_Generate_1, function Trig_ss_Actions )
endfunction
function Trig_sss_Func002Func001C takes nothing returns boolean
if ( not ( IsUnitType(GetEnumUnit(), UNIT_TYPE_HERO) == true ) ) then
return false
endif
if ( not ( GetOwningPlayer(GetEnumUnit()) == Player(1) ) ) then
return false
endif
return true
endfunction
function Trig_sss_Func002A takes nothing returns nothing
if ( Trig_sss_Func002Func001C() ) then
call IssuePointOrderLocBJ( GetEnumUnit(), "attack", GetRandomLocInRect(GetPlayableMapRect()) )
else
endif
endfunction
function Trig_sss_Actions takes nothing returns nothing
call ForGroupBJ( GetUnitsInRectAll(GetPlayableMapRect()), function Trig_sss_Func002A )
endfunction
//===========================================================================
function InitTrig_Items_Generate_2 takes nothing returns nothing
set gg_trg_Items_Generate_2 = CreateTrigger( )
call TriggerRegisterTimerEventPeriodic( gg_trg_Items_Generate_2, 15.00 )
call TriggerAddAction( gg_trg_Items_Generate_2, function Trig_sss_Actions )
endfunction
function Trig_ssss_Actions takes nothing returns nothing
call CustomDefeatBJ( Player(0), "TRIGSTR_653" )
endfunction
//===========================================================================
function InitTrig_Items_Generate_3 takes nothing returns nothing
set gg_trg_Items_Generate_3 = CreateTrigger( )
call TriggerRegisterUnitEvent( gg_trg_Items_Generate_3, gg_unit_Eevi_0003, EVENT_UNIT_DEATH )
call TriggerAddAction( gg_trg_Items_Generate_3, function Trig_ssss_Actions )
endfunction
function Trig_sssss_Func007C takes nothing returns boolean
if ( not ( GetRandomInt(1, 100) < 75 ) ) then
return false
endif
return true
endfunction
function Trig_sssss_Actions takes nothing returns nothing
call AddWeatherEffectSaveLast( GetPlayableMapRect(), 'RAhr' )
call TriggerSleepAction( 300.00 )
call EnableWeatherEffect( GetLastCreatedWeatherEffect(), false )
call AddWeatherEffectSaveLast( GetPlayableMapRect(), 'WOlw' )
call TriggerSleepAction( 225.00 )
call EnableWeatherEffect( GetLastCreatedWeatherEffect(), false )
if ( Trig_sssss_Func007C() ) then
call AddWeatherEffectSaveLast( GetPlayableMapRect(), 'SNls' )
else
endif
call TriggerSleepAction( 250.00 )
call EnableWeatherEffect( GetLastCreatedWeatherEffect(), false )
endfunction
//===========================================================================
function InitTrig_Items_Generate_4 takes nothing returns nothing
set gg_trg_Items_Generate_4 = CreateTrigger( )
call TriggerRegisterTimerEventPeriodic( gg_trg_Items_Generate_4, 1500.00 )
call TriggerAddAction( gg_trg_Items_Generate_4, function Trig_sssss_Actions )
endfunction
function Trig_ssssss_Conditions takes nothing returns boolean
if ( not ( IsUnitType(GetDyingUnit(), UNIT_TYPE_HERO) == true ) ) then
return false
endif
if ( not ( GetOwningPlayer(GetDyingUnit()) == Player(1) ) ) then
return false
endif
return true
endfunction
function Trig_ssssss_Actions takes nothing returns nothing
call AdjustPlayerStateBJ( ( GetHeroLevel(GetDyingUnit()) * 25 ), GetOwningPlayer(GetKillingUnitBJ()), PLAYER_STATE_RESOURCE_GOLD )
call TriggerSleepAction( 120.00 )
call ReviveHeroLoc( GetDyingUnit(), GetRandomLocInRect(GetPlayableMapRect()), false )
endfunction
//===========================================================================
function InitTrig_Items_Generate_5 takes nothing returns nothing
set gg_trg_Items_Generate_5 = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Items_Generate_5, EVENT_PLAYER_UNIT_DEATH )
call TriggerAddCondition( gg_trg_Items_Generate_5, Condition( function Trig_ssssss_Conditions ) )
call TriggerAddAction( gg_trg_Items_Generate_5, function Trig_ssssss_Actions )
endfunction
function Trig_sssssss_Func002A takes nothing returns nothing
call UnitAddAbilityBJ( 'Avul', GetEnumUnit() )
endfunction
function Trig_sssssss_Func004A takes nothing returns nothing
call UnitRemoveAbilityBJ( 'Avul', GetEnumUnit() )
endfunction
function Trig_sssssss_Actions takes nothing returns nothing
call ForGroupBJ( GetUnitsInRectAll(GetPlayableMapRect()), function Trig_sssssss_Func002A )
call TriggerSleepAction( 120.00 )
call ForGroupBJ( GetUnitsInRectAll(GetPlayableMapRect()), function Trig_sssssss_Func004A )
endfunction
//===========================================================================
function InitTrig_Items_Generate_6 takes nothing returns nothing
set gg_trg_Items_Generate_6 = CreateTrigger( )
call TriggerRegisterTimerEventSingle( gg_trg_Items_Generate_6, 0.00 )
call TriggerAddAction( gg_trg_Items_Generate_6, function Trig_sssssss_Actions )
endfunction
Unit Indexer gives you an array-safe (1-8190) custom value for units, eliminating the need for hashtables to store unit-specific data.
Just use "Set MyArrayData[(Custom value of Unit)] = (Some data)".
--------
If you want to get the unit assigned to an index (reverse lookup) use "UDexUnits[(Index)]".
--------
If you want to detect when an index is created or when it is released, use "UnitIndexEvent Equal to 1.00" (created) or "UnitIndexEvent Equal to 2.00" (released). The index being created/released is called "UDex".
--------
You can enable/disable Unit Indexer to protect some of your undesirable units from being indexed like this:
Trigger - Turn off Unit Indexer <gen>
Unit - Create 1 Dummy for (Triggering player) at TempPoint facing 0.00 degrees
Trigger - Turn on Unit Indexer <gen>
--------
If you want to use a Map Initialization trigger that uses custom value of units, to make sure that UnitIndexer initializes first, use the event "UnitIndexEvent Equal to 3.00". Otherwise the custom value of units may be zero.
--------
Advanced:
--------
If you want to lock the index of a unit, use "Set UnitIndexLock[(Index)] = (UnitIndexLock[(Index)] + 1)". This will prevent the index from being recycled. If you want to unlock it and allow it to be recycled, run the Unit Indexer <gen> trigger.
Note: Make sure if you add a lock that you will eventually remove the lock, otherwise the index will never be recycled.
Just use "Set MyArrayData[(Custom value of Unit)] = (Some data)".
--------
If you want to get the unit assigned to an index (reverse lookup) use "UDexUnits[(Index)]".
--------
If you want to detect when an index is created or when it is released, use "UnitIndexEvent Equal to 1.00" (created) or "UnitIndexEvent Equal to 2.00" (released). The index being created/released is called "UDex".
--------
You can enable/disable Unit Indexer to protect some of your undesirable units from being indexed like this:
Trigger - Turn off Unit Indexer <gen>
Unit - Create 1 Dummy for (Triggering player) at TempPoint facing 0.00 degrees
Trigger - Turn on Unit Indexer <gen>
--------
If you want to use a Map Initialization trigger that uses custom value of units, to make sure that UnitIndexer initializes first, use the event "UnitIndexEvent Equal to 3.00". Otherwise the custom value of units may be zero.
--------
Advanced:
--------
If you want to lock the index of a unit, use "Set UnitIndexLock[(Index)] = (UnitIndexLock[(Index)] + 1)". This will prevent the index from being recycled. If you want to unlock it and allow it to be recycled, run the Unit Indexer <gen> trigger.
Note: Make sure if you add a lock that you will eventually remove the lock, otherwise the index will never be recycled.
Unit Indexer
Events
Map initialization
Conditions
Actions
Custom script: call ExecuteFunc("InitializeUnitIndexer")
Custom script: endfunction
Custom script:
Custom script: function ClearUnitIndex takes nothing returns nothing
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of UDexUnits[UDex]) Equal to 0
Then - Actions
Set Variable Set UnitIndexLock[UDex] = (UnitIndexLock[UDex] - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UnitIndexLock[UDex] Equal to 0
Then - Actions
Set Variable Set UDexNext[UDexPrev[UDex]] = UDexNext[UDex]
Set Variable Set UDexPrev[UDexNext[UDex]] = UDexPrev[UDex]
Set Variable Set UDexPrev[UDex] = "0"
Set Variable Set UnitIndexEvent = "0.00"
Set Variable Set UnitIndexEvent = "2.00"
Set Variable Set UnitIndexEvent = "0.00"
Set Variable Set UDexUnits[UDex] = No unit
Set Variable Set UDexNext[UDex] = UDexRecycle
Set Variable Set UDexRecycle = UDex
Else - Actions
Else - Actions
Custom script: endfunction
Custom script:
Custom script: function IndexUnit takes nothing returns boolean
Custom script: local integer pdex = udg_UDex
Custom script: local integer ndex
-------- - --------
-------- You can customize the following block - if conditions are false the (Matching unit) won't be indexed. --------
-------- - --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UnitIndexerEnabled Equal to True
(Custom value of (Matching unit)) Equal to 0
Then - Actions
Set Variable Set UDexWasted = (UDexWasted + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UDexWasted Equal to 32
Then - Actions
Set Variable Set UDexWasted = "0"
Set Variable Set UDex = UDexNext[0]
Custom script: loop
Custom script: exitwhen udg_UDex == 0
Custom script: set ndex = udg_UDexNext[udg_UDex]
Custom script: call ClearUnitIndex()
Custom script: set udg_UDex = ndex
Custom script: endloop
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UDexRecycle Equal to 0
Then - Actions
Set Variable Set UDex = (UDexGen + 1)
Set Variable Set UDexGen = UDex
Else - Actions
Set Variable Set UDex = UDexRecycle
Set Variable Set UDexRecycle = UDexNext[UDex]
Set Variable Set UDexUnits[UDex] = (Matching unit)
Unit - Set the custom value of UDexUnits[UDex] to UDex
Set Variable Set UDexPrev[UDexNext[0]] = UDex
Set Variable Set UDexNext[UDex] = UDexNext[0]
Set Variable Set UDexNext[0] = UDex
Set Variable Set UnitIndexLock[UDex] = "1"
Set Variable Set UnitIndexEvent = "0.00"
Set Variable Set UnitIndexEvent = "1.00"
Set Variable Set UnitIndexEvent = "0.00"
Custom script: set udg_UDex = pdex
Else - Actions
Custom script: return false
Custom script: endfunction
Custom script:
Custom script: function InitializeUnitIndexer takes nothing returns nothing
Custom script: local integer i = 16
Custom script: local boolexpr b = Filter(function IndexUnit)
Custom script: local region re = CreateRegion()
Custom script: local trigger t = GetTriggeringTrigger()
Custom script: local rect r = GetWorldBounds()
Custom script: call RegionAddRect(re, r)
Custom script: call TriggerRegisterEnterRegion(t, re, b)
Custom script: call TriggerClearActions(t)
Custom script: call TriggerAddAction(t, function ClearUnitIndex)
Set Variable Set UnitIndexerEnabled = "true"
Custom script: loop
Custom script: set i = i - 1
Custom script: call GroupEnumUnitsOfPlayer(bj_lastCreatedGroup, Player(i), b)
Custom script: exitwhen i == 0
Custom script: endloop
Custom script: call RemoveRect(r)
Custom script: set re = null
Custom script: set r = null
Custom script: set t = null
Custom script: set b = null
Set Variable Set UnitIndexEvent = "3.00"
Set Variable Set UnitIndexEvent = "0.00"
//TESH.scrollpos=148
//TESH.alwaysfold=0
//===========================================================================
// Damage Engine lets you detect, amplify, block or nullify damage. It even
// lets you detect if the damage was physical or from a spell. Just reference
// DamageEventAmount/Source/Target or the boolean IsDamageSpell, to get the
// necessary damage event data.
//
// - Detect damage: use the event "DamageEvent Equal to 1.00"
// - To change damage before it's dealt: use the event "DamageModifierEvent Equal to 1.00"
// - Detect damage after it was applied, use the event "AfterDamageEvent Equal to 1.00"
// - Detect spell damage: use the condition "IsDamageSpell Equal to True"
// - Detect zero-damage: use the event "DamageEvent Equal to 2.00" (an AfterDamageEvent will not fire for this)
//
// You can specify the DamageEventType before dealing triggered damage. To prevent an already-improbable error, I recommend running the trigger "ClearDamageEvent (Checking Conditions)" after dealing triggered damage from within a damage event:
// - Set NextDamageType = DamageTypeWhatever
// - Unit - Cause...
// - Trigger - Run ClearDamageEvent (Checking Conditions)
//
// You can modify the DamageEventAmount and the DamageEventType from a "DamageModifierEvent Equal to 1.00" trigger.
// - If the amount is modified to negative, it will count as a heal.
// - If the amount is set to 0, no damage will be dealt.
//
// If you need to reference the original in-game damage, use the variable "DamageEventPrevAmt".
//
//===========================================================================
// Programming note about "integer i" and "udg_DmgEvRecursionN": integer i
// ranges from -1 upwards. "udg_DmgEvRecursionN" ranges from 0 upwards.
// "integer i" is always 1 less than "udg_DmgEvRecursionN"
//
function DmgEvResetVars takes nothing returns nothing
local integer i = udg_DmgEvRecursionN - 2
set udg_DmgEvRecursionN = i + 1
if i >= 0 then
set udg_DamageEventPrevAmt = udg_LastDmgPrevAmount[i]
set udg_DamageEventAmount = udg_LastDmgValue[i]
set udg_DamageEventSource = udg_LastDmgSource[i]
set udg_DamageEventTarget = udg_LastDmgTarget[i]
set udg_IsDamageSpell = udg_LastDmgWasSpell[i]
set udg_DamageEventType = udg_LastDmgPrevType[i]
endif
endfunction
function CheckDamagedLifeEvent takes boolean clear returns nothing
if clear then
set udg_NextDamageOverride = false
set udg_NextDamageType = 0
endif
if udg_DmgEvTrig != null then
call DestroyTrigger(udg_DmgEvTrig)
set udg_DmgEvTrig = null
if udg_IsDamageSpell then
call SetWidgetLife(udg_DamageEventTarget, RMaxBJ(udg_LastDamageHP, 0.41))
if udg_LastDamageHP <= 0.405 then
if udg_DamageEventType < 0 then
call SetUnitExploded(udg_DamageEventTarget, true)
endif
//Kill the unit
call DisableTrigger(udg_DamageEventTrigger)
call UnitDamageTarget(udg_DamageEventSource, udg_DamageEventTarget, -999, false, false, null, DAMAGE_TYPE_UNIVERSAL, null)
call EnableTrigger(udg_DamageEventTrigger)
endif
elseif GetUnitAbilityLevel(udg_DamageEventTarget, udg_DamageBlockingAbility) > 0 then
call UnitRemoveAbility(udg_DamageEventTarget, udg_DamageBlockingAbility)
call SetWidgetLife(udg_DamageEventTarget, udg_LastDamageHP)
endif
if udg_DamageEventAmount != 0.00 and not udg_HideDamageFrom[GetUnitUserData(udg_DamageEventSource)] then
set udg_AfterDamageEvent = 0.00
set udg_AfterDamageEvent = 1.00
set udg_AfterDamageEvent = 0.00
endif
call DmgEvResetVars()
endif
endfunction
function DmgEvOnExpire takes nothing returns nothing
set udg_DmgEvStarted = false
call CheckDamagedLifeEvent(true)
endfunction
function PreCheckDamagedLifeEvent takes nothing returns boolean
call CheckDamagedLifeEvent(true)
return false
endfunction
function OnUnitDamage takes nothing returns boolean
local boolean override = udg_DamageEventOverride
local integer i = udg_DmgEvRecursionN - 1
local string s
local real prevAmount
local real life
local real prevLife
local unit u
call CheckDamagedLifeEvent(false) //in case the unit state event failed and the 0.00 second timer hasn't yet expired
if i >= 0 then
if i < 16 then
set udg_LastDmgPrevAmount[i]= udg_DamageEventPrevAmt
set udg_LastDmgValue[i] = udg_DamageEventAmount
set udg_LastDmgSource[i] = udg_DamageEventSource
set udg_LastDmgTarget[i] = udg_DamageEventTarget
set udg_LastDmgWasSpell[i] = udg_IsDamageSpell
set udg_LastDmgPrevType[i] = udg_DamageEventType
else
set s = "WARNING: Recursion error when dealing damage! Make sure when you deal damage from within a DamageEvent trigger, do it like this:\n\n"
set s = s + "Trigger - Turn off (This Trigger)\n"
set s = s + "Unit - Cause...\n"
set s = s + "Trigger - Turn on (This Trigger)"
//Delete the next couple of lines to disable the in-game recursion crash warnings
call ClearTextMessages()
call DisplayTimedTextToPlayer(GetLocalPlayer(), 0.00, 0.00, 999.00, s)
return false
endif
endif
set udg_DmgEvRecursionN = i + 2
set u = GetTriggerUnit()
set prevAmount = GetEventDamage()
set udg_DamageEventSource = GetEventDamageSource()
set udg_DamageEventAmount = prevAmount
set udg_DamageEventTarget = u
set udg_DamageEventType = udg_NextDamageType
set udg_NextDamageType = 0
set udg_DamageEventOverride = udg_NextDamageOverride
set udg_NextDamageOverride = false
if prevAmount == 0.00 then
if not udg_HideDamageFrom[GetUnitUserData(udg_DamageEventSource)] then
set udg_DamageEventPrevAmt = 0.00
set udg_DamageEvent = 0.00
set udg_DamageEvent = 2.00
set udg_DamageEvent = 0.00
endif
call DmgEvResetVars()
else
if not udg_DmgEvStarted then
set udg_DmgEvStarted = true
call TimerStart(udg_DmgEvTimer, 0.00, false, function DmgEvOnExpire)
endif
set udg_IsDamageSpell = prevAmount < 0.00
if udg_IsDamageSpell then
set prevAmount = -udg_DamageEventAmount
set life = 1.00
if IsUnitType(u, UNIT_TYPE_ETHEREAL) and not IsUnitType(u, UNIT_TYPE_HERO) then
set life = life*udg_DAMAGE_FACTOR_ETHEREAL //1.67
endif
if GetUnitAbilityLevel(u, 'Aegr') > 0 then
set life = life*udg_DAMAGE_FACTOR_ELUNES //0.80
endif
if udg_DmgEvBracers != 0 and IsUnitType(u, UNIT_TYPE_HERO) then
//Inline of UnitHasItemOfTypeBJ without the potential handle ID leak.
set i = 6
loop
set i = i - 1
if GetItemTypeId(UnitItemInSlot(u, i)) == udg_DmgEvBracers then
set life = life*udg_DAMAGE_FACTOR_BRACERS //0.67
exitwhen true
endif
exitwhen i == 0
endloop
endif
set udg_DamageEventAmount = prevAmount*life
endif
set udg_DamageEventPrevAmt = prevAmount
set udg_DamageModifierEvent = 0.00
if not udg_DamageEventOverride then
set udg_DamageModifierEvent = 1.00
if not udg_DamageEventOverride then
set udg_DamageModifierEvent = 2.00
set udg_DamageModifierEvent = 3.00
endif
endif
set udg_DamageEventOverride = override
if udg_DamageEventAmount > 0.00 then
set udg_DamageModifierEvent = 4.00
endif
set udg_DamageModifierEvent = 0.00
if not udg_HideDamageFrom[GetUnitUserData(udg_DamageEventSource)] then
set udg_DamageEvent = 0.00
set udg_DamageEvent = 1.00
set udg_DamageEvent = 0.00
endif
call CheckDamagedLifeEvent(true) //in case the unit state event failed from a recursive damage event
//All events have run and the damage amount is finalized.
set life = GetWidgetLife(u)
set udg_DmgEvTrig = CreateTrigger()
call TriggerAddCondition(udg_DmgEvTrig, Filter(function PreCheckDamagedLifeEvent))
if not udg_IsDamageSpell then
if udg_DamageEventAmount != prevAmount then
set life = life + prevAmount - udg_DamageEventAmount
if GetUnitState(u, UNIT_STATE_MAX_LIFE) < life then
set udg_LastDamageHP = life - prevAmount
call UnitAddAbility(u, udg_DamageBlockingAbility)
endif
call SetWidgetLife(u, RMaxBJ(life, 0.42))
endif
call TriggerRegisterUnitStateEvent(udg_DmgEvTrig, u, UNIT_STATE_LIFE, LESS_THAN, RMaxBJ(0.41, life - prevAmount/2.00))
else
set udg_LastDamageHP = GetUnitState(u, UNIT_STATE_MAX_LIFE)
set prevLife = life
if life + prevAmount*0.75 > udg_LastDamageHP then
set life = RMaxBJ(udg_LastDamageHP - prevAmount/2.00, 1.00)
call SetWidgetLife(u, life)
set life = (life + udg_LastDamageHP)/2.00
else
set life = life + prevAmount*0.50
endif
set udg_LastDamageHP = prevLife - (prevAmount - (prevAmount - udg_DamageEventAmount))
call TriggerRegisterUnitStateEvent(udg_DmgEvTrig, u, UNIT_STATE_LIFE, GREATER_THAN, life)
endif
set u = null
endif
return false
endfunction
function CreateDmgEvTrg takes nothing returns nothing
set udg_DamageEventTrigger = CreateTrigger()
call TriggerAddCondition(udg_DamageEventTrigger, Filter(function OnUnitDamage))
endfunction
function SetupDmgEv takes nothing returns boolean
local integer i = udg_UDex
local unit u
if udg_UnitIndexEvent == 1.00 then
set u = udg_UDexUnits[i]
if GetUnitAbilityLevel(u, 'Aloc') == 0 and TriggerEvaluate(gg_trg_Damage_Engine_Config) then
set udg_UnitDamageRegistered[i] = true
call TriggerRegisterUnitEvent(udg_DamageEventTrigger, u, EVENT_UNIT_DAMAGED)
call UnitAddAbility(u, udg_SpellDamageAbility)
call UnitMakeAbilityPermanent(u, true, udg_SpellDamageAbility)
endif
set u = null
else
set udg_HideDamageFrom[i] = false
if udg_UnitDamageRegistered[i] then
set udg_UnitDamageRegistered[i] = false
set udg_DamageEventsWasted = udg_DamageEventsWasted + 1
if udg_DamageEventsWasted == 32 then //After 32 registered units have been removed...
set udg_DamageEventsWasted = 0
//Rebuild the mass EVENT_UNIT_DAMAGED trigger:
call DestroyTrigger(udg_DamageEventTrigger)
call CreateDmgEvTrg()
set i = udg_UDexNext[0]
loop
exitwhen i == 0
if udg_UnitDamageRegistered[i] then
call TriggerRegisterUnitEvent(udg_DamageEventTrigger, udg_UDexUnits[i], EVENT_UNIT_DAMAGED)
endif
set i = udg_UDexNext[i]
endloop
endif
endif
endif
return false
endfunction
//===========================================================================
function InitTrig_Damage_Engine takes nothing returns nothing
local unit u = CreateUnit(Player(15), 'uloc', 0, 0, 0)
local integer i = 16
//Create this trigger with UnitIndexEvents in order add and remove units
//as they are created or removed.
local trigger t = CreateTrigger()
call TriggerRegisterVariableEvent(t, "udg_UnitIndexEvent", EQUAL, 1.00)
call TriggerRegisterVariableEvent(t, "udg_UnitIndexEvent", EQUAL, 2.00)
call TriggerAddCondition(t, Filter(function SetupDmgEv))
set t = null
//Run the configuration trigger to set all configurables:
if gg_trg_Damage_Engine_Config == null then
//It's possible this InitTrig_ function ran first, in which case use ExecuteFunc.
call ExecuteFunc("Trig_Damage_Engine_Config_Actions")
else
call TriggerExecute(gg_trg_Damage_Engine_Config)
endif
//Create trigger for storing all EVENT_UNIT_DAMAGED events.
call CreateDmgEvTrg()
//Create GUI-friendly trigger for cleaning up after UnitDamageTarget.
set udg_ClearDamageEvent = CreateTrigger()
call TriggerAddCondition(udg_ClearDamageEvent, Filter(function PreCheckDamagedLifeEvent))
//Disable SpellDamageAbility for every player.
loop
set i = i - 1
call SetPlayerAbilityAvailable(Player(i), udg_SpellDamageAbility, false)
exitwhen i == 0
endloop
//Preload abilities.
call UnitAddAbility(u, udg_DamageBlockingAbility)
call UnitAddAbility(u, udg_SpellDamageAbility)
call RemoveUnit(u)
set u = null
endfunctionDamage Engine Config
Events
Conditions
(UDexUnits[UDex] is A structure) Equal to False
Actions
-------- - --------
-------- This trigger's conditions let you filter out units you don't want detection for. --------
-------- NOTE: By default, units with Locust will not pass the check. --------
-------- TIP: The unit is called UDexUnits[UDex] and its custom value is UDex --------
-------- - --------
-------- Copy the Cheat Death Ability from Object Editor into your map and set the following variable respectively: --------
-------- - --------
Set Variable Set DamageBlockingAbility = "A008"
-------- - --------
-------- Copy the Detect Spell Damage Ability from Object Editor into your map and set the following variable respectively: --------
-------- - --------
Set Variable Set SpellDamageAbility = "A009"
-------- - --------
-------- You can add extra classifications here if you want to differentiate between your triggered damage --------
-------- Use DamageTypeExplosive (or any negative value damage type) if you want a unit killed by that damage to explode --------
-------- - --------
Set Variable Set DamageTypeExplosive = "-1"
Set Variable Set DamageTypeCriticalStrike = "1"
Set Variable Set DamageTypeHeal = "2"
Set Variable Set DamageTypeReduced = "3"
Set Variable Set DamageTypeBlocked = "4"
-------- - --------
-------- Leave the next Set statement disabled if you modified the Spell Damage Reduction item ability to 1.67 reduction --------
-------- Otherwise, if you removed that ability from Runed Bracers, you'll need to enable this line: --------
-------- - --------
Set Variable Set DmgEvBracers = "brac"
-------- - --------
-------- Set the damage multiplication factor (1.00 being unmodified, increasing in damage over 1.00 and at 0 damage with 0.00) --------
-------- NOTE. With the default values, Runed Bracers is reduces 33%, Elune's Grace reduces 20% and Ethereal increases 67% --------
-------- - --------
Set Variable Set DAMAGE_FACTOR_BRACERS = "0.67"
Set Variable Set DAMAGE_FACTOR_ELUNES = "0.80"
Set Variable Set DAMAGE_FACTOR_ETHEREAL = "1.67"
-------- - --------
-------- Do not enable any of the following lines as they are simply variable declarations to make copying easier --------
-------- - --------
Set Variable Set AfterDamageEvent = (DamageEvent + DamageModifierEvent)
Set Variable Set ClearDamageEvent = (This trigger)
Set Variable Set DamageEventAmount = DamageEventPrevAmt
Set Variable Set DamageEventOverride = NextDamageOverride
Set Variable Set DamageEventSource = DamageEventTarget
Set Variable Set DamageEventTrigger = DmgEvTrig
Set Variable Set DamageEventType = (LastDmgPrevType[0] + NextDamageType)
Set Variable Set DamageEventsWasted = DmgEvRecursionN
Set Variable Set DmgEvRunning = DmgEvStarted
Set Variable Set IsDamageSpell = LastDmgWasSpell[0]
Set Variable Set LastDamageHP = (Elapsed time for DmgEvTimer)
Set Variable Set LastDmgPrevAmount[0] = LastDmgValue[0]
Set Variable Set LastDmgSource[0] = LastDmgTarget[0]
Set Variable Set HideDamageFrom[0] = "false"
Set Variable Set UnitDamageRegistered[0] = "false"
Damage Tag
Events
Game - DamageEvent becomes Equal to 1.00
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DamageEventType Equal to DamageTypeBlocked
Then - Actions
Floating Text - Create floating text that reads (Blocked + !) above DamageEventTarget with Z offset 50.00 , using font size 9.00 , color ( 50.00 %, 50.00 %, 50.00 %), and 0.00 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DamageEventType Equal to DamageTypeCriticalStrike
Then - Actions
Floating Text - Create floating text that reads ((String((Integer(DamageEventAmount)))) + !) above DamageEventTarget with Z offset 50.00 , using font size 9.00 , color ( 100 %, 5.00 %, 10.00 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DamageEventType Equal to DamageTypeHeal
Then - Actions
Floating Text - Create floating text that reads (+ + (String((Integer((Abs(DamageEventAmount))))))) above DamageEventTarget with Z offset 50.00 , using font size 9.00 , color ( 5.00 %, 100.00 %, 10.00 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DamageEventType Equal to DamageTypeReduced
Then - Actions
Floating Text - Create floating text that reads ( + (String((Integer(DamageEventAmount))))) above DamageEventTarget with Z offset 50.00 , using font size 9.00 , color ( 65.00 %, 10.00 %, 65.00 %), and 0 % transparency
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
IsDamageSpell Equal to True
Then - Actions
Floating Text - Create floating text that reads (String((Integer(DamageEventAmount)))) above DamageEventTarget with Z offset 50.00 , using font size 9.00 , color ( 10.00 %, 30.00 %, 100.00 %), and 0 % transparency
Else - Actions
Floating Text - Create floating text that reads (String((Integer(DamageEventAmount)))) above DamageEventTarget with Z offset 50.00 , using font size 9.00 , color ( 100.00 %, 100.00 %, 100.00 %), and 0 % transparency
Trigger - Run Unit_Indexer <gen> (checking conditions)
Floating Text - Set the velocity of (Last created floating text) to 75.00 towards 90.00 degrees
Floating Text - Change (Last created floating text) : Disable permanence
Floating Text - Change the lifespan of (Last created floating text) to 3.75 seconds
Floating Text - Change the fading age of (Last created floating text) to 2.00 seconds
Set Damage
Events
Game - DamageModifierEvent becomes Equal to 1.00
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of DamageEventSource) Equal to Peasant
Then - Actions
Set Variable Set DamageEventAmount = "0.00"
Set Variable Set DamageEventType = DamageTypeBlocked
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
IsDamageSpell Equal to False
(Unit-type of DamageEventSource) Equal to Warlock
Then - Actions
Set Variable Set DamageEventAmount = (0.00 - DamageEventAmount)
Set Variable Set DamageEventType = DamageTypeHeal
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(DamageEventTarget is A Hero) Equal to True
(DamageEventSource is Summoned) Equal to True
Then - Actions
Set Variable Set DamageEventAmount = (0.00 - DamageEventAmount)
Set Variable Set DamageEventType = DamageTypeHeal
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(DamageEventTarget is Summoned) Equal to True
Then - Actions
-------- --------
-------- Summoned units take 150% damage --------
-------- --------
Set Variable Set DamageEventAmount = (DamageEventAmount x 1.50)
Set Variable Set DamageEventType = DamageTypeCriticalStrike
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(DamageEventTarget is Summoned) Equal to True
Then - Actions
-------- --------
-------- Ancient units take 87% damage --------
-------- --------
Set Variable Set DamageEventAmount = (DamageEventAmount x 0.87)
Set Variable Set DamageEventType = DamageTypeCriticalStrike
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UnitMoving[(Custom value of DamageEventTarget)] Equal to True
Then - Actions
-------- --------
-------- Units that are moving take 85% damage --------
-------- --------
Set Variable Set DamageEventAmount = (DamageEventAmount x 0.85)
Set Variable Set DamageEventType = DamageTypeReduced
Else - Actions
Is Unit Moving
Events
Time - Every 0.05 seconds of game time
Game - UnitIndexEvent becomes Equal to 1.00
Game - UnitIndexEvent becomes Equal to 2.00
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
UnitIndexEvent Equal to 0.00
Then - Actions
Set Variable Set UDex = UMovNext[0]
Custom script: loop
Custom script: exitwhen udg_UDex == 0
Custom script: set udg_TempX = GetUnitX(udg_UDexUnits[udg_UDex])
Custom script: set udg_TempY = GetUnitY(udg_UDexUnits[udg_UDex])
Custom script: if udg_TempX != udg_UnitMovingX[udg_UDex] or udg_TempY != udg_UnitMovingY[udg_UDex] then
Set Variable Set UnitMovingX[UDex] = TempX
Set Variable Set UnitMovingY[UDex] = TempY
Custom script: if not udg_UnitMoving[udg_UDex] and GetUnitTypeId(udg_UDexUnits[udg_UDex]) != 0 then
Set Variable Set UnitMoving[UDex] = "true"
Set Variable Set UnitMovingEvent = "1.00"
Set Variable Set UnitMovingEvent = "0.00"
Custom script: endif
Custom script: elseif udg_UnitMoving[udg_UDex] then
Set Variable Set UnitMoving[UDex] = "false"
Set Variable Set UnitMovingEvent = "2.00"
Set Variable Set UnitMovingEvent = "0.00"
Custom script: endif
Set Variable Set UDex = UMovNext[UDex]
Custom script: endloop
Else - Actions
Custom script: if udg_UnitIndexEvent == 1 then
-------- - --------
-------- The next conditions let you filter out unwanted units --------
-------- - --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Default movement speed of UDexUnits[UDex]) Not equal to 0.00
Then - Actions
Set Variable Set UMovPrev[UMovNext[0]] = UDex
Set Variable Set UMovNext[UDex] = UMovNext[0]
Set Variable Set UMovNext[0] = UDex
Custom script: set udg_UnitMovingX[udg_UDex] = GetUnitX(udg_UDexUnits[udg_UDex])
Custom script: set udg_UnitMovingY[udg_UDex] = GetUnitY(udg_UDexUnits[udg_UDex])
Else - Actions
Custom script: elseif udg_UMovPrev[udg_UDex] != 0 or udg_UMovNext[0] == udg_UDex then
Set Variable Set UnitMoving[UDex] = "false"
Set Variable Set UMovNext[UMovPrev[UDex]] = UMovNext[UDex]
Set Variable Set UMovPrev[UMovNext[UDex]] = UMovPrev[UDex]
Set Variable Set UMovPrev[UDex] = "0"
Custom script: endif
Ability Text
Events
Unit - A unit Begins casting an ability
Conditions
Actions
Floating Text - Create floating text that reads (Name of (Ability being cast)) above (Casting unit) with Z offset 0 , using font size 9.25 , color ( 35.00 %, 100 %, 5.00 %), and 0 % transparency
Floating Text - Change (Last created floating text) : Disable permanence
Floating Text - Set the velocity of (Last created floating text) to 58.50 towards 0.00 degrees
Floating Text - Change the lifespan of (Last created floating text) to 3.35 seconds
Floating Text - Change the fading age of (Last created floating text) to 2.25 seconds
Item Remove 1
Events
Time - Elapsed game time is 120.00 seconds
Conditions
Actions
Trigger - Run Item_Remove_2 <gen> (checking conditions)
Item Remove 2
Events
Conditions
Actions
Countdown Timer - Start Item_Remove as a One-shot timer that will expire in (Real(Time_1)) seconds
Countdown Timer - Create a timer window for (Last started timer) with title Items remove
Wait (Real(Time_1)) seconds
Countdown Timer - Destroy (Last created timer window)
Countdown Timer - Hide (Last created timer window)
Item - Pick every item in (Playable map area) and do (Actions)
Loop - Actions
Item - Remove (Picked item)
Trigger - Turn on Item_Remove_3 <gen>
Item Remove 3
Events
Time - Every 1200.00 seconds of game time
Conditions
Actions
Trigger - Run Item_Remove_2 <gen> (checking conditions)
Quest Check
Events
Time - Every 0.01 seconds of game time
Conditions
Actions
Leaderboard - Change the color of the label for Player 1 (Red) in Leaderboard_Quest_1 to ( 90.00 %, 25.00 %, 5.00 %) with 0 % transparency
Leaderboard - Add Player 1 (Red) to Leaderboard_Quest_1 with label (((Kill + (String(Quest_Kill_Count))) + ) + Quest_Unit_Name) and value (Integer(Quest_Kill_Count_Ok))
Random Quest 1
Events
Conditions
Actions
Destructible - Pick every destructible in Region_000 <gen> and do (Actions)
Loop - Actions
Destructible - Remove (Picked destructible)
Unit Group - Pick every unit in (Units in Region_000 <gen>) 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 Quest 0000 <gen>
Then - Actions
Unit - Remove (Picked unit) from the game
Else - Actions
Leaderboard - Create a leaderboard for Player Group - Player 1 (Red) titled Quests
Set Variable Set Leaderboard_Quest_1 = (Last created leaderboard)
Leaderboard - Show Leaderboard_Quest_1
Leaderboard - Change the display style for Leaderboard_Quest_1 to Show the title, Show labels, Show values, and Show icons
Random Quest 2
Events
Unit - A unit Begins casting an ability
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Ability being cast) Equal to Killing Quest
Then - Actions
Trigger - Turn off Kill_Check <gen>
Set Variable Set Quest_Killing_Point = (Random point in Region_002 <gen>)
Set Variable Set Quest_Unit_Integer = (Random integer number between 1 and (((Hero level of Demon Hunter 0003 <gen>) / 3) + 1))
Set Variable Set Quest_Unit = (Random level Quest_Unit_Integer creep unit-type)
Set Variable Set Quest_Kill_Count = (Random integer number between 5 and 10)
Unit - Create Quest_Kill_Count . Quest_Unit for Player 2 (Blue) at Quest_Killing_Point facing Default building facing degrees
Cinematic - Ping minimap for (Player group((Owner of (Casting unit)))) at (Position of (Last created unit)) for 6.00 seconds
Unit - Remove Killing Quest from Quest 0000 <gen>
Item - Remove (Item carried by Quest 0000 <gen> of type |c00EDFB44Killing Quest)
Set Variable Set Quest_Unit_Ok = (Last created unit)
Set Variable Set Quest_Unit_Name = (Name of Quest_Unit_Ok)
Leaderboard - Change the color of the label for Player 1 (Red) in Leaderboard_Quest_1 to ( 90.00 %, 25.00 %, 5.00 %) with 0 % transparency
Leaderboard - Add Player 1 (Red) to Leaderboard_Quest_1 with label (((Kill + (String(Quest_Kill_Count))) + ) + Quest_Unit_Name) and value (Integer(Quest_Kill_Count_Ok))
Trigger - Turn on Random_Quest_Kill_1 <gen>
Trigger - Turn on Units_Ping <gen>
Trigger - Turn on Quest_Check <gen>
Else - Actions
Random Quest Kill 1
Events
Unit - A unit Dies
Conditions
(Unit-type of (Dying unit)) Equal to Quest_Unit
(Owner of (Killing unit)) Equal to Player 1 (Red)
Actions
Set Variable Set Quest_Kill_Count_Ok = (Quest_Kill_Count_Ok + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Quest_Kill_Count_Ok Greater than or equal to (Real(Quest_Kill_Count))
Then - Actions
Leaderboard - Remove Player 1 (Red) from Leaderboard_Quest_1 .
Set Variable Set Quest_Killing_Reward_1 = (Quest_Kill_Count x (Quest_Unit_Integer x 60))
Set Variable Set Quest_Killing_Reward_2 = ((Quest_Kill_Count x 20) x Quest_Unit_Integer)
Game - Display to (All players) for 15.00 seconds the text: |c00B0B504Quest Completed!
Game - Display to (All players) for 15.00 seconds the text: ((|c00EDF73E+ + (String(Quest_Killing_Reward_1))) + |c0018EDF8Gold!)
Game - Display to (All players) for 15.00 seconds the text: ((|c00EDF73E+ + (String(Quest_Killing_Reward_2))) + |c0018EDF8XP!)
Player - Add Quest_Killing_Reward_1 to Player 1 (Red) . Current gold
Hero - Add Quest_Killing_Reward_2 experience to (Killing unit) , Show level-up graphics
Hero - Create |c00EDFB44Killing Quest and give it to Quest 0000 <gen>
Set Variable Set Quest_Kill_Count_Ok = "0.00"
Trigger - Turn on Kill_Check <gen>
Trigger - Turn off (This trigger)
Trigger - Turn off Units_Ping <gen>
Trigger - Turn off Quest_Check <gen>
Else - Actions
Kill Check
Events
Time - Every 0.07 seconds of game time
Conditions
Actions
Set Variable Set Quest_Unit_Integer = (Random integer number between 1 and (((Hero level of Demon Hunter 0003 <gen>) / 3) + 1))
Units Ping
Events
Time - Every 25.00 seconds of game time
Conditions
Actions
Cinematic - Ping minimap for Player Group - Player 1 (Red) at (Position of Quest_Unit_Ok) for 6.00 seconds
MS
Events
Player - Player 1 (Red) types a chat message containing -ms (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Game - Display to Player Group - Player 1 (Red) the text: (Your speed is + (String((Current movement speed of Demon Hunter 0003 <gen>))))
HP
Events
Player - Player 1 (Red) types a chat message containing -hp (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Game - Display to Player Group - Player 1 (Red) the text: (Your max hp is + (String((Max life of Demon Hunter 0003 <gen>))))
MP
Events
Player - Player 1 (Red) types a chat message containing -mp (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Game - Display to Player Group - Player 1 (Red) the text: (Your max mp is + (String((Max mana of Demon Hunter 0003 <gen>))))
XP
Events
Player - Player 1 (Red) types a chat message containing -xp (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Game - Display to Player Group - Player 1 (Red) the text: (Your xp rate is + ((String(Xp_Rate_1)) + %))
Roll
Events
Player - Player 1 (Red) types a chat message containing -roll (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Game - Display to Player Group - Player 1 (Red) the text: (Your roll is + (String((Random integer number between 1 and 100))))
Info
Events
Map initialization
Conditions
Actions
Quest - Create a Optional quest titled Developer with the description |c00FC1D2ELord Mahdi|rVersion: |c00DEF9201.08a , using icon path ReplaceableTextures\CommandButtons\BTNSelectHeroOn.blp
Quest - Create a Optional quest titled Random Quest System with the description |c0021D8F8By pressing F1 select your quest activator and activate every quest you want from it's inventory. , using icon path ReplaceableTextures\CommandButtons\BTNSelectHeroOn.blp
Quest - Create a Optional quest titled Email with the description |[email protected] , using icon path ReplaceableTextures\CommandButtons\BTNSelectHeroOn.blp
Quest - Create a Optional quest titled Wandering Heroes with the description |c0021D8F8These wandering heroes are looking for you to kill you! beware! they will every moment more powerful than before. , using icon path ReplaceableTextures\CommandButtons\BTNSelectHeroOn.blp
Quest - Create a Optional quest titled Difficulity with the description |c0023D8F8Normal:All enemy units gets normal stats.Hard: (+10% exp rate)Enemies gets: 10% attack speed and move speed and damage.Expert: (+25% exp rate)Enemies gets: 25% attack speed and damage and 15% move speed.Nightmare: (+50% exp rate)Enemies gets: 50% attack speed and damage and 20% move speed. , using icon path ReplaceableTextures\CommandButtons\BTNSelectHeroOn.blp
Quest - Create a Optional quest titled Commands with the description |c0021D8F8-ms (Show your hero's move speed)-hp (Show your hero's max hp)-mp (Show your hero's max mp)-xp (Show your hero's xp rate)-roll (dice a roll between 1 and 100) , using icon path ReplaceableTextures\CommandButtons\BTNSelectHeroOn.blp
Xp rate 1 A
Events
Time - Every 0.01 seconds of game time
Conditions
Actions
Set Variable Set Xp_Rate_1 = (Xp_Rate_Ok_1 + ((Intelligence of Demon Hunter 0003 <gen> (Exclude bonuses)) / 12))
Hero - Make Player 1 (Red) Heroes gain (Real(Xp_Rate_1)) % experience from future kills
Dif 1
Events
Time - Elapsed game time is 12.00 seconds
Conditions
Actions
Trigger - Run Dif_3 <gen> (checking conditions)
Dialog - Change the title of Dif_Dialog to Difficulity
Dialog - Create a dialog button for Dif_Dialog labelled Normal
Set Variable Set Dif_Dialog_B_1 = (Last created dialog Button)
Dialog - Create a dialog button for Dif_Dialog labelled Hard
Set Variable Set Dif_Dialog_B_2 = (Last created dialog Button)
Dialog - Create a dialog button for Dif_Dialog labelled Expert
Set Variable Set Dif_Dialog_B_3 = (Last created dialog Button)
Dialog - Create a dialog button for Dif_Dialog labelled Nightmare
Set Variable Set Dif_Dialog_B_4 = (Last created dialog Button)
Dialog - Show Dif_Dialog for Player 1 (Red)
Dif 2
Events
Dialog - A dialog button is clicked for Dif_Dialog
Conditions
Actions
Trigger - Run Dif_4 <gen> (checking conditions)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Clicked dialog button) Equal to Dif_Dialog_B_1
Then - Actions
Game - Display to (All players) the text: Normal difficulity selected.
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Clicked dialog button) Equal to Dif_Dialog_B_2
Then - Actions
Game - Display to (All players) the text: Hard difficulity selected.
Player - Set Player 2 (Blue) handicap to 115.00 %
Hero - Make Player 1 (Red) Heroes gain ((Player 1 (Red) experience rate) + 10.00) % experience from future kills
Trigger - Turn on Dif_5 <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Clicked dialog button) Equal to Dif_Dialog_B_3
Then - Actions
Game - Display to (All players) the text: Expert difficulity selected.
Player - Set Player 2 (Blue) handicap to 130.00 %
Hero - Make Player 1 (Red) Heroes gain ((Player 1 (Red) experience rate) + 25.00) % experience from future kills
Trigger - Turn on Dif_6 <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Clicked dialog button) Equal to Dif_Dialog_B_4
Then - Actions
Game - Display to (All players) the text: Nightmare difficulity selected.
Player - Set Player 2 (Blue) handicap to 150.00 %
Hero - Make Player 1 (Red) Heroes gain ((Player 1 (Red) experience rate) + 50.00) % experience from future kills
Trigger - Turn on Dif_7 <gen>
Else - Actions
Dialog - Clear Dif_Dialog
function Trig_Dif_3_Actions takes nothing returns nothing
call CinematicModeBJ( false, bj_FORCE_PLAYER[0] )
endfunction
//===========================================================================
function InitTrig_Dif_3 takes nothing returns nothing
set gg_trg_Dif_3 = CreateTrigger( )
call TriggerAddAction( gg_trg_Dif_3, function Trig_Dif_3_Actions )
endfunction
function Trig_Dif_4_Actions takes nothing returns nothing
call CinematicModeBJ( true, bj_FORCE_PLAYER[0] )
call DisplayTimedTextToForce( GetPlayersAll(), 3600.00, "TRIGSTR_652" )
endfunction
//===========================================================================
function InitTrig_Dif_4 takes nothing returns nothing
set gg_trg_Dif_4 = CreateTrigger( )
call TriggerAddAction( gg_trg_Dif_4, function Trig_Dif_4_Actions )
endfunction
Dif 5
Events
Unit - A unit enters Region_003 <gen>
Conditions
(Owner of (Entering unit)) Equal to Player 2 (Blue)
Actions
Unit - Add Damage to (Entering unit)
Unit - Add Attack Speed (Neutral Hostile) to (Entering unit)
Unit - Set level of Damage for (Entering unit) to 1
Unit - Set level of Attack Speed (Neutral Hostile) for (Entering unit) to 1
Dif 6
Events
Unit - A unit enters Region_003 <gen>
Conditions
(Owner of (Entering unit)) Equal to Player 2 (Blue)
Actions
Unit - Add Damage to (Entering unit)
Unit - Add Attack Speed (Neutral Hostile) to (Entering unit)
Unit - Set level of Damage for (Entering unit) to 2
Unit - Set level of Attack Speed (Neutral Hostile) for (Entering unit) to 2
Dif 7
Events
Unit - A unit enters Region_003 <gen>
Conditions
(Owner of (Entering unit)) Equal to Player 2 (Blue)
Actions
Unit - Add Damage to (Entering unit)
Unit - Add Attack Speed (Neutral Hostile) to (Entering unit)
Unit - Set level of Damage for (Entering unit) to 3
Unit - Set level of Attack Speed (Neutral Hostile) for (Entering unit) to 3
Load Game
Events
Game - A saved game is loaded
Conditions
Actions
Game - Display to Player Group - Player 1 (Red) the text: (Welcome back + (Name of Player 1 (Red)))