Se não funcionar acho que já sei o que é:

 

local amuletId = 2160

function onKill(creature, target)
    local player = creature

    if player:getSlotItem(CONST_SLOT_NECKLACE).itemid == amuletId then
        if target:isMonster() then
            local pos = target:getPosition()
            local corpse = Tile(pos):getTopDownItem()
            if corpse:getType():isCorpse() and corpse:getType():isMovable() then
                if corpse:isContainer() then
                    local str = "[Double Loot Amulet] Duplicated loot: "
                    for i = corpse:getSize()-1, 0, -1 do
                         local item = corpse:getItem(i)
                         str = str..item:getCount().."x "..item:getName()..", "
                         doAddContainerItem(corpse, item:getId(), item:getCount()) 
                    end
                    str = string.sub(str, 1, #str-2).."."
                    player:sendTextMessage(TALKTYPE_ORANGE_2, str)
                    pos:sendMagicEffect(31)
                end
            end
        end
    end
    return true
end

Jobsonmb, agr tá dando erro na linha 8 olha a imagem 

 

Snowsz, agr tá dando erro na linha 6 man olha a imagem

Editado Setembro 29, 2015 9 anos por marcio1234 (veja o histórico de edições)

Cara, posta tua pasta do creaturescript, por que já estou sem saber o que fazer.

Snowsz, já hospedei no mega só vc baixar Click Aqui

local amuletId = 2160


function onKill(cid, target, lastHit)


if isPlayer(cid) then
if getPlayerSlotItem(cid, 2).itemid == amuletId then
if isMonster(target) then
local pos = getCreaturePosition(target)
local corpse = Tile(pos):getTopDownItem()
if isCorpse(corpse) and isMovable(corpse) then
if isContainer(corpse) then
local str = "[Double Loot Amulet] Duplicated loot: "
for i = corpse:getSize()-1, 0, -1 do
local item = corpse:getItem(i)
str = str..item:getCount().."x "..item:getName()..", "
doAddContainerItem(corpse, item:getId(), item:getCount()) 
end
str = string.sub(str, 1, #str-2).."."
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_2, str)
doSendMagicEffect(cid, 31)
end
end
end
end
end
    return true
end