Можно сделать функцию которая вернет труе если юнит союзник тому кто применил заклинание, чет не получается.

Определенно можно.
Если бы еще авто догадался показать код, где используется подобная конструкция...

function Unit_Filte takes nothing returns boolean
return IsPlayerAlly(GetOwningPlayer(GetFilterUnit()), GetOwningPlayer(GetSpellAbilityUnit))
endfunction

function Moon_Actions takes nothing returns nothing
local integer r = GetRandomInt(1, 100)
local group g = CreateGroup()
local unit f

if ( r <= 15) then
call GroupEnumUnitsInRange(g, GetUnitX(GetSpellAbilityUnit), GetUnitY(GetSpellAbilityUnit), 700, Condition(function Unit_Filte))
loop
set f = FirstOfGroup(g)
exitwhen f == null
call SetUnitState(f, UNIT_STATE_LIFE, RMaxBJ(0, 20 + ( 5 * GetUnitAbilityLevel(GetSpellAbilityUnit, GetSpellAbilityId))))
endloop
endif
endfunction

function Moon_C takes nothing returns boolean
return GetUnitAbilityLevel(GetSpellAbilityUnit, 'A000') > 0
endfunction

===========================================================================
function InitTrig_moon takes nothing returns nothing
set gg_trg_moon = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_moon, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddAction( gg_trg_moon, function Moon_Actions )
call TriggerAddCondition( gg_trg_moon, function Moon_C )
endfunction