Ir para conteúdo
TK News
  • Cadastre-se

[PEDIDO] Contagem de Frags no Look

lKallisto

Por ,
em Suporte Tibia OTServer

 Share Seguidores 0

Posts Recomendados

lKallisto

lKallisto 3

Postado
Postado

Ja vi um sistema que quando você clica no nome do player aparece o Level nome e vocação e de lado aparece ´[65] que seria os players que ele matou.

se alguem puder postar,agradeço.

 

Versão do tibia 8.60

Link para o post
Compartilhar em outros sites
Danihcv

Danihcv 607

Postado
Postado

Crie um script chamado fraglook.lua na pasta data\creaturescripts\script:

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)..']')
		return true
	elseif thing.uid == cid then
		doPlayerSetSpecialDescription(cid,'[Frags: '..getPlayerFrags(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 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

E no arquivo creaturescripts.xml adicione:

<event type="login" name="fraglook_register" event="script" value="fraglook.lua"/>
<event type="look" name="fraglook" event="script" value="fraglook.lua"/>

Espero ter ajudado! :)

Abraços

Te ajudei?? REP + e ficamos quites... <ahttp://www.tibiaking.com/forum/uploads/emoticons/default_happyy.png' alt=';D'>

Atenciosamente,

Daniel.

Abraços!

Link para o post
Compartilhar em outros sites
ViitinG

ViitinG 835

Postado
Postado

O tópico foi movido para a área correta, preste mais atenção da próxima vez!

Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680

Este tópico foi movido:

De: "OTServ → Suporte OTServ → Suporte de OTServ Geral"

Para: "OTServ → Suporte OTServ → Suporte de Scripts"

Ajudei = REP+ :D


Não dou suporte por PM qualquer dúvida procure no fórum,caso não encontre oque procura crie um tópico.


[email protected]" />


|  github.png TFS 0.4 DEV   |

 


%5Bcreaturescript%5D Icones no minimap com descrição


%5Btalkaction%5D Adicionar ou remover VIP do player.


%5Bcreaturescripts%5D Senha para porta


%5Btalkaction%5D Mandar mensagem para pasta do servidor


Mapa Evento War Castle


%5Baction%5D Canoa em Movimento


Teleport Scroll System


%5Bcreaturescripts%5D Recompensa por level para X vocations


%5Btalkaction%5D Adicionar X item para o player


%5Btalkactions%5D Adicionar item para todos players online


%5Baction%5D Item que teleporta o player para house


[action+movement] Passaporte para entrar no barco
Link para o post
Compartilhar em outros sites
lKallisto

lKallisto 3

Postado
  • Autor
Postado
...

 Funcionou só que ficou no meio da descrisão do char, :

You see yourself. You are Vip Baiak Sorcerer.[Frags: 5] You are Vice-Leader of the Vingadores.

Teria como alterar o local e por para ficar no final da descrisão do char? tipo assim?:

You see yourself. You are Vip Baiak Sorcerer. You are Vice-Leader of the Vingadores. [Frags: 5]

 

 

O tópico foi movido para a área correta, preste mais atenção da próxima vez!

Este tópico foi movido:

De: "OTServ → Suporte OTServ → Suporte de OTServ Geral"

Para: "OTServ → Suporte OTServ → Suporte de Scripts"

Ok, não tinha percebido, Obrigado.

Link para o post
Compartilhar em outros sites
Jamison Collins

Jamison Collins 387

Postado
Postado

Tente esse:

function onLook(cid, thing, position, lookDistance)
function getDeathsAndKills(cid, type) -- by vodka
 local query,d = db.getResult("SELECT `player_id` FROM "..(tostring(type) == "kill" and "`player_killers`" or "`player_deaths`").." WHERE `player_id` = "..getPlayerGUID(cid)),0
		if (query:getID() ~= -1) then 
			repeat
				d = d+1
			until not query:next()
			query:free()
		end
	return d  
end
if isPlayer(thing.uid) then
	if cid ~= thing.uid then
		doPlayerSetSpecialDescription(thing.uid, "\n[Killed: "..getDeathsAndKills(thing.uid, "kill").."]")
	else
		doPlayerSetSpecialDescription(cid, "\n[Killed: "..getDeathsAndKills(cid, "kill").."]")
	end
	return true
end

cole isso no login.lua :

registerCreatureEvent(cid, "fraglook")

E isso no creaturescript.xml:

<event type="look" name="fraglook" script="fragsonlook.lua"/>

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
Jamison Collins

Jamison Collins 387

Postado
Postado

Desculpa, falta de atenção a minha.

Aqui está:

function onLook(cid, thing, position, lookDistance)
function getDeathsAndKills(cid, type) -- by vodka
 local query,d = db.getResult("SELECT `player_id` FROM "..(tostring(type) == "kill" and "`player_killers`" or "`player_deaths`").." WHERE `player_id` = "..getPlayerGUID(cid)),0
		if (query:getID() ~= -1) then 
			repeat
				d = d+1
			until not query:next()
			query:free()
		end
	return d  
end
if isPlayer(thing.uid) then
	if cid ~= thing.uid then
		doPlayerSetSpecialDescription(thing.uid, "\n[Killed: "..getDeathsAndKills(thing.uid, "kill").."]")
	else
		doPlayerSetSpecialDescription(cid, "\n[Killed: "..getDeathsAndKills(cid, "kill").."]")
	end
end
	return true
end

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
lKallisto

lKallisto 3

Postado
  • Autor
Postado (editado)

Jamilson, deu no mesmo:
15:32 You see Maicon (Level 6187). He is a vip baiak sorcerer
[Killed: 5]. He is Vice-Leader of the Thunder Cats.
A diferença é que agora a Linha da descrição esta com um espaço a mais e alinha, porem não está no local que queria.
e se o player clicar no proprio nome não mostra o Frags/Killed.

 

Gostaria que ficasse assim:

15:32 You see Maicon (Level 6187). He is a vip baiak sorcerer
He is Vice-Leader of the Thunder Cats. [Frags: 5].

e ao inves do nome Killed ficasse Frags.

Obrigado.

Editado por paulinhosuporte (veja o histórico de edições)
Link para o post
Compartilhar em outros sites
Jamison Collins

Jamison Collins 387

Postado
Postado

Você tem algum outro evento "onLook" em seu Creaturescript ou MOD?

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
Jamison Collins

Jamison Collins 387

Postado
Postado

Olha mano, uma forma que pode melhor a situação é assim:

function onLook(cid, thing, position, lookDistance)
function getDeathsAndKills(cid, type) -- by vodka
 local query,d = db.getResult("SELECT `player_id` FROM "..(tostring(type) == "kill" and "`player_killers`" or "`player_deaths`").." WHERE `player_id` = "..getPlayerGUID(cid)),0
		if (query:getID() ~= -1) then 
			repeat
				d = d+1
			until not query:next()
			query:free()
		end
	return d  
end
if isPlayer(thing.uid) then
	if cid ~= thing.uid then
		doPlayerSetSpecialDescription(thing.uid, "\n[Killed: "..getDeathsAndKills(thing.uid, "kill").."]\n")
	else
		doPlayerSetSpecialDescription(cid, "\n[Killed: "..getDeathsAndKills(cid, "kill").."]\n")
	end
end
	return true
end

Mas botar do jeito que você quer, eu realmente não sei, perdão.

愛"A alma permanece em suas criações" 平V89E5aN.png


142c9d3439.jpg
(Não dou suporte por mensagem privada.)

Link para o post
Compartilhar em outros sites
  • 5 months later...
marcplay

marcplay 2

Postado
Postado

Aí galera, eu nem sei mexer com OtServers, mas eu comecei a mexer ontem e vim procurar sobre Fraglook... Mas eu faço programação, então isso ajudou a conseguir resolver! Então lá vai o código:

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)..']')
		return true
	elseif thing.uid == cid then
		doPlayerSetSpecialDescription(cid,' [Frags: '..getPlayerFrags(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
		

		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
		
		string = string..getPlayerSpecialDescription(cid)..''
		
		doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, string)  
		return false
	end
	return true
end
Link para o post
Compartilhar em outros sites

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Seguidores 0
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito