Então galera eu tenho um servidor 8.60 de Narutibia - Servidor Derivado

Nele eu tenho sistema de Kages, Jinchuuriki, Akatsuki, etc

Eu queria que mostrasse a quantidade HP/MANA/Frags/Mortes jutamente com os Demais no LOOK Eu tenho Um codigo que Mostra o HP/MANA/FRAGS/MORTES, Eu quero Mesclar/Juntar os Dois Scripts!

Especifícamente o arquivo SHOWVOC.LUA com o FRAGLOOK.LUA

 

Por exemplo:

You See Aidan Conor ele é um Naruto.

Ele é um [Akatsuki]

Ele não é um Jinchuuriki.

HP: 10000/10000  Mana:10000/100000

Frags [5] / Mortes [2]

 

Showvoc.lua:

local tab= {
[1] = {89785, "Membro da Akatsuki"},
[2] = {89787, "Raikage"},
[3] = {89788,"Mizukage"}, 
[4] = {89789, "Kazekage"}, 
[5] = {89790,"Hokage"},
[6] = {89791, "Tsuchikage"}
}
local mobs = {
["[Shukaku]"] = 1,
["[Nibi]"] = 2,
["[Sanbi]"] = 3,
["[Yonbi]"] = 4,
["[Gobi]"] = 5,
["[Rokubi]"] = 6,
["[Nanabi]"] = 7,
["[Hachibi]"] = 8,
["[Kyuuby]"] = 9,
["[Juubi]"] = 10
}
function onLook(cid, thing, position, lookDistance)
    if isPlayer(thing.uid) then
        local type = getPlayerStorageValue(thing.uid, 89745)
        local ret, jinchuuriki = getPlayerStorageValue(thing.uid, 89759),""
        local var = (type < 0 and "Shinobi Da Folha" or type == 1 and "Saga [Aluno Da Academia]" or type == 2 and "Saga [Genin]" or type == 3 and "Saga [Chunin]" or type == 4 and "Saga [Jounin]" or type == 5 and "Saga [Aluno Anbu]" or type == 6 and "Anbu Oinin" or type == 7 and "Renegado De Konoha" or type == 8 and "Membro Da Akatsuki")
        for s,k in ipairs(tab) do
            if getPlayerStorageValue(thing.uid, k[1]) > 0 then
                var = k[2]
            end
        end
        if ret > 0 then
            for j,c in pairs(mobs) do
                if ret == c then
                    jinchuuriki = j
                    break
                end
            end
        end
        doPlayerSetSpecialDescription(thing.uid, "\n "..(getPlayerSex(cid) == 0 and "Ela" or "Ele").." é "..var.."\n"..(getPlayerSex(cid) == 0 and "Ela" or "Ele").." "..(ret <= 0 and "Não é um Jinchuuriki" or "é o Jinchuuriki do "..jinchuuriki).."")
    end
    return true
end

 

FRAGLOOK.LUA

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)..'], [Critical: '..math.max(0,(tonumber(getCreatureStorage(thing.uid,48913)) or 0))..'], [Dodge: '..math.max(0,(tonumber(getCreatureStorage(thing.uid,48902)) or 0))..']')
		return true
	elseif thing.uid == cid then
		doPlayerSetSpecialDescription(cid,' [Frags: '..getPlayerFrags(cid)..'], [Critical: '..math.max(0,(tonumber(getCreatureStorage(cid,48913)) or 0))..'], [Dodge: '..math.max(0,(tonumber(getCreatureStorage(cid,48902)) or 0))..']')
		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 getPlayerNameByGUID(getPlayerPartner(cid), false, false) ~= nil then
			string = string..' You are '.. (getPlayerSex(cid) == 0 and 'wife' or 'husband') ..' of '.. getPlayerNameByGUID(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

 

 

É isso pessoal, se alguém puder me ajudar ou tiver alguma pergunta sobre a minha dúvida estarei disposto a explicar melhor :)

tem como postar o Server? to precisando 1 8.6

18 horas atrás, DaBoom disse:

tem como postar o Server? to precisando 1 8.6

Infelizmente meu servidor é Re-editado. Eu basicamente peguei uma base do Nto Hero, apaguei Tudo o que tinha, mapa, e refiz tudo. Vocações, spell, quests, mobs, Xp, skill, systems. Então por esse motivo não posso te passar kk mas tem varias Bases aqui no TK! é só dar uma olhada, recomendo a base do Nto Hard, dizem que é boa.