MotherLink
    Events
        Time - Every 0.50 seconds of game time
    Conditions
        (Number of units in (Units in (Playable map area) matching ((Unit-type of (Matching unit)) Equal to Ancient Protector))) Greater than 0
    Actions
        Unit Group - Pick every unit in (Units in (Playable map area) matching ((Unit-type of (Matching unit)) Equal to Ancient Protector)) and do (Actions)
            Loop - Actions
                If (All Conditions are True) then do (Then Actions) else do (Else Actions)
                    If - Conditions
                        (Number of units in (Units within 10000.00 of (Position of (Picked unit)) matching ((Unit-type of (Matching unit)) Equal to Ancient Protector))) Greater then 0
                    Then - Actions
                        Unit - Set level of Mother Link for (Picked unit) to 10
                    Else - Actions
                If (All Conditions are True) then do (Then Actions) else do (Else Actions)
                    If - Conditions
                        (Number of units in (Units within 9000.00 of (Position of (Picked unit)) matching ((Unit-type of (Matching unit)) Equal to Ancient Protector))) Greater then 0
                    Then - Actions
                        Unit - Set level of Mother Link for (Picked unit) to 9
                    Else - Actions

function Trig_MotherLink_Copy_Copy_Func002001001002 takes nothing returns boolean
    return ( GetUnitTypeId(GetFilterUnit()) == 'hgry' )
endfunction

function Trig_MotherLink_Copy_Copy_Conditions takes nothing returns boolean
    if ( not ( CountUnitsInGroup(GetUnitsInRectMatching(GetPlayableMapRect(), Condition(function Trig_MotherLink_Copy_Copy_Func002001001002))) > 0 ) ) then
        return false
    endif
    return true
endfunction

function Trig_MotherLink_Copy_Copy_Actions takes nothing returns nothing
    local unit u1
    local unit u2
    set bj_forLoopAIndex = 1
    set bj_forLoopAIndexEnd = 32
    loop
        set u1 = udg_NatureTowers[GetForLoopIndexA()]
        set u2 = udg_AncientProtectors[GetForLoopIndexA()]
        exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
        set bj_forLoopBIndex = 1
        set bj_forLoopBIndexEnd = 10
        loop
            exitwhen bj_forLoopBIndex > bj_forLoopBIndexEnd
            if (SquareRoot((GetUnitX(u1) - GetUnitX(u2))*(GetUnitX(u1) - GetUnitX(u2)) + (GetUnitY(u1) - GetUnitY(u2))*(GetUnitY(u1) - GetUnitY(u2))) <= 11000 - GetForLoopIndexB()*1000) then
              call SetUnitAbilityLevelSwapped( 'Aakb', udg_AncientProtectors[GetForLoopIndexA()], 11 - GetForLoopIndexB() )
            endif
            set bj_forLoopBIndex = bj_forLoopBIndex + 1
        endloop
        set bj_forLoopAIndex = bj_forLoopAIndex + 1
    endloop
endfunction

//===========================================================================
function InitTrig_MotherLink takes nothing returns nothing
    set gg_trg_MotherLink = CreateTrigger(  )
    call TriggerRegisterTimerEventPeriodic( gg_trg_MotherLink, 0.05 )
    call TriggerAddCondition( gg_trg_MotherLink, Condition( function Trig_MotherLink_Copy_Copy_Conditions ) )
    call TriggerAddAction( gg_trg_MotherLink, function Trig_MotherLink_Copy_Copy_Actions )
endfunction