function Trig_Lifebloom_Timer takes nothing returns nothing
    local timer t = GetExpiredTimer()
    local integer hid = GetHandleId(t)
    local real hp_restore = LoadInteger(Hash, hid, 1)
    local real time_rem = LoadReal(Hash, hid, 0) - 0.025
    local unit u = LoadUnitHandle(Hash, hid, 0)
    if (GetUnitAbilityLevel(u,'БАФФ')>0) then
        call SetWidgetLife(u,GetWidgetLife(u)+LoadReal(Hash, hid, 2))
        call DestroyTimer(t)
        call FlushChildHashtable(Hash, hid)
    elseif (time_rem > 0.) then
        call SetWidgetLife(u,GetWidgetLife(u)+hp_restore)
        call SaveReal(Hash, hid, 0, time_rem)
    else
        call DestroyTimer(t)
        call FlushChildHashtable(Hash, hid)
    endif
    set u = null
    set t = null
endfunction

function Trig_Lifebloom_Act takes nothing returns nothing
 local timer t = null
 local integer hid = 0
 if GetSpellAbilityId( ) == 'A002' then
  set t = CreateTimer( )
  set hid = GetHandleId(t)
  call SaveUnitHanlde(Hash, hid, 0, GetSpellTargetUnit( ))
  call SaveReal(Hash, hid, 2, 10*GetHeroInt(GetSpellAbilityUnit()))
  call SaveReal(Hash, hid, 1, GetUnitAbilityLevel(u, 'A002' )*0,75)
  call SaveReal(Hash, hid, 0, 15. )
  call TimerStart(t, 0,025 , true, function Trig_Lifebloom_Timer)
  set t = null
 endif
endfunction

//===========================================================================
function InitTrig_Lifebloom takes nothing returns nothing
    set gg_trg_Lifebloom = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Lifebloom, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddAction(gg_trg_Lifebloom, function Trig_Lifebloom_Act)
endfunction