function damageTarget takes nothing returns nothing

      local timer dealDamage = GetExpiredTimer() 
      local integer iD = GetHandleId(dealDamage) 
      local unit Attacked = LoadUnitHandle(Hash,iD,'trgD') 
      local unit Attacker = LoadUnitHandle(Hash,iD,'DMGS') 
      local real Damage = LoadReal(Hash,iD,'TDMG') 
        
         call SetUnitInvulnerable(Attacked,false)
      
         call DisableTrigger(detectDamage)
         call UnitDamageTarget(Attacker,Attacked,(Damage-GetUnitBlockDamageAmmount(Attacked))*(1-GetUnitBlockDamagePercent(Attacked)/100),true,false,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_UNIVERSAL,WEAPON_TYPE_WHOKNOWS)         
         call EnableTrigger(detectDamage) 
     
         call DestroyTimer(dealDamage) 
         call FlushChildHashtable(Hash,iD) 
      
         set dealDamage = null 
         set Attacked = null 
         set Attacker = null 
 
   endfunction

   function onDamage takes nothing returns nothing
   
      local timer dealDamage
      local integer iD
      local unit Attacked = GetTriggerUnit()
      local real Damage = GetEventDamage()
      local unit Attacker = GetEventDamageSource()
      
            if GetWidgetLife(Attacked) <= Damage or GetWidgetLife(Attacked)+Damage+GetUnitBlockDamageAmmount(Attacked) > GetUnitState(Attacked,UNIT_STATE_MAX_LIFE) then
               call SetUnitInvulnerable(Attacked,true)
            
               set dealDamage = CreateTimer()
               set iD = GetHandleId(dealDamage)
               call TimerStart(dealDamage,0,false,function damageTarget)
            
               call SaveUnitHandle(Hash,iD,'trgD',Attacked)
               call SaveReal(Hash,iD,'TDMG',Damage)
               call SaveUnitHandle(Hash,iD,'DMGS',Attacker)
         
            elseif GetWidgetLife(Attacked) > Damage and GetWidgetLife(Attacked)+Damage+GetUnitBlockDamageAmmount(Attacked) <= GetUnitState(Attacked,UNIT_STATE_MAX_LIFE) then
               if Damage > GetUnitBlockDamageAmmount(Attacked) then
                  call SetWidgetLife(Attacked,GetWidgetLife(Attacked)+GetUnitBlockDamageAmmount(Attacked)+(Damage-GetUnitBlockDamageAmmount(Attacked))*GetUnitBlockDamagePercent(Attacked)/100)
               else 
                  call SetWidgetLife(Attacked,GetWidgetLife(Attacked)+Damage)
               endif
            endif 

         set dealDamage = null 
         set Attacked = null
         set Attacker = null
         
   endfunction