function gogo takes integer n returns integer
local integer z
local integer b
     set z = 1
     set b = 0
     loop
         exitwhen z > n
         set b = s + i
         set z = i + 1
     endloop
return b
endfunction

function Check takes nothing returns boolean
     return IsUnitEnemy(GetFilterUnit(),GetOwningPlayer(GetSpellAbilityUnit()))and GetUnitState(GetFilterUnit(),UNIT_STATE_LIFE)>1
endfunction

local boolexpr check = Condition(function Check)

function Trig_Stack_Pickup_Actions takes nothing returns nothing
local unit hero=GetManipulatingUnit()
local item pickedup=GetManipulatedItem()
local integer iii=0
local item temp=null
local integer typeid=GetItemTypeId(pickedup)
if(GetItemCharges(pickedup)==0)then
set hero=null
set pickedup=null
return
endif
loop
exitwhen iii==6
set temp=UnitItemInSlot(hero,iii)
if(pickedup!=temp and GetItemTypeId(temp)==typeid)then
call SetItemCharges(temp,GetItemCharges(temp)+GetItemCharges(pickedup))
call RemoveItem(pickedup)
set iii=5
endif
set iii=iii+1
endloop
set hero=null
set pickedup=null
endfunction

//===========================================================================
function InitTrig_Stack_Pickup takes nothing returns nothing
set gg_trg_Stack_Pickup = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Stack_Pickup, EVENT_PLAYER_UNIT_PICKUP_ITEM )
call TriggerAddAction( gg_trg_Stack_Pickup, function Trig_Stack_Pickup_Actions )
endfunction