Ir para conteúdo
  • Cadastre-se

(Resolvido)Resolvido-Script de troca de nome TFS 0.4 >TFS 1.0


Ir para solução Resolvido por psychonaut,

Posts Recomendados

Esse script de troca de nome por talkaction é de um TFS 0.4. Preciso transformar esse script para [TFS] 1.0. Queria saber se alguem pode me ajudar converter esse script pra funcionar no TFS 1.0.

To mandando aqui pra ve se me ajuda por que na sessão de action/talkaction o botão de "novo tópico" não pode mais postar.

local config = {



item = { Id = 1984,
count = 1,
},

maxTextLenght = 15,
blacklistParam = {"account manager", "god", "cm", "gm", "tutor", "tester"},
minWordLenght = 3,
delay = 2,
}

function onSay(cid, words, param, channel)


local textCancel, t = config.text, string.explode(param, ",")

if(param == '') then
return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.")
elseif((getPlayerGUIDByName(t[1]) ~= nil) and (not getBooleanFromString(t[2]))) then
textCancel = "That name is already in use."
elseif(getPlayerItemCount(cid, config.item.Id) < config.item.count) then
textCancel = "You do not fulfill the requirements."
elseif(not getTilePzInfo(getCreaturePosition(cid))) then
textCancel = "You must be inside a protection zone to use this command."
elseif(string.len(tostring(t[1])) >= config.maxTextLenght) then
textCancel = "You can only use a maximum of " .. config.maxTextLenght .. " characters."
elseif(string.find(t[1]:lower(), "[^%l%s]") ~= nil) then
textCancel = "You cannot use symbols."
else
for blacklist = 1, table.maxn(config.blacklistParam) do
if(string.find(t[1]:lower(), config.blacklistParam[blacklist]) ~= nil) then
textCancel = "Invalid name entry."
break
end
end
end
if(config.text ~= textCancel) then
doPlayerSendCancel(cid, textCancel)
return true
end

local paramTemp, space, oldName = '', '', getCreatureName(cid)

for word in string.gmatch(t[1], "%a+") do
if(string.len(word) < config.minWordLenght) then
doPlayerSendCancel(cid, "Each word must have a minimum of " .. config.minWordLenght .. " characters.")
return true
end

paramTemp = "" .. paramTemp .. "" .. space .. "" .. word .. ""

if(space == '') then
space = " "
end

end

local guid = getPlayerGUID(cid)
t[1] = paramTemp


if(pcall(doPlayerChangeName, guid, oldName, t[1]) == false) then

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your name has been changed successfully. You will be kicked in " .. config.delay .. " seconds.")

addEvent(function(cid, forceLogout)

if(isPlayer(cid)) then
doPlayerRemoveItem(cid, config.item.Id, config.item.count)
doRemoveCreature(cid, forceLogout)

db.executeQuery("INSERT INTO `player_namelocks` (`player_id`, `name`, `new_name`, `date`) VALUES (" .. guid .. ", " .. db.escapeString(oldName) .. ", " .. db.escapeString(t[1]) .. ", " .. os.time() .. ");")
db.executeQuery("UPDATE `players` SET `name` = " .. db.escapeString(t[1]) .. " WHERE `id` = " .. guid .. " ;")

end

end, config.delay * 1000, cid, true)
end

return true

end

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

Vo ver se arrumo


É o god que muda o nome, ou o próprio jogador, acho que to fazendo o errado

Editado por rogaforyn2 (veja o histórico de edições)

Life is so meaningless, there is nothing worth a smile
So goodbye, I'll miss you

 

 

sugestões?

 

 

Link para o post
Compartilhar em outros sites

é o proprio jogador, comando talkaction.

 

Exemplo: player pega o item de id especifica entra no jogo e escreve  /changename NOVOnome   e aperta entre, personagem reloga apos 2 segundos e e troca para nome.

Link para o post
Compartilhar em outros sites
  • Solução

Deu um trabalho do cão arrumar o banco de dados, mas enfim:

