function callback takes nothing returns nothing
...
local group auraGroup = LoadGroupHandle(...)    // группа с юнитами на которых действует аура
local group tempGroup = CreateGroup()
...
call GroupEnumUnitsInRange(tempGroup,....) 	  // собираем юнитов на которых должна действовать аура
loop		// Перебираем старую группу
	set i = BlzGroupGetSize(auraGroup) - 1
	exitwhen i < 0 
	set tempUnit = BlzGroupUnitAt(auraGroup,i)
	set oldBonus = GetSavedBonus(tempUnit)
	if not IsUnitInGroup(tempUnit,tempGroup) then 		// юнит вне зоны действия ауры
		call AddStatBonus(tempUnit,-oldBonus)
		call GroupRemoveUnit(auraGroup,tempUnit)
		call SaveStatBonus(tempUnit,0)
	else
		set newBonus = CalcNewBonus(tempUnit)	// Просчитываем новый бонус
		if newBonus != oldBonus then
			call AddStatBonus(tempUnit,newBonus - oldBonus)
			call SaveStatBonus(tempUnit,newBonus)
		endif
		call GroupRemoveUnit(tempGroup,tempUnit)	// удаляем из временной группы, что бы не проходтся по нему дважды
	endif
	
	set i = i - 1
endloop
loop	// перебираем юнитов вокруг владельца ауры, ищем на кого надо добавить эффект ауры
	set tempUnit = FirstOfGroup(tempGroup)
	exitwhen tempUnit == null
	if UnitCanHaveAura(tempUnit) then
		set newBonus = CalcNewBonus(tempUnit)
		call AddStatBonus(tempUnit,newBonus)
		call SaveStatBonus(tempUnit,newBonus)
		call GroupAddUnit(auraGroup,tempUnit)
	endif
	call GroupRemoveUnit(tempGroup,tempUnit)
endloop
call DestroyGroup(tempGroup)
...