Old tibians

Vou tentar colocar pra tfs1x. o movie é preguiçoso kkkk
 
Edit1: Se eu conseguir vou deixar aqui neste mesmo tópico á versão

tenta esse 
 
 
local function getPlayerResets(cid)
    local resets = getPlayerStorageValue(cid, 500)
     return resets < 0 and 0 or resets
    end
    
    function getPlayerFrags(cid)
        local time = os.time()
        local times = {today = (time - 86400), week = (time - (7 * 86400))}
        local contents, result = {day = {}, week = {}, month = {}}, db.getResult("SELECT `pd`.`date`, `pd`.`level`, `p`.`name` FROM `player_killers` pk LEFT JOIN `killers` k ON `pk`.`kill_id` = `k`.`id` LEFT JOIN `player_deaths` pd ON `k`.`death_id` = `pd`.`id` LEFT JOIN `players` p ON `pd`.`player_id` = `p`.`id` WHERE `pk`.`player_id` = " .. getPlayerGUID(cid) .. " AND `k`.`unjustified` = 1 AND `pd`.`date` >= " .. (time - (30 * 86400)) .. " ORDER BY `pd`.`date` DESC")
        if(result:getID() ~= -1) then
            repeat
                local content = {date = result:getDataInt("date")}
                if(content.date > times.today) then
                    table.insert(contents.day, content)
                elseif(content.date > times.week) then
                    table.insert(contents.week, content)
                else
                    table.insert(contents.month, content)
                end
            until not result:next()
            result:free()
        end
        local size = {
            day = table.maxn(contents.day),
            week = table.maxn(contents.week),
            month = table.maxn(contents.month)
        }
        return size.day + size.week + size.month
    end
    function onLogin(cid)
        registerCreatureEvent(cid, "fraglook")
        return true
    end
    function onLook(cid, thing, position, lookDistance)
        if isPlayer(thing.uid) and thing.uid ~= cid then
            doPlayerSetSpecialDescription(thing.uid,'[Frags: '..getPlayerFrags(thing.uid)..']\n[Reborns: '..getPlayerResets(thing.uid)..']')
            return true
        elseif thing.uid == cid then
            doPlayerSetSpecialDescription(cid,'[Frags: '..getPlayerFrags(cid)..']\n[Reborns: '..getPlayerResets(cid)..']')
            local string = 'You see yourself.'
            if getPlayerFlagValue(cid, PLAYERFLAG_SHOWGROUPINSTEADOFVOCATION) then
                string = string..' You are '.. getPlayerGroupName(cid) ..'.'
            elseif getPlayerVocation(cid) ~= 0 then
                string = string..' You are '.. getPlayerVocationName(cid) ..'.'
            else
                string = string..' You have no vocation.'
            end
            string = string..getPlayerSpecialDescription(cid)..''
            if getPlayerName(getPlayerPartner(cid), false, false) ~= nil then
                string = string..' You are '.. (getPlayerSex(cid) == 0 and 'wife' or 'husband') ..' of '.. getPlayerName(getPlayerPartner(cid)) ..'.'
            end
            if getPlayerGuildId(cid) > 0 then
                string = string..' You are ' .. (getPlayerGuildRank(cid) == '' and 'a member' or getPlayerGuildRank(cid)) ..' of the '.. getPlayerGuildName(cid)
                string = getPlayerGuildNick(cid) ~= '' and string..' ('.. getPlayerGuildNick(cid) ..').' or string..'.'
            end
            if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEECREATUREDETAILS) then
                string = string..'nHealth: ['.. getCreatureHealth(cid) ..' / '.. getCreatureMaxHealth(cid) ..'], Mana: ['.. getCreatureMana(cid) ..' / '.. getCreatureMaxMana(cid) ..'].'
                string = string..'nIP: '.. doConvertIntegerToIp(getPlayerIp(cid)) ..'.'
            end
            if getPlayerFlagValue(cid, PLAYERCUSTOMFLAG_CANSEEPOSITION) then
                string = string..'nPosition: [X:'.. position.x..'] [Y:'.. position.y..'] [Z:'.. position.z..'].'
            end
            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, string)  
            return false
        end
        return true
    end