globals
    integer Destructables
endglobals

function Trig_Is_Destructables takes nothing returns nothing
       set Destructables = Destructables + 1
endfunction

function Trig_Destructibles_Actions takes itemtype i, rect r returns nothing
    local location L = Location(GetRandomReal(GetRectMinX(r), GetRectMaxX(r)), GetRandomReal(GetRectMinY(r), GetRectMaxY(r))) //создаём локацию
    local rect R = Rect(GetLocationX(L) - 150.00, GetLocationY(L) - 150.00, GetLocationX(L) + 150.00, GetLocationY(L) + 150.00) //создаём область
       set Destructables = 0
       call EnumDestructablesInRect( R, null, function Trig_Is_Destructables ) //проверка количества локаций
       if Destructables < ... then //если локаций небольшое кол-во, то:
         call CreateItem(i, GetLocationX(L), GetLocationY(L)) //создаётся предмет
      else //если же декораций много
        call Trig_Destructibles_Actions(i, r)  //то действия повторяются, таким образом будут повторяться пока предмет не создастся в нужной точке
       endif
    call RemoveLocation (L)
    call RemoveRect(R)
    set L = null
    set R = null
endfunction