function Trig_mec_Actions takes nothing returns nothing
local unit a = GetSpellAbilityUnit()
local unit array b
local integer q
local unit array c
set q = 1
loop
exitwhen q == 100
call CreateUnit(GetOwningPlayer(a),'h00D', GetSpellTargetX() + GetRandomReal(-700., 700.), GetSpellTargetY() + GetRandomReal(-700., 700.), 270.)
set b[ку] = GetLastCreatedUnit ()
call CreateUnit(GetOwningPlayer(a),'h00D', GetSpellTargetX() + GetRandomReal(-700., 700.), GetSpellTargetY() + GetRandomReal(-700., 700.), 270.)
set c[ку] = GetLastCreatedUnit ()
call IssueImmediateOrder(b[ку], "stomp")
call UnitApplyTimedLife(b[ку],'h00D',2)
call IssueImmediateOrder(c[ку], "stomp")
call UnitApplyTimedLife(c[ку],'h00D',2)
call TriggerSleepAction (0.05)
set q = q+1
endloop

endfunction
function Trig_mec_Condition takes nothing returns boolean    
return GetSpellAbilityId() == 'A00P'    
endfunction    
//===========================================================================
function InitTrig_mec takes nothing returns nothing
local integer i = 0    
       set gg_trg_mec = CreateTrigger(  )
       call TriggerAddAction( gg_trg_mec, function Trig_mec_Actions )
call TriggerAddCondition( gg_trg_mec, Condition(function Trig_mec_Condition) )    
loop    
             call TriggerRegisterPlayerUnitEvent( gg_trg_mec, Player(i), EVENT_PLAYER_UNIT_SPELL_EFFECT, null )    
             set i = i + 1    
exitwhen i > 11    
endloop     
endfunction

function Trig_mec_Actions takes nothing returns nothing
set udg_a = GetSpellAbilityUnit()
set udg_x1 = GetSpellTargetX()
set udg_y1 = GetSpellTargetY()
EnableTrigger (gg_trg_mec_1)
TriggerSleepAction (5)
DisableTrigger(gg_trg_mec_1)

endfunction
function Trig_mec_Condition takes nothing returns boolean  
return GetSpellAbilityId() == 'A00P'  
endfunction  
//===========================================================================
function InitTrig_mec takes nothing returns nothing
local integer i = 0  
     set gg_trg_mec = CreateTrigger(  )
     call TriggerAddAction( gg_trg_mec, function Trig_mec_Actions )
call TriggerAddCondition( gg_trg_mec, Condition(function Trig_mec_Condition) )  
loop  
           call TriggerRegisterPlayerUnitEvent( gg_trg_mec, Player(i), EVENT_PLAYER_UNIT_SPELL_EFFECT, null )  
           set i = i + 1  
exitwhen i > 11  
endloop   
endfunction  

function Trig_mec_1_Actions takes nothing returns nothing
local unit array b
local integer q = 1
set b[q1] = CreateUnit(GetOwningPlayer(udg_a),'h00D', udg_x1 + GetRandomReal(-700., 700.), udg_y1 + GetRandomReal(-700., 700.), 270.)
call IssueImmediateOrder(b[q1], "stomp")
call UnitApplyTimedLife(b[q1],'h00D',2)
set q = q+1
endfunction

//===========================================================================
function InitTrig_mec_1 takes nothing returns nothing
     set gg_trg_mec_1 = CreateTrigger(  )
  call DisableTrigger( gg_trg_mec_1 )
     call TriggerRegisterTimerEventPeriodic( gg_trg_mec_1, 0.09 )
     call TriggerAddAction( gg_trg_mec_1, function Trig_mec_1_Actions )
endfunction

