local group g = CreateGroup()
call GroupEnumUnitsInRange(g, x, y, 300.0, null)
call ForGroup(g,function Ololo)
call GroupClear(g)
call DestroyGroup(g)
set g = null

globals
    group pGroup = CreateGroup()
    boolexpr pAction
endglobals

function Ololo takes nothing returns boolean
    //действия с юнитом, брать GetFilterUnit()
    return false
endfunction

function lol takes nothing returns nothing
    call GroupEnumUnitsInRange(g, x, y, 300.0, pAction)
endfunction

//куда-нибудь, что срабатывает при ините, должно быть ниже по коду
function Init takes nothing returns nothing
    set pAction = Filter(function Ololo)
endfunction

SetWidgetLife(unit,GetWidgetLife(unit)+50)