[Encerrado] (Pedido) Npc

[BrunooMaciell 83]

Estou aqui pra fazer um pedido quem puder mi ajudar !!

 

Eu uso o serve do slicer sem level como base ...

 

eu queria um npc com aura separado do namer !!

 

Ex: npc namer so da o nome do poke sem aura junto e um npc aura que so dava aura

 

npc namer eo npc aura cada uma com sua funçao

 

Quem puder Ajuda !!

 

 

Rep++

[DinoAdmin 57]

Eu tenho o Npc Namer

 

Crie um Arquivo Chamado Namer.XML e cole isso dentro

 

<?xml version="1.0" encoding="UTF-8"?>
<npc name="Namer" script="nick.lua" walkinterval="350000" floorchange="0" speed="0" lookdir="2">
<health now="150" max="150"/>
<look type="614" head="115" body="122" legs="0" feet="76"/>
<parameters>

</parameters>
</npc>

 

Agora Salve em data>Npc.

 

Agora Crie Outro arquivo chamado nick.lua e cole isso dentro

 

local focus = 0
local talk_start = 0
local conv = 0
local target = 0
local following = false
local attacking = false
local talkState = {}
local finalname = ""
function onThingMove(creature, thing, oldpos, oldstackpos)
end
function onCreatureAppear(creature)
end
function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye sir!')
focus = 0
talk_start = 0
end
end
function onCreatureTurn(creature)
end
function msgcontains(txt, str)
return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)'))
end
function onCreatureSay(cid, type, msge)
local msg = string.lower(msge)
local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid

if focus == cid then
 talk_start = os.clock()
end
if (msgcontains(msg, 'hi') and (focus == 0) and (getDistanceToCreature(cid) <= 4)) then
--if not isPremium(cid) then
--selfSay("Hello, "..getCreatureName(cid).."! I'm sorry, but I can only give nicknames to pokemons for premium members!")
--return true
--end
focus = cid
conv = 1
talk_start = os.clock()
selfSay("Hello, "..getCreatureName(cid).."! I can give your pokemon a nickname, would you like it?")
elseif (msgcontains(msg, "no") or msgcontains(msg, "bye")) and focus == cid and conv ~= 3 then
selfSay("No problem then, sir. Come back when you feel like it!")
focus = 0
elseif msgcontains(msg, "yes") and focus == cid and conv == 1 then
 if getPlayerSlotItem(cid, 8).uid <= 0 then
  selfSay("Sorry, you don't have a pokemon in the main slot!")
  focus = 0
 return true
 end
selfSay("Put your pokemon at the main slot and tell me, what nickname would you like me to give to your pokemon?")
conv = 3
elseif conv == 3 and focus == cid then
local tablee = {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "x", "w", "y", "z", ".", ":", "'", '"', "~", "^", "@", "#", "$", "%", "&", "*", "(", ")", "-", "+", "_", "?", ">", "<", "•", ";", "°", "¹", "²", "³", "£", "¢", "¬", "1", "2", "3", "4", "5", "6", "7", "8", "9", "0"}
local table = {"'", '"', "!", "ã", "õ", "ç", "´", "`", "á", "à", "ó", "ò", "é", "è", "í", "ì", "ú", "ù", "¹", "²", "³", "£", "¢", "¬", "§", "°", "º", "ª", "•", "|"}
for a = 1, #table do
 if string.find(msg, table[a]) then
  selfSay("Sorry, the nick has invalid symbols.")
 return true
 end
end
if string.len(msg) <= 1 or string.len(msg) >= 19 then
 selfSay("Sorry, that nick is too long or too short!")
return true
end
local pokename = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "poke")

selfSay("Are you sure that you want to change your's "..pokename.." name to \""..msge.."\"? This is going to cost you 10 hundred dollars.")
conv = 5
finalname = msge
elseif msgcontains(msg, "yes") and focus == cid and conv == 5 then
if getPlayerSlotItem(cid, 8).uid <= 0 then
 selfSay("Where is your pokemon?! You have to keep it at the main slot!")
 focus = 0
return true
end
if doPlayerRemoveMoney(cid, 100000) == false then
 selfSay("You don't have enough money to afford this service, come back later.")
 focus = 0
 conv = 0
return true
end
local nick = ""..finalname..""
local description = "Contains a "..getItemAttribute(getPlayerSlotItem(cid, 8).uid, "poke").."."
selfSay("Done! Your pokemon now has a new name, enjoy it!")
doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "nick", nick)
local newdes = description.."\nIt's nickname is: "..finalname.."."
doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "description", newdes)
local hp = getItemAttribute(getPlayerSlotItem(cid, 8).uid, "happy")
doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, "happy", hp + 25)
if #getCreatureSummons(cid) >= 1 then
 adjustStatus(getCreatureSummons(cid)[1], getPlayerSlotItem(cid, 8).uid)
end
focus = 0
conv = 0
end
end

local intervalmin = 38
local intervalmax = 70
local delay = 25
local number = 1
local messages = {"Want to give some nicknames to your pokemon? Talk to me!",
   "Did you know your pokemon gets a little happier when you give him a nickname?",
   "Every pokemon wants to have a nickname! Come talk to me!",
   "Pokemons love nicknames, you should give yours one.",
  }
function onThink()
if focus == 0 then
 selfTurn(1)
  delay = delay - 0.5
  if delay <= 0 then
selfSay(messages[number])
number = number + 1
 if number > #messages then
  number = 1
 end
delay = math.random(intervalmin, intervalmax)
  end
 return true
else
if not isCreature(focus) then
 focus = 0
return true
end
 local npcpos = getThingPos(getThis())
 local focpos = getThingPos(focus)
 if npcpos.z ~= focpos.z then
  focus = 0
 return true
 end
 if (os.clock() - talk_start) > 45 then
  focus = 0
  selfSay("Come back some other time!")
 end
 if getDistanceToCreature(focus) > 3 then
  selfSay("Enjoy!")
  focus = 0
 return true
 end
 local dir = doDirectPos(npcpos, focpos) 
 selfTurn(dir)
end

return true
end

 

Esse é o Npc de Namer o de aura eu nao tenho.

Espero ter ajudado

[SmiX 265]

Área incorreta. Reportado!

[Yan Oliveira 211]

@DinoAdmin

 

Quando fizer scripts grandes, coloque em spoiler para facilitar e para deixar o topico menor.

Editado Novembro 21, 2012 por Yan18

[Prezyoso 44]

Amgs, a área está certa pois se refere a SD...

 

Eu mesmo fiz um topico sobre um script, sendo que era de SD na área de scripting, sem pensar já moveram paracá.

[BrunooMaciell 83]

podem fexar este topico !!

 

eu mesmo ja fiz isto ^^

 

obrigado a todos que tento ajudar ;D

[Yan Oliveira 211]

Duvida Resolvida, peça para mover.

 

Atenc. Yan18.

[Prezyoso 44]

Duvida sanada, movido.

[Stigal 584]

A questão neste tópico de suporte foi encerrada por falta de respostas. Este tópico está fechado e foi movido para Suporte - Tópicos Sem Resposta.

+ Caso a dúvida não tenha sido resolvida você poderá criar outro tópico solicitando ajuda.
* Lembre-se que é permitido dar UP no tópico a cada 24 horas para assim o destacar e manter movimentado.