globals
    timer AuraTimer = null
    boolexpr AuraFilter
    constant player bj_AllyPlayer = Player( 9 )
endglobals

function Boolexpr_Resistance_Aura_Conditions takes nothing returns boolean
    set bj_lastFilterUnit = GetFilterUnit( )
    return GetUnitState( bj_lastFilterUnit, UNIT_STATE_LIFE ) > 0.405 and IsUnitAlly( bj_lastFilterUnit, bj_AllyPlayer ) and not ( GetOwningPlayer( bj_lastFilterUnit ) == bj_PLAYER_NEUTRAL_AGGRESSIVE or IsUnitType( bj_lastFilterUnit, UNIT_TYPE_STRUCTURE ) )
endfunction

function AddOrDeleteResistance takes nothing returns nothing
    set bj_lastReplacedUnit = GetEnumUnit( )
    set bj_forLoopBIndex = GetUnitAbilityLevel( bj_lastReplacedUnit, 'B00F' ) // бафф защитной ауры
    set bj_forLoopBIndexEnd = GetUnitAbilityLevel( bj_lastReplacedUnit, 'A03U' ) // спеллбук
   
   
    if bj_forLoopBIndex == 1 and bj_forLoopBIndexEnd == 0 then
        call UnitAddAbility( bj_lastReplacedUnit, 'A03U' )
        call UnitMakeAbilityPermanent( bj_lastReplacedUnit, true, 'A03U' )
        call UnitMakeAbilityPermanent( bj_lastReplacedUnit, true, 'A03T' )
        call SetUnitAbilityLevel( bj_lastReplacedUnit, 'A03T', bj_forLoopAIndex )
    endif

    if bj_forLoopBIndex == 0 and bj_forLoopBIndexEnd == 1 then
        call SetUnitAbilityLevel( bj_lastReplacedUnit, 'A03T', 1 )
    endif
    
    if bj_forLoopBIndex == 1 and bj_forLoopBIndexEnd == 1 then
        call SetUnitAbilityLevel( bj_lastReplacedUnit, 'A03T', bj_forLoopAIndex )
    endif
    
    set bj_lastReplacedUnit = null
    set bj_forLoopBIndex = 0
    set bj_forLoopBIndexEnd = 0
endfunction

function Timer_Resistance_Aura_Actions takes nothing returns nothing
    set bj_forLoopAIndex = GetDataBX( GetExpiredTimer( ) )
    call GroupClear( gg_grp_TempGroup )
    call GroupEnumUnitsInRect( gg_grp_TempGroup, bj_mapInitialPlayableArea, AuraFilter )
    call ForGroup( gg_grp_TempGroup, function AddOrDeleteResistance )
endfunction

function Trig_Resistance_Aura_Actions takes nothing returns nothing
    local unit Runner = GetTriggerUnit( )
    local integer Level = GetUnitAbilityLevel( Runner, 'A03S' )
    
    if Level == 1 then
        if AuraTimer != null then
            call RemoveDataBX( AuraTimer )
            call DestroyTimer( AuraTimer )
        endif
        set AuraTimer = CreateTimer( )
        set AuraFilter = Condition( function Boolexpr_Resistance_Aura_Conditions )
        call SetDataBX( AuraTimer, Level + 1 )
        call TimerStart( AuraTimer, 1.01, true, function Timer_Resistance_Aura_Actions )
        call UnitAddAbility( Runner, 'A03U' )
        call SetUnitAbilityLevel( Runner, 'A03T', Level+1 )
    else
        call SetDataBX( AuraTimer, Level + 1 )
    endif
    set Runner = null
endfunction

//===========================================================================
function InitTrig_Resistance_Aura takes nothing returns nothing
endfunction