function Trig_GatesRecovery_Actions takes nothing returns nothing
 call DisplayTextToPlayer(Player(0),0,0,"Start Recovery actions")
 call DisplayTextToPlayer(Player(0),0,0,"GetSpellTargetDestructable()="+GetDestructableName(GetSpellTargetDestructable()))
    if ( GetSpellAbilityId() == 'Ahrp' ) then
        local integer a = 0
        loop
            exitwhen a > 3
            if ( GetSpellTargetDestructable() == udg_gates[a] ) then
                if (udg_IsGateDead[a] == false) then
                    return
                endif
                call DisplayTextToPlayer(Player(0),0,0,R2S(DistanceBetweenPoints(GetUnitLoc(GetSpellA  bilityUnit()), GetDestructableLoc(udg_gates[a]))))
                if (udg_IsGateDead[a] == false) then
                    if ( NumberOfBuildersNearGate(a)!=0 ) then
                        call DisableTrigger( gg_trg_MarkDeadGates )
                        call ModifyGateBJ( bj_GATEOPERATION_OPEN, udg_gates[a] )
                        call SetDestructableLife( udg_gates[a], 0.00 )
                        call EnableTrigger( gg_trg_MarkDeadGates )
                    else
                        call ModifyGateBJ( bj_GATEOPERATION_CLOSE, udg_gates[a] )
                        call SetDestructableLife( udg_gates[a], udg_GatesLife[a] )
                    endif
                endif
                if ((udg_IsGateDead[a] == true) && ( GetDestructableLife(udg_gates[a]) > 0.00 ) && (DistanceBetweenPoints(GetUnitLoc(GetSpellAbilityUnit()), GetDestructableLoc(udg_gates[a])) < 600) ) then
                    call DisplayTextToPlayer(Player(0),0,0,"Begin with gates number"+I2S(a))
                    set udg_IsGateDead[a] = false
                    call SetDestructableLife(udg_gates[a],500.00)
                    set udg_GatesLife[a]=GetDestructableLife(udg_gates[a])
                    call GatesActions(a,GetSpellAbilityUnit())
                endif
            endif
            set a = a + 1
        endloop
        call MoveForce()
    endif
endfunction

//===========================================================================
function InitTrig_GatesRecovery takes nothing returns nothing
    set gg_trg_GatesRecovery = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_GatesRecovery, EVENT_PLAYER_UNIT_SPELL_FINISH )
    call TriggerAddAction( gg_trg_GatesRecovery, function Trig_GatesRecovery_Actions )
endfunction