function Element_Conditions takes nothing returns boolean
    return GetSpellAbilityId() == 'A002' 
endfunction

function EnemyFilter takes nothing returns boolean
  local timer s = GetExpiredTimer()
  local unit c = I2U(get_object_iparam(s, "caster"))
  return IsUnitType(GetFilterUnit(), UNIT_TYPE_STRUCTURE) == false and IsUnitType(GetFilterUnit(), UNIT_TYPE_MAGIC_IMMUNE) == false and IsUnitType(GetFilterUnit(), UNIT_TYPE_MECHANICAL) == false and IsUnitType(GetFilterUnit(), UNIT_TYPE_ANCIENT) == false and IsUnitEnemy(GetFilterUnit(), GetOwningPlayer(c)) == true and GetWidgetLife(GetFilterUnit()) > 0.405 
endfunction

function Element_Attack takes nothing returns nothing
  local timer s = GetExpiredTimer()
  local unit c = I2U(get_object_iparam(s, "caster"))
  local unit sphere = I2U(get_object_iparam(s, "sphere"))
  local real X = GetUnitX(c) 
  local real Y = GetUnitY(c)
  local group gr = CreateGroup()
  local unit first
  local real dur = get_object_rparam(s, "dur")
  local filterfunc ff = Filter(function EnemyFilter)
  call GroupEnumUnitsInRange(gr,X, Y,750,ff)
  call DestroyFilter(ff)
   if dur <= 9 then
    loop
      set first = GroupPickRandomUnit(gr)
    exitwhen first==null 
      call IssueTargetOrderById( sphere, OrderId("chainlightning"), first )
      call UnitResetCooldown( sphere )
       //  call AddSpecialEffectTarget( "Objects\\Spawnmodels\\Undead\\UndeadDissipate\\UndeadDissipate.mdl", first, "origin")
       //  call DestroyEffect(AddSpecialEffectTarget( "Objects\\Spawnmodels\\Undead\\UndeadDissipate\\UndeadDissipate.mdl", first, "origin"))
      call GroupRemoveUnit(gr, first)
      
    endloop    
      call set_object_rparam(s, "dur", dur+1)
       call BJDebugMsg("i_my "+R2S(dur))
   else
      call KillUnit(sphere)
      call DestroyTimer(s)
      call flush_object(s)
   endif
  call DestroyGroup(gr)
  set gr = null
  set first = null
endfunction

function Element_Actions takes nothing returns nothing
 local timer s = CreateTimer()
 local unit c = GetTriggerUnit()
 local unit sphere = CreateUnit(GetOwningPlayer(c),'u000',GetUnitX(c),GetUnitY(c),bj_UNIT_FACING)
 call set_object_iparam (s, "sphere", H2I(sphere))
 call set_object_iparam (s, "caster", H2I(c))
 call set_object_rparam(s, "dur", 0.)
 call TimerStart(s, 1.8, true, function Element_Attack)
 set c = null
 set sphere = null
 set s = null
endfunction

function InitTrig_Element takes nothing returns nothing
  local trigger Element
  set Element = CreateTrigger(  )
  call TriggerRegisterAnyUnitEventBJ( Element, EVENT_PLAYER_UNIT_SPELL_EFFECT )
  call TriggerAddCondition( Element, Condition( function Element_Conditions ) )
  call TriggerAddAction( Element, function Element_Actions )
endfunction

..if dur <= 9 and IsUnitDead(...)... and UnitHasBuffBJ (...)... then...