globals
integer n = 0
endglobals

   
   loop
          set p = FirstOfGroup(udg_G)
          if IsUnitEnemy(c,GetOwningPlayer(p)) == true then
              call UnitDamageTarget(c,p,100,true,true,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL,null)
              call DestroyEffect( AddSpecialEffectTarget( "Abilities\\Spells\\Human\\MassTeleport\\MassTeleportCaster.mdl", p, "origin" ))
          endif
          call GroupRemoveUnit(udg_G,p)
          exitwhen p == n
      endloop
      call GroupClear(udg_G)

//===================================
//====Custom Scripts=================
globals

integer n = 0

endglobals
/====================
//===================================
function Trig_BlinkNoTarget_Conditions takes nothing returns boolean
      return GetSpellAbilityId() == 'AOws'
endfunction
function Trig_BlinkNoTarget_Actions takes nothing returns nothing
      local unit c = GetSpellAbilityUnit()
      local real x = GetUnitX(c)
      local real y = GetUnitY(c)
      local unit p
      call SetUnitX( c, x + 700 * Cos( GetUnitFacing(c) * bj_DEGTORAD ) )
      call SetUnitY( c, y + 700 * Sin( GetUnitFacing(c) * bj_DEGTORAD ) )
      set x = GetUnitX(c)
      set y = GetUnitY(c)
      call GroupEnumUnitsInRange(udg_G,x,y,450,null)
      loop
          set p = FirstOfGroup(udg_G)
          if IsUnitEnemy(c,GetOwningPlayer(p)) == true then
              call UnitDamageTarget(c,p,100,true,true,ATTACK_TYPE_MAGIC,DAMAGE_TYPE_NORMAL,null)
              call DestroyEffect( AddSpecialEffectTarget( "Abilities\\Spells\\Human\\MassTeleport\\MassTeleportCaster.mdl", p, "origin" ))
          endif
          call GroupRemoveUnit(udg_G,p)
          exitwhen p == n
      endloop
      call GroupClear(udg_G)
      call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Orc\\WarStomp\\WarStompCaster.mdl", x, y))
      set c = null
      set x = 0
      set y = 0
endfunction
//===========================================================================
function InitTrig_BlinkNoTarget takes nothing returns nothing
      set gg_trg_BlinkNoTarget = CreateTrigger( )
      call TriggerAddAction( gg_trg_BlinkNoTarget, function Trig_BlinkNoTarget_Actions )
      call TriggerAddCondition( gg_trg_BlinkNoTarget, Condition( function Trig_BlinkNoTarget_Conditions ) )
      call TriggerRegisterPlayerUnitEvent( gg_trg_BlinkNoTarget, Player(0), EVENT_PLAYER_UNIT_SPELL_EFFECT,null)
endfunction

function Trig_periodicCheck_Actions takes nothing returns nothing
  local real lx
     local real ly  
     local integer i = 1  
     local integer pnum = 1
     loop  
         set lx = GetWidgetX(udg_wisp[pnum])  
         set ly = GetWidgetY(udg_wisp[pnum])
         if (lx < GetRectMaxX(udg_r[i]) and lx > GetRectMinX(udg_r[i])) and (ly < GetRectMaxY(udg_r[i]) and ly > GetRectMinY(udg_r[i])) then  
             call RemoveUnit( udg_wisp[pnum] )  
             set udg_hero[pnum] = udg_h[i]  
             call SetUnitOwner( udg_hero[pnum], GetOwningPlayer(udg_wisp[pnum]), true )  
             call SetUnitPositionLoc( udg_hero[pnum], Location(GetRectCenterX(udg_spawnrect[pnum]), GetRectCenterY(udg_spawnrect[pnum])))   
         endif  
         set i = i + 1  
   call BJDebugMsg("I - " + I2S(i))
         set pnum = pnum + 1
   call BJDebugMsg("I2 - " + I2S(pnum))
         if pnum == 12 then  
             set pnum = 1
         endif
         exitwhen i == 100
     endloop  
endfunction

//===========================================================================
function InitTrig_periodicCheck takes nothing returns nothing
     set gg_trg_periodicCheck = CreateTrigger()
  call TriggerRegisterTimerEvent( gg_trg_periodicCheck, 2.00, true )
     call TriggerAddAction( gg_trg_periodicCheck, function Trig_periodicCheck_Actions )
endfunction