function F1 takes location l returns boolean
local group g
local unit u = null
local integer i = 0
local integer r = 0
call GroupEnumUnitsInRangeOfLoc(g, l, 25, null)
loop
set u = FirstOfGroup(g)
exitwhen (i == 1) or (u == null)
if (IsPlayerAlly(GetOwningPlayer(u), GetOwningPlayer(udg_Uc)) == true) and (u != null) then
set i = 1
set r = 1
endif
endloop
if r == 1 then
return false 
else
return true
endif
endfunction

function Trig_CTAgu9I_2_Actions takes nothing returns nothing
    set udg_i = 1
    loop
        exitwhen udg_i > ( GetUnitAbilityLevelSwapped('A000', udg_Uc) + 4 )
set b = F1(GetUnitLoc(udg_u[udg_i]))
        if (b == true) and ( IsUnitAliveBJ(udg_u[udg_i]) == true) then
            set udg_a2 = ( udg_a + GetRandomReal(-40.00, 40.00) )
            call SetUnitPositionLocFacingBJ( udg_u[udg_i], PolarProjectionBJ(GetUnitLoc(udg_u[udg_i]), 20.00, udg_a2), udg_a2 )
        else
            call UnitDamagePointLoc( udg_u[udg_i], 50.00, 25.00, GetUnitLoc(udg_u[udg_i]), ( 40.00 + ( 10.00 * I2R(GetUnitAbilityLevelSwapped('A000', udg_Uc)) ) ), ATTACK_TYPE_NORMAL, DAMAGE_TYPE_MAGIC )
            call KillUnit( udg_u[udg_i] )
        endif
        set udg_i = udg_i + 1
    endloop
endfunction

//...
loop
  set u = FirstOfGroup(g)
  exitwhen (i == 1) or (u == null)
  if (IsPlayerAlly(GetOwningPlayer(u), GetOwningPlayer(udg_Uc)) == true) and (u != null) then
    set i = 1
    set r = 1
  endif
endloop
//...