function Trig_Jaina_spell_2_Conditions takes nothing returns boolean
return( GetSpellAbilityId() == 'A02O' )
endfunction

function jainafiltergroup takes nothing returns boolean
return (IsUnitEnemy(GetFilterUnit(), GetOwningPlayer(GetSpellAbilityUnit())) == true)and(GetWidgetLife(GetFilterUnit()) > 0.405)
endfunction

function Trig_Jaina_spell_2_Actions takes nothing returns nothing
local unit     u=GetSpellAbilityUnit()
local location l=GetSpellTargetLoc()
local group    gr=CreateGroup()
local integer  lvl=GetUnitAbilityLevel(u, 'A02O')
local unit     d
local unit     r
local location l2
call GroupEnumUnitsInRange(gr,GetLocationX(l),GetLocationY(l),400.00,Condition(function jainafiltergroup))
if CountUnitsInGroup(gr)>=1 then
loop
     set r=FirstOfGroup(gr)
exitwhen r==null
set l2=GetUnitLoc(r)
call CreateNUnitsAtLoc( 1, 'h002', GetOwningPlayer(u), l2, bj_UNIT_FACING )
set  d=GetLastCreatedUnit()
call UnitAddAbility(d,'A02N')
call SetUnitAbilityLevel(d,  'A02N', lvl )
call IssueTargetOrder( d, "entanglingroots", r)
call UnitApplyTimedLife( d, 'BTLF', 1)
call GroupRemoveUnit(gr,r)
endloop
endif
call DestroyGroup(gr)
call RemoveLocation(l)
call RemoveLocation(l2)
set  gr=null
set  l=null
set  l2=null
set  u=null
set  d=null
set  r=null
endfunction