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

hithfrin
em Scripts

hithfrin

Shara Levon
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 29/12/08Posts: 49Char no Tibia: black levon

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

Afinal de contas,sou um mordomo e tanto
avatar
Infante
Infante

INFOS

Grupo: InfanteRegistrado: 04/03/11Posts: 1599Char no Tibia: No Have
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

hithfrin

Shara Levon
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 29/12/08Posts: 49Char no Tibia: black levon

caotic

 

obrigado por ta ajudando a talk bugo ;s

hithfrin

Shara Levon
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 29/12/08Posts: 49Char no Tibia: black levon

Vou ver aqui mais esse script é talkactions ?

 

é sim

Lucaswc15

avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 13/11/11Posts: 190Char no Tibia: Sweesh

Diz o bug no executor?

Ajudei?

 

REP+

hithfrin

Shara Levon
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 29/12/08Posts: 49Char no Tibia: black levon

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

Lucaswc15

avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 13/11/11Posts: 190Char no Tibia: Sweesh

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

 

 

Ajudei?

 

REP+

hithfrin

Shara Levon
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 29/12/08Posts: 49Char no Tibia: black levon

Tenta esse:

 

ainda não deu =/

Lucaswc15

avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 13/11/11Posts: 190Char no Tibia: Sweesh

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

Ajudei?

 

REP+

hithfrin

Shara Levon
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 29/12/08Posts: 49Char no Tibia: black levon

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 !