globals
    gamecache udg_cache = null
endglobals

constant function H2I takes handle h returns integer
    return h
    return 0
endfunction

constant function I2U takes integer H returns unit
    return H
    return null
endfunction

constant function I2TrA takes integer i returns triggeraction
    return i
    return null
endfunction    

constant function I2TrC takes integer i returns triggercondition
    return i
    return null
endfunction

function trig_Damaged takes nothing returns nothing
    local unit    DamageSource = GetEventDamageSource() // Атакующий
    local real    Damage       = GetEventDamage()       // Урон
    local unit    Attacked     = GetTriggerUnit()       // Атакованый 
    local trigger trig = GetTriggeringTrigger ()
    if DamageSource == I2U(GetStoredInteger(udg_cache, I2S(H2I(trig)), "Attacking")) then
    
        //... 
        //ТВОИ ДЕЙСТВИЯ ПРИ ПОЛУЧЕНИИ УРОНА
        //...  
                                      
        call TriggerRemoveCondition(trig, I2TrC(GetStoredInteger(udg_cache, I2S(H2I(trig)), "TrC")))
        call TriggerRemoveAction   (trig, I2TrA(GetStoredInteger(udg_cache, I2S(H2I(trig)), "TrA")))
        call FlushStoredMission(udg_cache, I2S(H2I(trig)))
        call DestroyTrigger(trig)
    endif
    set trig = null            
endfunction                                                             

function trig_Attacked takes nothing returns nothing
    local trigger trig      = CreateTrigger ()
    local unit    Attacking = GetAttacker()
    local unit    Attacked  = GetTriggerUnit()
    local triggeraction TrA = TriggerAddAction         (trig,           function trig_Damaged    )
    local triggeraction TrC = TriggerAddCondition      (trig, Condition(function trig_Conditions)) 
    call                      TriggerRegisterUnitEvent (trig, Attacked, EVENT_UNIT_DAMAGED       )
    call StoreInteger(udg_cache, I2S(H2I(trig)), "Attacking", H2I(Attacking))
    call StoreInteger(udg_cache, I2S(H2I(trig)), "TrC"      , H2I(TrC      ))
    call StoreInteger(udg_cache, I2S(H2I(trig)), "TrA"      , H2I(TrA      ))            
    call TriggerSleepAction(3)
    if IsTriggerEnabled (trig) then
         call FlushStoredMission(udg_cache, I2S(H2I(trig)))
         call TriggerRemoveCondition(trig, TrC)
         call TriggerRemoveAction   (trig, TrA)                               
         call DestroyTrigger        (trig)
    endif
    set trig= null
    set TrA = null
    set TrC = null
endfunction

//===========================================================================
function InitTrig_Attacked takes nothing returns nothing
    set gg_trg_Attacked = CreateTrigger() 
    call TriggerAddAction             ( gg_trg_Attacked,           function trig_Attacked   )
    call TriggerAddCondition          ( gg_trg_Attacked, Condition(function trig_Conditions))
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Attacked, EVENT_PLAYER_UNIT_ATTACKED         )
endfunction