function Normal2Rune takes item ni, real x, real y returns nothing
     local integer i = 0
     loop
         exitwhen i > udg_TotalItems
         if udg_NormalItem[i] == GetItemTypeId(ni) then
             call CreateItem(udg_RuneItem[i],x,y)
             call RemoveItem(ni)        
         endif         
         set i = i + 1
     endloop
endfunction

function Trig_Drop_Items_Actions takes nothing returns nothing
     local item i = GetManipulatedItem()
     local unit u = GetManipulatingUnit()
      
     call Normal2Rune(i,GetWidgetX(u),GetWidgetY(u))

     set u = null
     set i = null
endfunction

//===========================================================================
function InitTrig_Drop_Items takes nothing returns nothing
     set gg_trg_Drop_Items = CreateTrigger()
     call TriggerRegisterAnyUnitEventBJ(gg_trg_Drop_Items,EVENT_PLAYER_UNIT_DROP_ITEM)
     call TriggerAddAction(gg_trg_Drop_Items,function Trig_Drop_Items_Actions)
endfunction