local seconds = 4 -- tempo pra ler a msg de mudanca de nome
local maxTextLenght = 15 -- limite de caracteres do nome
local blacklistParam = {"account manager", "god", "cm", "gm", "tutor", "tester"} -- nomes proibidos pra usar
local minWordLenght = 3 -- min de caracteres
local qtd = 1 -- quantidade do item necessario
local item = 1984 -- id do item necessario


local function changeName(param)
	local guid = getPlayerGUID(param.pid)
	doRemoveCreature(param.pid)
	db.query("UPDATE `players` SET `name` = '"..param.params.."' WHERE `id` = " .. guid .. ";")
	doRemoveCreature(guid)
	doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, 'Jogador com nome: '..param.nome..' Mudou para: '..param.params..'.') 
	return true
end 


function onSay(cid, words, param)
	dofile("./config.lua")
	nome = getCreatureName(cid)
	params = param
	pid = cid
	
	if param ~= "" then 
		
		local resultx = db.storeQuery("SELECT `name` FROM `players` WHERE `name` = " .. db.escapeString(param))
		if not resultx then
			
			
		end
		local value = result.getDataString(resultx, 'name')
		result.free(resultx)
		
		print("chegou aki a")
		
		if (value == param) then
			
			print("chegou aki b")		
			
			doPlayerSendCancel(cid, "Nome ja em uso.")
			return false
			
		end
		
		if (getPlayerItemCount(cid, item) < qtd) then
			doPlayerSendCancel(cid, "Voce nao possui o item.")
			
			
		elseif(not getTilePzInfo(getCreaturePosition(cid))) then
			doPlayerSendCancel(cid, "Voce precisa estar em pz para usar.")
			
		else
			
			if(string.len(tostring(params)) >= maxTextLenght) then
				doPlayerSendCancel(cid, "Ha um limite de " .. maxTextLenght .. "caracteres.")
			elseif(string.find(params:lower(), "[^%l%s]") ~= nil) then
				doPlayerSendCancel(cid, "Voce nao pode usar simbolos.")
				
			else
				for blacklist = 1, table.maxn(blacklistParam) do
					if(string.find(params:lower(), blacklistParam[blacklist]) ~= nil) then
						doPlayerSendCancel(cid, "Nome proibido.")
						return false					
						
					end
				end
				
				local paramTemp, space, oldName = '', '', getCreatureName(cid)
				
				for word in string.gmatch(params, "%a+") do
					if(string.len(word) < minWordLenght) then
						doPlayerSendCancel(cid, "Cada palavra tem um minimo de " .. minWordLenght .. " caracteres.")
						return true
					end
					
					paramTemp = "" .. paramTemp .. "" .. space .. "" .. word .. ""
					
					if(space == '') then
						space = " "
					end
					
				end
				
				local guid = getPlayerGUID(cid)
				params = paramTemp
				
				
				if(pcall(doPlayerChangeName, guid, oldName, params) == false) then
					doPlayerRemoveItem(cid, item, qtd)
					doPlayerPopupFYI(cid, " Voce mudou o nome para "..params..".\nEntre denovo para aplicar as mudancas.")
					addEvent(changeName, seconds * 1000, {cid = cid, pid = pid, params = params, nome = nome})
					doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Mudara o nome para "..params.." em "..seconds.." segundos.") 
					
				end
			end
		end
		
		
		
		
		
	else
		
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, 'Use: /changename Novonome') 
		
	end
	return true
	
end

talkactions.xml:

<talkaction words="!changename" separator=" " script="NomedoScript.lua"/>

Editado por rogaforyn2 (veja o histórico de edições)

Life is so meaningless, there is nothing worth a smile
So goodbye, I'll miss you

 

 

sugestões?

 

 

Link para o post
Compartilhar em outros sites

#edit, comentei no errado.

O melhor resposta bugou aki

Editado por rogaforyn2 (veja o histórico de edições)

Life is so meaningless, there is nothing worth a smile
So goodbye, I'll miss you

 

 

sugestões?

 

 

Link para o post
Compartilhar em outros sites

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: "OTServScriptingGeral"
Para: "OTServSuporte OTServSuporte de Scripts"

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.

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo