function ReplaceItem takes nothing returns nothing

local item ibm = GetManipulatedItem()
local unit u = GetTriggerUnit()
local integer id = GetItemUserData(ibm)
local integer index = GetItemIndex(ibm)
local location il = GetItemLoc(ibm)

if(UnitInventoryCount(u)<UnitInventorySizeBJ(u))then
                if((GetItemTypeId(ibm)==udg_IRS_Dummy[index])and(id==0))then
                    call UnitAddItemById(u,udg_IRS_Enabled[index])
                    call SetItemUserData(GetLastCreatedItem(),GetConvertedPlayerId(GetOwningPlayer(u)))
                endif
                if((GetItemTypeId(ibm)==udg_IRS_Dummy[index])and(id!=0)and(id!=GetConvertedPlayerId(GetOwningPlayer(u))))then
                    call UnitAddItemById(u,udg_IRS_Disable[index])
                    call SetItemUserData(GetLastCreatedItem(),id)
                endif
                if((GetItemTypeId(ibm)==udg_IRS_Dummy[index])and(id==GetConvertedPlayerId(GetOwningPlayer(u))))then
                    call UnitAddItemById(u,udg_IRS_Enabled[index])
                    call SetItemUserData(GetLastCreatedItem(),id)
                endif
                if((GetItemTypeId(ibm)==udg_IRS_Disabled[index])and(id==GetConvertedPlayerId(GetOwningPlayer(u))))then
                    call RemoveItem(ibm)
                    call UnitAddItemById(u,udg_IRS_Enabled[index])
                    call SetItemUserData(GetLastCreatedItem(),id)
                endif
                if((GetItemTypeId(ibm)==udg_IRS_Enabled[index])and(id!=GetConvertedPlayerId(GetOwningPlayer(u)))and(id!=0))then
                    call RemoveItem(ibm)
                    call UnitAddItemById(u,udg_IRS_Disable[index])
                    call SetItemUserData(GetLastCreatedItem(),id)
                endif
            else
                if(GetItemTypeId(ibm)==udg_IRS_Dummy[index])then
                    call RemoveItem(ibm)
                    call CreateItemLoc(udg_IRS_Dummy[index],il)
                    if(id==0)then
                        call SetItemUserData(GetLastCreatedItem(),GetConvertedPlayerId(GetOwningPlayer(u)))
                    else
                        call SetItemUserData(GetLastCreatedItem(),id)
                    endif
                endif
            endif
call RemoveLocation(il)
endfunction