Ta 100% aqui...

o único problema é não poder voltar para o nome original...

Só depois de dar shutdown no ot, que volta...

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
    doPlayerRemoveItem(cid, config.item.Id, config.item.count)
    if(pcall(doPlayerChangeName, guid, oldName, t[1]) == false) then
        doRemoveCreature(cid, true)
        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 .. " LIMIT 1;")
    end

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

Editado Abril 3, 2015 10 anos por fireelement (veja o histórico de edições)

Bom dia, testei os dois e nada mudou, nome ainda continua o mesmo. Reloga, tira o item e não muda nome. Alguem tem mais alguma ideia por favor?

Testa:

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
    doPlayerRemoveItem(cid, config.item.Id, config.item.count)
    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.")
    db.executeQuery("UPDATE `players` SET `name` = " .. db.escapeString(t[1]) .. " WHERE `id` = "..getPlayerGUID(cid)..";")
    db.executeQuery("INSERT INTO `player_namelocks` (`player_id`, `name`, `new_name`, `date`) VALUES (" .. guid .. ", " .. db.escapeString(oldName) .. ", " .. db.escapeString(t[1]) .. ", " .. os.time() .. ");")
    addEvent(doRemoveCreature, config.delay * 1000, cid, true)
    end

    return true
end

Editado Abril 5, 2015 10 anos por Wakon (veja o histórico de edições)

Cara, você deve ter configurado algo errado, aqui deu perfeitamente, já testei mais de 1 vez, já mudei o nome mais de 5 vezes, tentei mudar sem o livro, não vai, e quando ta com o livro, no meu, ele remove...