local location l = GetSpellTargetLoc()
  local real a = 0
  local integer i = 0
  local destructable array d
  loop
   exitwhen i == 6
    set d[i] = CreateDestructable('D000', GetLocationX(l) + Cos(a) * 100,  GetLocationY(l) + Sin(a) * 100, 0, 1, -1)
    set i = i + 1
    set a = a + bj_PI / 3
  endloop
  call TriggerSleepAction(5.00)
  set i = 0
  loop
   exitwhen i == 6
    call RemoveDestructable(d[i])
    set d[i] = null
    set i = i + 1
  endloop
  call RemoveLocation(l)
  set l = null

  
local integer i = 0  
   local destructable array d  
   loop  
    exitwhen i == 6 // будет 5 объектов а не 6.  
     set d[i] = CreateDestructable('D000', GetLocationX(l) + Cos(a) * 100,  GetLocationY(l) + Sin(a) * 100, 0, 1, -1)  
     set i = i + 1  
     set a = a + bj_PI / 3 (нах когда можно проще [a = 60*i]
   endloop  
   call TriggerSleepAction(5.00) //бред. создавай таймер, приклеивай  к таймеру через хэш хэндлы и потом удаляй, функция слип - бажная и кривая.
   set i = 0  
   loop  
    exitwhen i == 6 // 1 вообще останется живым, must be '>' not a '=='
     call RemoveDestructable(d[i])  
     set d[i] = null  
     set i = i + 1  
   endloop  
   call RemoveLocation(l)  
   set l = null