Rename Help Plsi ;/

HighSaintess · Outubro 14, 2011

Oiie eu ashei esse script é um ot , e quero edita-lo so que não manjo. ;/

Alguem me ensina como valida o caracteres '[' ']' Quero na hora que eu vo digitar o rename , eu possas tb mudar o nome com essas "[]" se alguem me ajuda fico muito grato.

taae.

function sugested() --GName generator
       local cons = {'b','c','d','f','g','h','i','j','k','l','m','n','  p','q','r','s','t','v','x','y','z'}
       local vog = {"a",'e','i','o','u'}
       local sibalas = {}
       for i=1,#cons do
          for e=1,#vog do
                 table.insert(sibalas,1,cons[i]..vog[e])
          end
       end
   local total = ""
   for i=1,math.random(1,2) do
               local nam = ""
               for i=1,math.random(2,4) do
                       nam = nam..sibalas[math.random(1,#sibalas)]
               end
               if math.random(1,2) == 1 then
                  nam = nam..vog[math.random(1,#vog)]
               elseif math.random(1,2) == 2 then
                  nam = nam..cons[math.random(1,#vog)]
               end
               total = total..(i == 2 and ' ' or '')..nam:sub(1,1):upper()..nam:sub(2,-1)
   end
       return total
end
function onSay(cid, words, param, channel)
       if param == 'gen' then
               doCreatureSay(cid,'Suggested name: '..sugested(),1)
               return true
       end
       local param1,param2 = param:match('(.-)[;:,.]%s*(.+)')
       param = param1 or param
       param2 = param2 or sugested()
       if not param then
               doPlayerSendTextMessage(cid,25,'Use like this: /rename Old name, New name')
               return true
       end
       if param2:len() <= 2 or param2:len() > 20 then
               doPlayerSendTextMessage(cid,25,'Please 3-20 characters.')
               return true
       end
       if param2:match('[%a%d%s%u%l]+') ~= param2 then
               doPlayerSendTextMessage(cid,25,'Please only A-Z 0-9')
               return true
       end
       param2 = param2:sub(1,1):upper()..param2:sub(2,-1)

       local p2 = getPlayerByName(param)
       if p2 and isPlayer(p2) then
               local id = getPlayerGUID(p2)
               doPlayerPopupFYI(p2,'Changing your name. Please login aigan on your character list.')
               addEvent(doRemoveCreature,2000,p2)
               addEvent(function(id,param2)
                       db.executeQuery("UPDATE `players` SET `name` =  '"..param2.."' WHERE `id` ="..id)
               end,2100,id,param2)
       else
               doPlayerSendTextMessage(cid,25,'Player '..param..' not found.')
               return true
       end
       return TRUE
end

Obrigado

Outubro 14, 2011

end
return total

end

function onSay(cid, words, param, channel)

if param == 'gen' then

doCreatureSay(cid,'Suggested name: '..sugested(),1)

return true

end

local param1,param2 = param:match('(.-)[;:,.]%s*(.+)')

param = param1 or param

param2 = param2 or sugested()

if not param then

doPlayerSendTextMessage(cid,25,'Use like this: /rename Old name, New name')

return true

end

if param2:len() <= 2 or param2:len() > 20 then

doPlayerSendTextMessage(cid,25,'Please 3-20 characters.')

return true

end

if param2:match('[%a%d%s%u%l]+') ~= param2 then

doPlayerSendTextMessage(cid,25,'Please only A-Z 0-9')

return true

end

param2 = param2:sub(1,1):upper()..param2:sub(2,-1)

Vermelho -- Ai sao as restricoes.

Entao para voce usar [''] no nome o script ficaria assim :

function sugested() --GName generator
local cons = {'b','c','d','f','g','h','i','j','k','l','m','n',' p','q','r','s','t','v','x','y','z'}

local vog = {"a",'e','i','o','u'}

local sibalas = {}

for i=1,#cons do

for e=1,#vog do

table.insert(sibalas,1,cons..vog[e])

end

end

local total = ""

for i=1,math.random(1,2) do

local nam = ""

for i=1,math.random(2,4) do

nam = nam..sibalas[math.random(1,#sibalas)]

end

if math.random(1,2) == 1 then

nam = nam..vog[math.random(1,#vog)]

elseif math.random(1,2) == 2 then

nam = nam..cons[math.random(1,#vog)]

end

total = total..(i == 2 and ' ' or '')..nam:sub(1,1):upper()..nam:sub(2,-1)

end

return total

end

function onSay(cid, words, param, channel)

if param == 'gen' then

doCreatureSay(cid,'Suggested name: '..sugested(),1)

return true

end

local param1,param2 = param:match((.-);:,.%s*(.+))

param = param1 or param

param2 = param2 or sugested()

if not param then

doPlayerSendTextMessage(cid,25,'Use like this: /rename Old name, New name')

return true

end

if param2:len() <= 2 or param2:len() > 20 then

doPlayerSendTextMessage(cid,25,'Please 3-20 characters.')

return true

end

if param2:match('[%a%d%s%u%l]+') ~= param2 then

doPlayerSendTextMessage(cid,25,'Please only A-Z 0-9')

return true

end

param2 = param2:sub(1,1):upper()..param2:sub(2,-1)

local p2 = getPlayerByName(param)

if p2 and isPlayer(p2) then

local id = getPlayerGUID(p2)

doPlayerPopupFYI(p2,'Changing your name. Please login aigan on your character list.')

addEvent(doRemoveCreature,2000,p2)

addEvent(function(id,param2)

db.executeQuery("UPDATE `players` SET `name` = '"..param2.."' WHERE `id` ="..id)

end,2100,id,param2)

else

doPlayerSendTextMessage(cid,25,'Player '..param..' not found.')

return true

end

return TRUE

end

Roxo -- O que foi mudado para voce poder colocar [''] no nome .

Se era isso que voce queria , Da REP+?

Editado Outubro 14, 2011 por StremeMakky

HighSaintess · Outubro 15, 2011

Manow eu naum sei mto de script mais ja havia feito isso antes ,

so que smpre da a mesma coisa da por EXE: Player [VIP] Kypros, [VIP] [Kypros] not found. Tentei adcionar mais

2 "[]" e deu nisso

pareçeu qe elle junto antes e dps da virgula mais msm assim agradeço *-*

Outubro 15, 2011

Agora que eu vi tem mais um :

end
return total

end

function onSay(cid, words, param, channel)

if param == 'gen' then

doCreatureSay(cid,'Suggested name: '..sugested(),1)

return true

end

local param1,param2 = param:match('(.-)[;:,.]%s*(.+)')

param = param1 or param

param2 = param2 or sugested()

if not param then

doPlayerSendTextMessage(cid,25,'Use like this: /rename Old name, New name')

return true

end

if param2:len() <= 2 or param2:len() > 20 then

doPlayerSendTextMessage(cid,25,'Please 3-20 characters.')

return true

end

if param2:match('[%a%d%s%u%l]+') ~= param2 then

doPlayerSendTextMessage(cid,25,'Please only A-Z 0-9')

return true

end

param2 = param2:sub(1,1):upper()..param2:sub(2,-1)

Vermelho -- As restricoes

Dai ficaria assim o script :

function sugested() --GName generator
local cons = {'b','c','d','f','g','h','i','j','k','l','m','n',' p','q','r','s','t','v','x','y','z'}

local vog = {"a",'e','i','o','u'}

local sibalas = {}

for i=1,#cons do

for e=1,#vog do

table.insert(sibalas,1,cons..vog[e])

end

end

local total = ""

for i=1,math.random(1,2) do

local nam = ""

for i=1,math.random(2,4) do

nam = nam..sibalas[math.random(1,#sibalas)]

end

if math.random(1,2) == 1 then

nam = nam..vog[math.random(1,#vog)]

elseif math.random(1,2) == 2 then

nam = nam..cons[math.random(1,#vog)]

end

total = total..(i == 2 and ' ' or '')..nam:sub(1,1):upper()..nam:sub(2,-1)

end

return total

end

function onSay(cid, words, param, channel)

if param == 'gen' then

doCreatureSay(cid,'Suggested name: '..sugested(),1)

return true

end

local param1,param2 = param:match((.-);:,.%s*(.+))

param = param1 or param

param2 = param2 or sugested()

if not param then

doPlayerSendTextMessage(cid,25,'Use like this: /rename Old name, New name')

return true

end

if param2:len() <= 2 or param2:len() > 20 then

doPlayerSendTextMessage(cid,25,'Please 3-20 characters.')

return true

end

if param2:match(%a%d%s%u%l+) ~= param2 then

doPlayerSendTextMessage(cid,25,'Please only A-Z 0-9')

return true

end

param2 = param2:sub(1,1):upper()..param2:sub(2,-1)

local p2 = getPlayerByName(param)

if p2 and isPlayer(p2) then

local id = getPlayerGUID(p2)

doPlayerPopupFYI(p2,'Changing your name. Please login aigan on your character list.')

addEvent(doRemoveCreature,2000,p2)

addEvent(function(id,param2)

db.executeQuery("UPDATE `players` SET `name` = '"..param2.."' WHERE `id` ="..id)

end,2100,id,param2)

else

doPlayerSendTextMessage(cid,25,'Player '..param..' not found.')

return true

end

return TRUE

end

Se deu certo REP+?

Editado Outubro 15, 2011 por StremeMakky

HighSaintess · Outubro 15, 2011

não deu agr , elle naum executa funçao nenhuma

fica como se eu tivesse flando normal , mais msm assim obrigado XD.

Entrar

Rename Help Plsi ;/

Posts Recomendados

HighSaintess 1

Link para o comentário

Compartilhar em outros sites

141831 16

Link para o comentário

Compartilhar em outros sites

HighSaintess 1

Link para o comentário

Compartilhar em outros sites

141831 16

Link para o comentário

Compartilhar em outros sites

HighSaintess 1

Link para o comentário

Compartilhar em outros sites

Quem Está Navegando 0 membros estão online

Conteúdo Similar

script alguém pode me ajudar nessa spells aqui, queira que colocassem pro meu personagem ficar inatingível por 6 segundos e podendo atacar livremente

Letreiro ao entrar em local

event Erro LineAnimation Snowball Event

Autoloot não stacka os items coletados

Mob sangra Gold / Monster bleeds gold

Fóruns

Tutoriais

Suporte