function Trig_HashSpell_Conditions takes nothing returns boolean
     return GetSpellAbilityId() == 'A000'
endfunction

function Trig_HashSpell_Timer takes nothing returns nothing
     local timer t = GetExpiredTimer()
     local integer id = GetHandleId(t)
     local widget w = LoadWidgetHandle(udg_Hash, id, 2)
     call UnitDamageTarget(LoadUnitHandle(udg_Hash, id, 1), w, LoadReal(udg_Hash, id, 0), true, false, ATTACK_TYPE_MAGIC, DAMAGE_TYPE_MAGIC, WEAPON_TYPE_WHOKNOWS)
     call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Human\\Thunderclap\\ThunderclapCaster.mdl", GetWidgetX(w), GetWidgetY(w))
     call FlushChildHashtable(udg_Hash, id)
     call DestroyTimer(t)
     set t = null
     set w = null
endfunction

function Trig_HashSpell_Actions takes nothing returns nothing
     local timer t = CreateTimer()
     local integer id = GetHandleId(t)
     call SaveReal(udg_Hash, id, 0, GetUnitAbilityLevel(GetTriggerUnit(), 'A000') * 500.)
     call SaveAgentHandle(udg_Hash, id, 1, GetTriggerUnit())
     call SaveAgentHandle(udg_Hash, id, 2, GetSpellTargetUnit())
     call TimerStart(t, 10., false, function Trig_HashSpell_Timer)
     set t = null
endfunction

//===========================================
functon InitTrig_HashSpell takes nothing returns nothing
      local trigger trig = CreateTrigger()
      local integer i = 0
      loop
          call TriggerRegisterPlayerUnitEvent(trig, Player(i), EVENT_PLAYER_UNIT_SPELL_EFFECT, null)
          exitwhen i == 15
          set i = i + 1
      endloop
      call TriggerAddCondition(trig, Filter(function Trig_HashSpell_Conditions))
      call TriggerAddActions(trig, function Trig_HashSpell_Actions)
      set trig = null
endfunction