[Resolvido] pqê esse script não funciona? :O

[Fausto32 92]

Então o script consiste em quem der o ultimo hit em certo player no pvp leva o coração dele com nome e level só q num ta funcionando aqui sei lá pqê Help's :z

function onDeath(cid, corpse, lastHitKiller, mostDamageKiller)

local cidpos = getPlayerPosition(lastHitKiller)

loot = 5943

item = doPlayerAddItem(lastHitKiller,loot,1)

if(isPlayer(lastHitKiller) == TRUE) then

hitKillerName = getPlayerName(lastHitKiller)

doSetItemSpecialDescription(item,"This is the heart of "..getPlayerName(cid).." killed at Level "..getPlayerLevel(cid).." by "..hitKillerName..".")

doPlayerSendTextMessage(lastHitKiller, MESSAGE_STATUS_CONSOLE_ORANGE, "You Killed " .. getCreatureName(cid) .. ".")

doSendMagicEffect(cidpos,12)

else

hitKillerName = getCreatureName(lastHitKiller)

doSetItemSpecialDescription(item,"This is the heart of "..getPlayerName(cid).." killed at Level "..getPlayerLevel(cid).." by a "..hitKillerName..".")

end

setItemName(item, ""..getPlayerName(cid).."\'s Heart")

return TRUE

end

E aqui o erro q mostra na distro:

[12:59:54.125] [Warning - Event::loadScript] Event onPrepareDeath not found (dat

a/creaturescripts/scripts/coracao.lua)

[Skyforever 327]

function onPrepareDeath(cid, deathList)


local str = getCreatureName(cid) .. " heart's died at level " .. getPlayerLevel(cid) .. ""


for _, pid in ipairs(deathList) do

     if isCreature(pid) and isPlayer(cid) then

         str = str .. " by " .. (str2 == "" and "" or ",") .. " " .. getCreatureName(pid)

            else

        str = str .. " by ".. (str == "" and "" or ",") .. " a field item"

     end

end


for _, tid in ipairs(deathList) do

   if isPlayer(cid) then

       itemm = doPlayerAddItem(tid, 5943, 1)

           doSetItemSpecialDescription(itemm, str)

              setItemName(itemm, "Heart's of someone")

                 doSendMagicEffect(getThingPos(cid), 49)

                 end

             end

 return true

end 

 

[Fausto32 92]

function onPrepareDeath(cid, deathList)


local str = getCreatureName(cid) .. " heart's died at level " .. getPlayerLevel(cid) .. ""


for _, pid in ipairs(deathList) do

if isCreature(pid) and isPlayer(cid) then

str = str .. " by " .. (str2 == "" and "" or ",") .. " " .. getCreatureName(pid)

else

str = str .. " by ".. (str == "" and "" or ",") .. " a field item"

end

end


for _, tid in ipairs(deathList) do

if isPlayer(cid) then

itemm = doPlayerAddItem(tid, 5943, 1)

doSetItemSpecialDescription(itemm, str)

setItemName(itemm, "Heart's of someone")

doSendMagicEffect(getThingPos(cid), 49)

end

end

return true

end

Mano nem funfa Tipo o player num morre fica com 0 de life mais num morre e da altos erro na distro :C

[Kimoszin 1160]

Como você usou a tag?

[Fausto32 92]

Como você usou a tag?

Mano meu server num tá aqui mais tenho qse ctz q foi OnprepareDeath :x

<event type="preparedeath" name="Coracao" event="script" value="coracao.lua"/>

Acho q tva tipo assim

[Kimoszin 1160]

Vê se ajuda.

http://tibiaking.com...0-heart-system/

[Fausto32 92]

Vê se ajuda.

http://tibiaking.com...0-heart-system/

Creio q agora vai lá em casa testo Vlw REP+

[Kimoszin 1160]

Se funcionar avise para eu botar como resolvido.

[Fausto32 92]

Se funcionar avise para eu botar como resolvido.

Kismo num foi não =[ O Player e teleportado pro templo perde level mais num fica corpo nem loot O= e quem mato ganha coração não '-' saka na distro

@UP ngm sabe ñ ? :x

Editado Janeiro 27, 2013 por Fausto32 (veja o histórico de edições)

[Fausto32 92]

@Resolvido!

Editado Fevereiro 13, 2013 por Fausto32 (veja o histórico de edições)