(Resolvido)Comando

[Lumus 19]

Olá, galera, preciso da ajuda docêis...

 

Quero que nesse script, o admin precise colocar o motivo do banimento. Ex:

 

/ban Teste, Arroz é bom.

Aonde teste = nome do personagem
e Arroz é bom o comentário.

Se possível também, colocar assim:

 

/ban Teste, Arroz é bom, 7

Aonde 7 = número de dias que ele ficará banido.

No lugar do 7 possa ser QUALQUER número.

 

Ao usar o comando, manda uma mensagem para todos assim:

13:14 ADM: A conta do jogador Teste  foi banida por 7 dias. Motivo: Arroz é bom.

 

Script:

local banDays = 7
function onSay(cid, words, param)
	local player = Player(cid)
	if not player:getGroup():getAccess() then
		return true
	end

	local accountId = getAccountNumberByPlayerName(param)
	if accountId == 0 then
		return false
	end

	local resultId = db.storeQuery("SELECT 1 FROM `account_bans` WHERE `account_id` = " .. accountId)
	if resultId ~= false then
		result.free(resultId)
		return false
	end

	local timeNow = os.time()
	db:query("INSERT INTO `account_bans` (`account_id`, `reason`, `banned_at`, `expires_at`, `banned_by`) VALUES (" ..
			accountId .. ", '', " .. timeNow .. ", " .. timeNow + (banDays * 86400) .. ", " .. player:getGuid() .. ")")

	local target = Player(param)
	if target ~= nil then
		player:sendTextMessage(TALKTYPE_BROADCAST,"" .. player:getName() .. ", A conta do jogador ".. target:getName() .. " foi banida por 7 dias.")
		player:sendTextMessage(TALKTYPE_BROADCAST,"" .. player:getName() .. ": A conta do jogador ".. target:getName() .. " foi banida por 7 dias.")
		target:remove()
	else
		player:sendTextMessage(TALKTYPE_BROADCAST,"" .. player:getName() .. ", A conta do jogador ".. param .. " foi banida por 7 dias.")
		player:sendTextMessage(TALKTYPE_BROADCAST,"" .. player:getName() .. ": A conta do jogador ".. param .. "  foi banida por 7 dias.")
	end
end

Espero que possam me ajudar, ficarei grato a todos.

Editado Outubro 24, 2014 por Lumus (veja o histórico de edições)

[Absolute 0]

Tu quer  um parâmetro para adicionar coment e days no caso, mandando em default all pra todos quando o ADMIN executar a ação?

[Lumus 19]

Tu quer  um parâmetro para adicionar coment e days no caso, mandando em default all pra todos quando o ADMIN executar a ação?

Sim.

[Lumus 19]

up

Editado Outubro 26, 2014 por Lumus (veja o histórico de edições)

[Lumus 19]

up

[narazaky 61]

So colocar para ler os parametros e acrescenta-los na posição que voce quer.

e por para aparecer em broadcast

[Lumus 19]

já tentei, e não vai... é tfs 1.0 é cheio de frescuras.

[Absolute 0]

Frescuras jovem? só tu alterar as funções meu filho.

E vale constar que a função do broadcast é a mesma.

sendChannelMessage

:*

[Alienbear 58]

Facinho de fazer isso

adiciona um parâmetro days e um parâmetro comment.

seguindo obviamente as funções disponiveis no tfs 1.0

 

logo o broadcast seria

player:sendTextMessage(TALKTYPE_BROADCAST,"" .. player:getName() .. ", A conta do jogador ".. param .. " foi banida por ".. param .." dias, Por ".. param .." Motivo.")

[Lumus 19]

Entendi isso não '-'

[narazaky 61]

Pior que é mesmo, só esta reconhecendo o primeiro parametro, a partir do segundo ele nao reconhece D:

[xWhiteWolf 3009]

