globals
  group Tree_pickgroup = CreateGroup()
endglobals

define

  tee_res_interval = 3.
  tree_res_U_pick_area = 200.
  
  tree_res_animation = "birth"
  With_Animation = true
  
enddefine

function IsUnitGroupEmpty takes nothing returns nothing
  set Result = false
endfunction

function ResTee takes nothing returns nothing
  
  local timer t = GetExpiredTimer()
  local integer i = (GetHandleId(t) - 0x100000)
  local destructable d = LoadDestructableHandle( udg_HT, i, 0)
    
  call GroupEnumUnitsInRange( Tree_pickgroup, GetDestructableX(d), GetDestructableY(d), tree_res_U_pick_area, null)
    
  set Result = true
  call ForGroup(Tree_pickgroup, function IsUnitGroupEmpty)
  call GroupClear(Tree_pickgroup)
    
  if (Result) then
      call DestructableRestoreLife( d, GetDestructableMaxLife(d), true)
      
      #if With_Animation
        call SetDestructableAnimation( d, tree_res_animation)
      #endif
      
      call DestroyTimer(t)
      call FlushChildHashtable( udg_HT, i)
  else
      call TimerStart(t, tree_res_interval, false, function ResT)
  endif
    
  set d = null
  set t = null

endfunction

function Trig_Trees_Actions takes nothing returns nothing

  local timer t = CreateTimer()
  local integer i = (GetHandleId(t) - 0x100000)
  
  call SaveDestructableHandle( udg_HT, i, 0, GetTriggerDestructable())

  call TimerStart( t, tree_res_interval, false, function ResTree)
  
  set t = null

endfunction

function RegDestructable takes nothing returns nothing
  call TriggerRegisterDeathEvent(gg_trg_Trees, GetEnumDestructable())
endfunction

function InitTrig_Trees takes nothing returns nothing
  
  set gg_trg_Trees = CreateTrigger()
  call TriggerAddAction( gg_trg_Trees, function Trig_Trees_Actions)
  
  //init trees
    call EnumDestructablesInRect( GetWorldBounds(), null, function RegDestructable)
  
  if (udg_HT == null) then
    set udg_HT = InitHashtable()
  endif
  
endfunction