function Trig_Hado_90_Actions takes nothing returns nothing 
    set udg_Move = GetSpellTargetLoc()
    call PlaySoundFromOffsetBJ( gg_snd_Aizen_Sousuke___Hadou90Zvuk, 100, 1.00 )
    call CreateNUnitsAtLoc( 1, 'h013', GetOwningPlayer(udg_TrigerUnit), udg_Move, 0.00 )
    call SetUnitLifeBJ( GetLastCreatedUnit(), 65.00 )
    call GroupAddUnitSimple( GetLastCreatedUnit(), udg_OtratALL[56] )
    call SetUnitUserData(bj_lastCreatedUnit,udg_Index)
    call RemoveLocation(udg_Move)
endfunction

//===========================================================================
function InitTrig_Hado_90 takes nothing returns nothing
    set gg_trg_Hado_90 = CreateTrigger(  )
    call TriggerAddAction( gg_trg_Hado_90, function Trig_Hado_90_Actions )
endfunction



function Trig_Hado_90_2 takes nothing returns boolean
    return (IsUnitEnemy(GetFilterUnit(), GetOwningPlayer(udg_TrigerUnit)) == true )   
endfunction

function Trig_Hado_90 takes nothing returns nothing
    local unit target = GetEnumUnit()
    set udg_Move1 = GetUnitLoc(target)
    call UnitDamageTargetBJ(udg_TrigerUnitMass[udg_Index],target,(I2R( GetHeroStr(udg_TrigerUnitMass[udg_Index], true)) * 100.00 ), ATTACK_TYPE_NORMAL, DAMAGE_TYPE_MAGIC )
    call TriggerExecute(gg_trg_Stan3)
     set target=null
endfunction
function Trig_Hado_90_1 takes nothing returns nothing
     set udg_TrigerUnit = GetEnumUnit()
     set udg_Index =GetUnitUserData(udg_TrigerUnit)
     call SetUnitLifeBJ( udg_TrigerUnit, GetUnitState(udg_TrigerUnit,UNIT_STATE_LIFE) - 2)
    if ( GetUnitState(udg_TrigerUnit,UNIT_STATE_LIFE )<= 2 ){
     set udg_Move = GetUnitLoc(udg_TrigerUnit)
     set udg_Otrat = GetUnitsInRangeOfLocMatching(325, udg_Move, function Trig_Hado_90_2)
        call RemoveUnit(udg_TrigerUnit)
        call ForGroup( udg_Otrat, function Trig_Hado_90 )
        call RemoveLocation(udg_Move)
        call DestroyGroup(udg_Otrat)
    }
endfunction

function Trig_Hado_90_1_Actions takes nothing returns nothing
    call ForGroupBJ( udg_OtratALL[56], function Trig_Hado_90_1 )
endfunction

//===========================================================================
function InitTrig_Hado_90_1 takes nothing returns nothing
    set gg_trg_Hado_90_1 = CreateTrigger(  )
    call TriggerAddAction( gg_trg_Hado_90_1, function Trig_Hado_90_1_Actions )
endfunction

function Trig_Stan3_Actions takes nothing returns nothing
     local unit u = CreateUnitAtLoc( GetOwningPlayer(udg_TrigerUnit), 'h019', udg_Move1,  0.00 )
    call UnitAddAbilityBJ( 'A00J', u )
    call IssueImmediateOrder( u, "stomp" )
    call UnitApplyTimedLifeBJ( 0.01, 'BTLF', u )
    call RemoveLocation(udg_Move1)
    set u =null
endfunction

//===========================================================================
function InitTrig_Stan3 takes nothing returns nothing
    set gg_trg_Stan3 = CreateTrigger(  )
    call TriggerAddAction( gg_trg_Stan3, function Trig_Stan3_Actions )
endfunction **