Ajuda Com /rename ? Pra Ter Um "x" Preço

[hithfrin 3]

Bom galera eu peguei uma script de rename tudo funciono normal mais queria

poder deixar esse comando pros player por "x" preço como um aol,que precisa de "x"

money e vir uma msg você não tem dinheiro suficiente.

 

Obrigado !

 

 

--Player rename by Mock the bear (MTB)

 

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

 

[caotic 393]

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 dimdim = 40 ----------------EDITE AKI O DINHIERO QUE SERA REMOVIDO

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 not getPlayerMoney(cid) >= dimdim then

doCreatureSay(cid,"Nao posso pagar é "..dimdim..",1)

return true

end

doPlayerRemoveMoney(cid, dimdim)

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

Editado Maio 14, 2012 por caotic

[hithfrin 3]

caotic

 

obrigado por ta ajudando a talk bugo ;s

[MatheusVidaLoka 24]

Vou ver aqui mais esse script é talkactions ?

[hithfrin 3]

Vou ver aqui mais esse script é talkactions ?

 

é sim

[Lucaswc15 20]

Diz o bug no executor?

[hithfrin 3]

Não aparece bug no executador apenas para de funcionar a talk.

[Lucaswc15 20]

Tenta esse:

 

 

 

 

 

 

 

 

 

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)

local dimdim = 40 ----------------EDITE AKI O DINHIERO QUE SERA REMOVIDO

if not getPlayerMoney(cid) >= dimdim then

doCreatureSay(cid,"Nao posso pagar é "..dimdim..",1)

return true

end

doPlayerRemoveMoney(cid, dimdim)

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

 

 

[hithfrin 3]

Tenta esse:

 

ainda não deu =/

[Lucaswc15 20]

Eu testei aqui e funcionou, desculpa entao cara, nao sei qual é o problema. Nao vou poder te ajudar nessa.

Editado Maio 14, 2012 por Lucaswc15

[hithfrin 3]

Eu testei aqui e funcionou, desculpa entao cara, nao sei qual é o problema. Nao vou poder te ajudar nessa.

 

ta certo vlw pela ajuda vo ficar tentando aqui

 

Obrigado !