function Trig_Damage_Add_Actions takes nothing returns nothing
     call TriggerRegisterUnitEvent( gg_trg_Damage_Take, GetTriggerUnit(), EVENT_UNIT_DAMAGED )
endfunction

//===========================================================================
function InitTrig_Damage_Add takes nothing returns nothing
     set gg_trg_Damage_Add = CreateTrigger(  )
     call TriggerRegisterUnitInRange( gg_trg_Damage_Add, gg_unit_hhes_0096, 99999.00, null )
     call TriggerAddAction( gg_trg_Damage_Add, function Trig_Damage_Add_Actions )
endfunction

function Trig_Damage_Take_Actions takes nothing returns nothing
     local real d = GetEventDamage()
     local unit u1 = GetEventDamageSource()
     local unit u2 = GetTriggerUnit()
     local integer i = GetRandomInt( 1, 100 )
     local integer x=GetUnitAbilityLevel( u1, 'A02Z' ) * 30 + GetHeroAgi( u1, true ) * 2

     if GetUnitAbilityLevel(u1, 'A02Z') > 0 and i <= 20 then
     call DestroyEffect( AddSpecialEffectTarget( "Abilities\\Spells\\NightElf\\FaerieDragonInvis\\FaerieDragon_Invis.mdl", u2, "chest") )
         call UnitDamageTarget( u1, u2, x, true, false, ATTACK_TYPE_NORMAL, DAMAGE_TYPE_FORCE, WEAPON_TYPE_WHOKNOWS )
     endif
     set u1 = null
     set u2 = null
endfunction

//===========================================================================
function InitTrig_Damage_Take takes nothing returns nothing
     set gg_trg_Damage_Take = CreateTrigger(  )
     call TriggerAddAction( gg_trg_Damage_Take, function Trig_Damage_Take_Actions )
endfunction