((код jass

private static method m1 takes nothing returns nothing
set g = CreateGroup()
call GroupEnumUnitsInRange(g, x, y, r, null)
set F = FirstOfGroup(g)
loop
exitwhen F == null
if IsUnitEnemy(F, GetOwningPlayer(a)) == true and IsUnitType(F, UNIT_TYPE_DEAD) == false then
call UnitDamageTarget(a, F, DAMAGE, false, false, ATTACK_TYPE_NORMAL, DAMAGE_TYPE_DIVINE, null)
endif
call GroupRemoveUnit(g, F)
set F = FirstOfGroup(g)
endloop
call DestroyGroup(g)
endmethod
))

((код jass

private static method func2 takes nothing returns boolean
if IsUnitEnemy(F, GetOwningPlayer(a)) == true and IsUnitType(F, UNIT_TYPE_DEAD) == false then
call UnitDamageTarget(a, F, DAMAGE, false, false, ATTACK_TYPE_NORMAL, DAMAGE_TYPE_DIVINE, null)
endif
return false
endmethod

private static method func1 takes nothing returns nothing
local group g=CreateGroup()
call GroupEnumUnitsInRange(g,x,y,r,thistype.func2)
call GroupClear(g)
DestroyGroup(g)
g=null
endmethod
))