function actionsDamage takes nothing returns nothing
    local unit u = GetAttackedUnitBJ ()
    local real damage = GetEventDamage ()
    local texttag tt = null
    if ((udg_b_DamageFloatingText == true) and (damage >= 1.)) then
        call CreateTextTagUnitBJ (I2S (R2I (damage)), u, 0, 9., 100., 100., 100., 0.)
        //Здесь извиняюсь - пробовал с глобальными
        set tt = GetLastCreatedTextTag ()
        call SetTextTagFadepointBJ (tt, 0.1)
        call SetTextTagLifespanBJ (tt, 1.0)
        call SetTextTagVelocityBJ (tt, 64, 90)
        call SetTextTagPermanentBJ (tt, false)
        call PolledWait (1.)
        call DestroyTextTag (tt)
    endif
    set u = null
    set tt = null
endfunction