Script Death

[allanhebert 0]

Aew galera toda veis que alguem player usava o comando !deathlist derrubava o ot ai eu resolvi tira mais esse comando é muito util para os player eu gostario que alguem me mandasse um script que funfa q num derruba o ot ou pelo menos me falar o que tem de errado no death list..

 

local config = {

deathAssistCount = getConfigValue('deathAssistCount') + 1,

maxDeathRecords = getConfigValue('maxDeathRecords'),

limit = ""

}

if(config.deathAssistCount > 0) then

config.limit = " LIMIT 0, " .. config.deathAssistCount

end

 

function onSay(cid, words, param, channel)

local target = db.getResult("SELECT `name`, `id` FROM `players` WHERE `name` = " .. db.escapeString(param) .. ";")

if(target:getID() == -1) then

doPlayerSendCancel(cid, "A player with that name does not exist.")

return true

end

 

local targetName, targetId = target:getDataString("name"), target:getDataInt("id")

target:free()

 

local str, deaths = "", db.getResult("SELECT `id`, `date`, `level` FROM `player_deaths` WHERE `player_id` = " .. targetId .." ORDER BY `date` DESC LIMIT 0, " .. config.maxDeathRecords)

if(deaths:getID() ~= -1) then

repeat

local killers = db.getResult("SELECT environment_killers.name AS monster_name, players.name AS player_name FROM killers LEFT JOIN environment_killers ON killers.id = environment_killers.kill_id LEFT JOIN player_killers ON killers.id = player_killers.kill_id LEFT JOIN players ON players.id = player_killers.player_id WHERE killers.death_id = " .. deaths:getDataInt("id") .. " ORDER BY killers.final_hit DESC, killers.id ASC" .. config.limit)

if(killers:getID() ~= -1) then

if(str ~= "") then

str = str .. "\n" .. os.date("%d %B %Y %X ", deaths:getDataLong("date"))

else

str = os.date("%d %B %Y %X ", deaths:getDataLong("date"))

end

 

local count, i = killers:getRows(false), 0

repeat

local monster = killers:getDataString("monster_name")

if(i == 0 or i == (count - 1)) then

monster = string.gsub(monster:gsub("an ", ""), "a ", "")

end

 

if(killers:getDataString("player_name") ~= "") then

if(i == 0) then

str = str .. "Killed at level " .. deaths:getDataInt("level") .. " by:\n "

elseif(i == count) then

str = str .. " and by "

elseif(i % 4 == 0) then

str = str .. ",\n "

else

str = str .. ", "

end

 

if(monster ~= "") then

str = str .. monster .. " summoned by "

end

 

str = str .. killers:getDataString("player_name")

else

if(i == 0) then

str = str .. "Died at level " .. deaths:getDataInt("level") .. " by:\n "

elseif(i == count) then

str = str .. " and by "

elseif(i % 4 == 0) then

str = str .. ",\n "

else

str = str .. ", "

end

 

str = str .. monster

end

 

i = i + 1

if(i == count) then

str = str .. "."

end

until not(killers:next())

killers:free()

end

until not(deaths:next())

deaths:free()

else

str = "No deaths recorded."

end

 

doPlayerPopupFYI(cid, "Deathlist for player: " .. targetName .. ".\n\n" .. str)

return true

end

 

 

[joaohd 200]

Não tem erros no deathlist, mas sim no executável que você está usando. Tente substituir seu distro por um mais atual que não tenha este problema. Caso seu ot for 8.54, recomendo utilizar o Crystal é muito bom.

 

flw

[allanhebert 0]

apocarai eu nao entendi muito bem com o quis dizer de trocar meu distro por um atual :S

 

e esse crystal o que é script como assim me fala mais completo num tenhu ainda abilidades nissu

[joaohd 200]

Distro ou executável e aquele programa que você executa para abrir seu OpenTibia Server. Geralmente o ícone é de uma espada e o nome é The Forgotten Server. O bug que existe em seu distro não existe mais nos distros atuais, por isso recomendo a troca desse distro.

 

flw

[allanhebert 0]

poderia me passar o link do crystal ou falar onde posso axar ?

[joaohd 200]

Você encontra o servidor na seção Download de servidores/8.5x

 

 

flw

[Vilden 137]

Dúvida resolvida, caso ainda esteja com dúvida dúvida neste tema

faça um pedido em Pedidos de Download

 

 

Tópico fechado.

 

 

Att

Editado Fevereiro 25, 2010 por Vilden