faz string.explode no param pra dividir ele.. usa virgula como separador e chama a nova table de string de t..
daí vc substitui param por t[1] e dps faz as respectivas verificações pra garantir que t[2] seja uma string e t[3] seja um número. Feito isso vc coloca o local banDays dentro do callback e faz ele ser igual ao t[3] (dps de garantir que seja um numero) e no final adiciona os extras de mandar broadcast e salvar na db nessa parte aqui:

, '',

 

vc vai colocar "..t[2].." no lugar desse ''

[narazaky 61]

faz string.explode no param pra dividir ele.. usa virgula como separador e chama a nova table de string de t..

daí vc substitui param por t[1] e dps faz as respectivas verificações pra garantir que t[2] seja uma string e t[3] seja um número. Feito isso vc coloca o local banDays dentro do callback e faz ele ser igual ao t[3] (dps de garantir que seja um numero) e no final adiciona os extras de mandar broadcast e salvar na db nessa parte aqui:

vc vai colocar "..t[2].." no lugar desse ''

Eu fiz isso, o tfs 1.0 nao reconhece o explode, para resolver isso coloquei "params = string:param(",")"

ficando assim:

db:query("INSERT INTO `account_bans` (`account_id`, `reason`, `banned_at`, `expires_at`, `banned_by`) VALUES (" ..
			accountId .. ", "..params[2]..", " .. timeNow .. ", " .. timeNow + (banDays * 86400) .. ", " .. player:getGuid() .. ")") 

ele reconheceu, e ate vai, porem na hora de colocar na database ele nao aceita nenhum parametro depois do primeiro

so se eu usar o comando assim: /ban nome   se for assim /ban nome, comment   nao vai. nem aparece erro na distro

[xWhiteWolf 3009]

não reconhece porque vc fez o explode errado e não existe params[2]. string.explode é um comando da própria linguagem lua e não altera com a versão do tfs...

[Lumus 19]

Se não for muito encomodo, poderia fazer pra mim? não entendi nada do que falou

[narazaky 61]

Aqui o que eu fiz:

local banDays = 7

 

function onSay(cid, words, param, channel)

local t = string.explode(string.lower(param), ",")

local player = Player(cid)

if not player:getGroup():getAccess() then

return true

end

 

local accountId = getAccountNumberByPlayerName(t[1])

if accountId == 0 then

return false

end

 

local resultId = db.storeQuery("SELECT 1 FROM `account_bans` WHERE `account_id` = " .. accountId)

if resultId ~= false then

result.free(resultId)

return false

end

if t[2] then

coment = t[2]

else

coment = "Quebra de regra"

end

local timeNow = os.time()

db:query("INSERT INTO `account_bans` (`account_id`, `reason`, `banned_at`, `expires_at`, `banned_by`) VALUES (" ..

accountId .. ", '"..coment.."', " .. timeNow .. ", " .. timeNow + (banDays * 86400) .. ", " .. player:getGuid() .. ")")

 

local target = Player(param)

if target ~= nil then

player:sendTextMessage(MESSAGE_EVENT_ADVANCE, target:getName() .. " has been banned.")

target:remove()

else

player:sendTextMessage(MESSAGE_EVENT_ADVANCE, param .. " has been banned.")

end

end

  erro que retorna:

colocando o que falei antes nao dava erro

local split = param:split(",")

[xWhiteWolf 3009]

nao dar erro não indica que tá certo uhauhauh, eu não tenho nenhum TFS pra testar mas coloca um for pra printar todo o conteudo dessa tabela que vc tá criando com string.split

[Absolute 0]

já cansei de falar que explode n funfa em tfs 1.0

[narazaky 61]

já cansei de falar que explode n funfa em tfs 1.0

isso que estou falando...

coloquei o outro comando e funcionou, porem a db nao aceitava os caracteres que mandava por causa do espaço

[Lumus 19]

isso que estou falando...

coloquei o outro comando e funcionou, porem a db nao aceitava os caracteres que mandava por causa do espaço

é, aqui também da a mesma coisa da db.