local group Group = CreateGroup()
...
call GroupEnumUnitsInRange(Group,X,Y,120,null)
loop
set Picked = FirstOfGroup(Group)
exitwhen Secret_Pirouette_Filter(Caster,Picked) == true or Picked == null
call GroupRemoveUnit(Group,Picked)
endloop
...
call DestroyGroup(Group)
set Group = null

// c_temp и t_temp - глобальные переменные
// gr_temp - Глобальная, всегда пустая группа, создання для переборов юнитов

// JASS
function foo takes nothing returns boolean
   if t_temp == null and SecretPirouetteFilter (c_temp, GetFilterUnit()) then
       set t_temp = GetFilterUnit()
   endif
   return false
endfunction
...
set c_temp = Caster
set t_temp = null
call GroupEnumUnitsInRange (gr_temp, x, y, 120., Condition(function Foo))

// cJass
c_temp = Caster
t_temp = null
GroupEnumUnitsInRange (gr_temp, x, y, 120., Condition(lambda boolean () {
   if (t_temp == null && SecretPirouetteFilter (c_temp, GetFilterUnit()) {
       t_temp = GetFilterUnit()   
   }
   return false      
}))