(Resolvido){Resolvido} [TalkAction] Comando Change Name que remove item.

[DboHere 16]

function onSay(cid, words, param) 
local maxLen = 10 -- tamanho maximo do nome 
local itemid = 4343  ------ Numero do Item que será removido 
local proibido = {"!","@","*"} -- simbolos proibidos


for i = 1, #proibido do 
if string.find(tostring(param), proibido) then 
doPlayerSendCancel(cid,"Não pode usar símbolos em seu nome.") 
return TRUE 
end 
end 

if tostring(param) == "" then -- checkar se não é nome vazio 
doPlayerSendCancel(cid, "Você deve informar um nome.") 
return TRUE 
end 

if string.len(tostring(param)) > maxLen then 
doPlayerSendCancel(cid, "Você pode usar no máximo " .. maxLen .. " letras.") 
return TRUE 
end 

if not getTilePzInfo(getCreaturePosition(cid)) then 
doPlayerSendCancel(cid,"So pode ser usado em pz.") 
return TRUE 
end 

if getPlayerItemCount(cid, itemid) >= 1 then 
doPlayerRemoveItem(cid, itemid, 1) 
db.Query("UPDATE `players` SET `name` = '"..param.."' WHERE `id` = "..getPlayerGUID(cid)..";") 
doPlayerSendTextMessage(cid,25,"Você será kickado em 5 segundos.") 
addEvent(doRemoveCreature, 5*1000, cid, true) 
else 
doPlayerSendCancel(cid,"Você não possui o item " .. getItemNameById(itemid) .. ".") 
end 
return TRUE 
end

[dimmebag 5]

@yanloco70 Nada...

[DboHere 16]

function onSay(cid, words, param) 
local maxLen = 20 -- tamanho maximo do nome 
local itemid = 5958 ------ Numero do Item que será removido 
local proibido = {"!","@","*"} -- simbolos proibidos

for i = 1, #proibido do 
if string.find(tostring(param), proibido) then 
doPlayerSendCancel(cid,"Não pode usar símbolos em seu nome.") 
return TRUE 
end 
end 

if tostring(param) == "" then -- checkar se não é nome vazio 
doPlayerSendCancel(cid, "Você deve informar um nome.") 
return TRUE 
end 

if string.len(tostring(param)) > maxLen then 
doPlayerSendCancel(cid, "Você pode usar no máximo " .. maxLen .. " letras.") 
return TRUE 
end 

if param:lower() ~= param then
doPlayerSendCancel(cid, "Você não pode usar letras maiúsculas.")
return TRUE
end

if not getTilePzInfo(getCreaturePosition(cid)) then 
doPlayerSendCancel(cid,"So pode ser usado em pz.") 
return TRUE 
end 

if getPlayerItemCount(cid, itemid) >= 1 then 
doPlayerRemoveItem(cid, itemid, 1) 
db.Query("UPDATE `players` SET `name` = '"..param.."' WHERE `id` = "..getPlayerGUID(cid)..";") 
doPlayerSendTextMessage(cid,25,"Você será kickado em 5 segundos.") 
addEvent(doRemoveCreature, 5*1000, cid, true) 
else 
doPlayerSendCancel(cid,"Você não possui o item " .. getItemNameById(itemid) .. ".") 
end 
return TRUE 
end

[dimmebag 5]

  Em 06/10/2017 em 01:06, yanloco70 disse:

function onSay(cid, words, param) 
local maxLen = 20 -- tamanho maximo do nome 
local itemid = 5958 ------ Numero do Item que será removido 
local proibido = {"!","@","*"} -- simbolos proibidos

for i = 1, #proibido do 
if string.find(tostring(param), proibido) then 
doPlayerSendCancel(cid,"Não pode usar símbolos em seu nome.") 
return TRUE 
end 
end 

if tostring(param) == "" then -- checkar se não é nome vazio 
doPlayerSendCancel(cid, "Você deve informar um nome.") 
return TRUE 
end 

if string.len(tostring(param)) > maxLen then 
doPlayerSendCancel(cid, "Você pode usar no máximo " .. maxLen .. " letras.") 
return TRUE 
end 

if param:lower() ~= param then
doPlayerSendCancel(cid, "Você não pode usar letras maiúsculas.")
return TRUE
end

if not getTilePzInfo(getCreaturePosition(cid)) then 
doPlayerSendCancel(cid,"So pode ser usado em pz.") 
return TRUE 
end 

if getPlayerItemCount(cid, itemid) >= 1 then 
doPlayerRemoveItem(cid, itemid, 1) 
db.Query("UPDATE `players` SET `name` = '"..param.."' WHERE `id` = "..getPlayerGUID(cid)..";") 
doPlayerSendTextMessage(cid,25,"Você será kickado em 5 segundos.") 
addEvent(doRemoveCreature, 5*1000, cid, true) 
else 
doPlayerSendCancel(cid,"Você não possui o item " .. getItemNameById(itemid) .. ".") 
end 
return TRUE 
end

Expand   Mostrar mais  

O erro é nessa linha: if string.find(tostring(param), proibido) then 

"bad argument #2 to 'find' (string expected, got table)
stack traceback:
[C]: in function 'find'"

[DboHere 16]

function onSay(cid, words, param) 
local maxLen = 10 -- tamanho maximo do nome 
local itemid = 4343  ------ Numero do Item que será removido 

if tostring(param) == "" then -- checkar se não é nome vazio 
doPlayerSendCancel(cid, "Você deve informar um nome.") 
return TRUE 
end 

if string.len(tostring(param)) > maxLen then 
doPlayerSendCancel(cid, "Você pode usar no máximo " .. maxLen .. " letras.") 
return TRUE 
end 

if not getTilePzInfo(getCreaturePosition(cid)) then 
doPlayerSendCancel(cid,"So pode ser usado em pz.") 
return TRUE 
end 

if getPlayerItemCount(cid, itemid) >= 1 then 
doPlayerRemoveItem(cid, itemid, 1) 
db.executeQuery("UPDATE `players` SET `name` = '"..param.."' WHERE `id` = "..getPlayerGUID(cid)..";") 
doPlayerSendTextMessage(cid,25,"Você será kickado em 5 segundos.") 
addEvent(doRemoveCreature, 5*1000, cid, true) 
else 
doPlayerSendCancel(cid,"Você não possui o item " .. getItemNameById(itemid) .. ".") 
end 
return TRUE 
end

To Tentando cara.... N manjo de script