Site em Manutenção!


    [Talkactions] Deathlist Funcionando

    Compartilhe
    avatar
    Obelisko754
    Cordenador
    Cordenador

    Mensagens : 101
    ZXG Coins : 4096
    Data de inscrição : 22/02/2012

    [Talkactions] Deathlist Funcionando

    Mensagem por Obelisko754 em Sex Mar 16, 2012 6:56 pm

    Deathlist funcionando! [TFS 0.3.6+]

    Fala galera, muitos OTs estão com o comando Death List (!deathlist) bugado, então estava pesquisando algum script semelhante que não bugasse o servidor e achei!

    Vá até a pasta Talkactions abra o arquivo Talkactions.xml e adicione esta Tag:
    Código:
    <talkaction words="!deathlist" event="script" value="deathlist.lua"/>

    Depois de ter adicionado e salvado, vá até a pasta Scripts dentro da pasta Takactions e abra ou faça um script deathlist.lua e adicione isto dentro:

    Código:
    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

    Pronto, seu deathlist agora está funcionando normalmente!

    Créditos:
    Desconhecido.~


    __________________


    ~~~~~~~~~~~~>Tenho Metas<~~~~~~~~~~~~

    Posts

    {X} 25 posts
    {X} 50 posts
    {X} 100 posts
    { } 250 posts
    { } 500 posts
    { } 1000 posts

    Criação de Tópicos

    {X} 5 Tópicos
    {X} 10 Tópicos
    { } 25 Tópicos
    { } 50 Tópicos
    { } 65+ Tópicos
    avatar
    Jamerson Andre
    Admin
    Admin

    Mensagens : 442
    ZXG Coins : 2955
    Data de inscrição : 13/12/2011
    Idade : 20
    Localização : Maceio -Al


    Alerta:
    99/100  (99/100)

    Re: [Talkactions] Deathlist Funcionando

    Mensagem por Jamerson Andre em Sex Mar 16, 2012 7:15 pm

    vlws Very Happy


    __________________


    [Você precisa estar registrado e conectado para ver este link.]
    avatar
    DaNgeRoUs
    Admin
    Admin

    Mensagens : 17
    ZXG Coins : 2282
    Data de inscrição : 14/03/2012
    Idade : 20
    Localização : Pelotas - Rio Grande Do Sul

    Re: [Talkactions] Deathlist Funcionando

    Mensagem por DaNgeRoUs em Sab Mar 17, 2012 12:45 am

    muito bom!!


    __________________


    [ADM]Forever - [ADM]DaNgeR

    [Você precisa estar registrado e conectado para ver esta imagem.]
    avatar
    Baiakzik
    Cordenador
    Cordenador

    Mensagens : 83
    ZXG Coins : 4040
    Data de inscrição : 23/03/2012
    Idade : 16
    Localização : Rio De Janeiro

    Re: [Talkactions] Deathlist Funcionando

    Mensagem por Baiakzik em Dom Maio 13, 2012 12:45 pm

    Creditos Doidin ..


    __________________


    ~~ Minhas Metas ~~

    [Quase La] Ser Conhecido e Reconhecido no Forum
    [X]Ter Uma das minhas imagens no forum
    [X ]Virar Dono Do Baiak-Zik
    [ X]Virar Moderador,Coordenador do Forum
    [ ]Virar Administrador do Forum
    [ ] Ser Amigo de Todos Do Forum

    Conteúdo patrocinado

    Re: [Talkactions] Deathlist Funcionando

    Mensagem por Conteúdo patrocinado


      Data/hora atual: Qua Maio 23, 2018 12:57 am