function Trig_dead_Actions takes nothing returns nothing
local unit u=GetDyingUnit()
local real x=GetUnitX(u)
local real y=GetUnitY(u)
if GetUnitTypeId(u)=='hfoo' then
     call CreateItem('texp',x,y)
     endif
     set u=null
endfunction

//===========================================================================
function InitTrig_dead takes nothing returns nothing
local integer i=0
local trigger trig=CreateTrigger()
       loop
         call TriggerRegisterPlayerUnitEvent(trig, Player(i),EVENT_PLAYER_UNIT_DEATH, null)
         set i=i+1
         exitwhen i==15
     endloop
     call TriggerAddAction(trig, function Trig_dead_Actions)
     set trig=null
endfunction