scope Spiral

   globals
      private effect array ef
      private integer i = 0
      private integer j = 0
      private string eArt = "Buildings\\Other\\BarrelsUnit0\\BarrelsUnit0.mdl"
      private real x
      private real y
   endglobals

   function LoopCreate takes nothing returns nothing
      if i<=100 then
         set ef[i] = AddSpecialEffect(eArt, x+(50+3.5*i)*Cos(i*0.17), y+(50+3.5*i)*Sin(i*0.17)))
         set i = i + 1
      else
         call PauseTimer(GetExpiredTimer())
         call DestroyTimer(GetExpiredTimer())
      endif
   endfunction

   function LoopDestroy takes nothing returns nothing
      if j<=100 then
         call DestroyEffect(ef[j])
         set ef[i] = null
         set j = j + 1
      else
         call PauseTimer(GetExpiredTimer())
         call DestroyTimer(GetExpiredTimer())
      endif
   endfunction



   function Trig_Spiral_Conditions takes nothing returns boolean
      return GetSpellAbilityId() == 'AHtc' 
   endfunction

   function Trig_Spiral_Actions takes nothing returns nothing
      set x = GetUnitX(GetSpellAbilityUnit())
      set y = GetUnitY(GetSpellAbilityUnit())
      set i = 0
      set j = 0
      call TimerStart(CreateTimer(), 0.7, true, funciton LoopCreate)
      call TimerStart(CreateTimer(), 2.1, true, funciton LoopDestroy)
   endfunction


   function InitTrig_Spiral takes nothing returns nothing
      set gg_trg_Spiral = CreateTrigger(  )
      call TriggerRegisterAnyUnitEventBJ( gg_trg_Spiral, EVENT_PLAYER_UNIT_SPELL_CAST )
      call TriggerAddCondition( gg_trg_Spiral, Condition( function Trig_Spiral_Conditions ) )
      call TriggerAddAction( gg_trg_Spiral, function Trig_Spiral_Actions )
   endfunction

endscope