function Trig_razduv_1 takes nothing returns nothing  
local unit m = GetSpellAbilityUnit()  
call UnitDamageTargetBJ( m, GetEnumUnit(),(I2R(GetHeroStatBJ(bj_HEROSTAT_INT, m, true)) * 400.00 ), ATTACK_TYPE_HERO, DAMAGE_TYPE_COLD )  
endfunction  
function Trig_razduv_Actions takes nothing returns nothing  
local integer a = 1  
local integer b = 6  
local unit m = GetSpellAbilityUnit()  
local unit t  
local real c = 0  
local real g = 300  
local effect array u  
local real x  
local real y  
local location r = Location (x,y)  

call SetUnitInvulnerable( m, true )  
call PauseUnit(m, true)  
loop  
exitwhen a > b  
call SetUnitScalePercent( m, (I2R(a) * 100.00 ), ( I2R(a) * 100.00 ), ( I2R(a) * 100.00 ) )  
call TriggerSleepAction( 0.50 )  
set a = a + 1  
endloop  
call CreateNUnitsAtLoc( 1, 'h009', GetOwningPlayer(m), GetUnitLoc(m), bj_UNIT_FACING )  
set t = GetLastCreatedUnit()  
set a = 1  
set x = GetUnitX(m) + g * Cos(c * bj_DEGTORAD)  
set y = GetUnitY(m) + g * Sin(c * bj_DEGTORAD)  
loop  
exitwhen a == 13  
set u[a] = AddSpecialEffectLoc("Doodads\\Cinematic\\RisingWaterDoodad\\RisingWaterDoodad.mdl",r)  
set c = ( c + 30.00 )  
set a = a + 1  
endloop  

set g = 700  
set x = GetUnitX(m) + g * Cos(c * bj_DEGTORAD)  
set y = GetUnitY(m) + g * Sin(c * bj_DEGTORAD)  
loop  
exitwhen a == 26  
set u[a] = AddSpecialEffectLoc("Doodads\\Cinematic\\RisingWaterDoodad\\RisingWaterDoodad.mdl",r)  
set c = ( c + 30.00 )  
set a = a + 1  
endloop  

set g = 1200  
set x = GetUnitX(m) + g * Cos(c * bj_DEGTORAD)  
set y = GetUnitY(m) + g * Sin(c * bj_DEGTORAD)  
loop  
exitwhen a == 37  
set u[a] = AddSpecialEffectLoc("Doodads\\Cinematic\\RisingWaterDoodad\\RisingWaterDoodad.mdl",r)  
set c = ( c + 30.00 )  
set a = a + 1  
endloop  
call TriggerSleepAction( 0.50 )  
call SetUnitScalePercent( m, 100.00, 100.00, 100.00 )  

call KillUnit(m)  
call SetUnitInvulnerable( m, false )  
call PauseUnit(m, false)  
call TriggerSleepAction( 15.00 )  
call RemoveUnit(t)  
set a = 1  
set b = 36  
loop  
exitwhen a > b  
call DestroyEffect(u[a])  
set u[a]=null  
set a = a + 1  
endloop  
if (IsUnitAlly ( GetFilterUnit(), GetOwningPlayer(m))==false) and (IsUnitEnemy (GetFilterUnit(),GetOwningPlayer(m))==true) then  
call ForGroup(GetUnitsInRangeOfLocAll(1200.00,GetUnitLoc(m)),function Trig_razduv_1)  
endif  
set t = null  
set m = null  
set x = 0  
set y = 0  
endfunction  

function Trig_razduv_Condition takes nothing returns boolean  
return GetSpellAbilityId() == 'A00F'  
endfunction  
//===========================================================================  
function InitTrig_razduv takes nothing returns nothing  
local integer i = 0  
set gg_trg_razduv = CreateTrigger( )  
call TriggerAddCondition( gg_trg_razduv, Condition( function Trig_razduv_Condition ) )  
call TriggerAddAction( gg_trg_razduv, function Trig_razduv_Actions )  
loop  
call TriggerRegisterPlayerUnitEvent( gg_trg_razduv, Player(i), EVENT_PLAYER_UNIT_SPELL_EFFECT, null )  
set i = i + 1  
exitwhen i > 11  
endloop  
endfunction