Ir para conteúdo
TK News
  • Cadastre-se

(Resolvido)[AJUSTE] NPC de pokemon inicial

tavarb
 Share Seguidores 0
Ir para solução Resolvido por Nazo,

Posts Recomendados

tavarb

tavarb 2

Postado
Postado

Problema: O NPC não consegue criar o pokémon na pokebola (ele coloca a descrição "Charmander/Squirtle/Bulbasaur"(dependendo da escolha)
 

 

okok.png?1516396161

Como está: 

Ele responde o chat, entrega os devidos itens, mas não é possível colocar a pokebola na hand correta.

LARANJA: POKEBOLA LOOK E POKEBOLA.

VERMELHO: NÃO É POSSÍVEL COLOCAR NA MÃO.

 

Como preciso:

Preciso que o pokemon saia da pokebola certinho.

 

.LUA: 

local focus = 0 -- NÃO EDITE ISSO
local talk_start = 0 -- NÃO EDITE ISSO
local target = 0 -- NÃO EDITE ISSO
local following = false -- NÃO EDITE ISSO
local attacking = false -- NÃO EDITE ISSO
local newbie = 1010101
function onCreatureDisappear(cid, pos)
if focus == cid then
selfSay('Good bye then.')
focus = 0
talk_start = 0
end
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, msg)
local health = 1000
local maxhealth = 1000
newbies = getPlayerStorageValue(cid,newbie)
msg = string.lower(msg)
newperson = getPlayerStorageValue(cid,newbie)
if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then
selfSay('Hello, I am professor Hoa. I was once a legendary pokemon trainer, now I have switched to studies in the laboratory of Professor Oak.')
focus = cid
talk_start = os.clock()
elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
selfSay('Sorry, wait your turn.')
elseif focus == cid then
talk_start = os.clock()
if msgcontains(msg, 'help') and newbies <= 0 then
selfSay('I have a charmander, squirtle anh bulbasaur. I can give you one pokemon to help you make your journey, would you like?')
talk_state = 1
elseif talk_state == 1 and newbies <= 0 then
if msgcontains(msg, 'yes') then
selfSay('Ok, so what pokemon you like?')
talk_state_s = 2
elseif talk_state_s == 2 then
if msgcontains(msg, 'bulbasaur') then
local description = "Contains a Bulbasaur."
local poke1 = "This is Bulbasaur's pokeball. HP = ["..health.."/"..maxhealth.."]"
item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", poke1)
doItemSetAttribute(item, "nome", "Bulbasaur")
doItemSetAttribute(item, "description", description)
doPlayerAddItemEx(cid, item, true)
doTransformItem(item, 15679)
doPlayerAddItem(cid, 2394, 16)
doPlayerAddItem(cid, 2391, 4)
doPlayerAddItem(cid, 2393, 1)
doPlayerAddItem(cid, 12348, 1)
doPlayerAddSoul(cid, 1)
setPlayerStorageValue(cid, 54842, "Bulbasaur, ")
selfSay("Here is your Bulbasaur and some supplies.")
setPlayerStorageValue(cid,newbie,1)
elseif msgcontains(msg, 'charmander') then
local description = "Contains a Charmander."
local poke1 = "This is Charmander's pokeball. HP = ["..health.."/"..maxhealth.."]"
item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", poke1)
doItemSetAttribute(item, "nome", "Charmander")
doItemSetAttribute(item, "description", description)
doPlayerAddItemEx(cid, item, true)
doTransformItem(item, 15679)
doPlayerAddItem(cid, 2394, 14)
doPlayerAddItem(cid, 2391, 2)
doPlayerAddItem(cid, 12347, 1)
doPlayerAddSoul(cid, 1)
setPlayerStorageValue(cid, 54842, "Charmander, ")
selfSay("Here is your Charmander and some supplies.")
setPlayerStorageValue(cid,newbie,1)
elseif msgcontains(msg, 'squirtle') then
local description = "Contains a Squirtle."
local poke1 = "This is Squirtle's pokeball. HP = ["..health.."/"..maxhealth.."]"
item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", poke1)
doItemSetAttribute(item, "nome", "Squirtle")
doItemSetAttribute(item, "description", description)
doTransformItem(item, 15679)
doPlayerAddItem(cid, 2394, 18)
doPlayerAddItem(cid, 2391, 6)
doPlayerAddItem(cid, 2392, 1)
doPlayerAddItem(cid, 12346, 1)
doPlayerAddSoul(cid, 1)
setPlayerStorageValue(cid, 54842, "Squirtle, ")
selfSay("Here is your Squirtle and some supplies.")
setPlayerStorageValue(cid,newbie,1)
elseif msgcontains(msg, 'no') then
selfSay("OK... What you want?")
elseif msgcontains(msg, 'bye') then
selfSay("OK! Bye...")
focus = 0
talk_start = 0
else
selfSay("Tell me what pokemon you like?")
end
elseif msgcontains(msg, 'no') then
selfSay("OK... What you want?")
talk_state = 0
elseif msgcontains(msg, 'bye') then
selfSay("OK! Bye...")
focus = 0
talk_start = 0
end
elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 2 then
selfSay('Good bye!')
focus = 0
talk_start = 0
end
end
end


function onThink()
doNpcSetCreatureFocus(focus)
if (os.clock() - talk_start) > 30 then
if focus > 0 then
selfSay('Bye...')
end
focus = 0
end
if focus ~= 0 then
if getDistanceToCreature(focus) >= 2 then
selfSay('Good bye then.')
focus = 0
end
end
end

 

 

Link para o post
Compartilhar em outros sites
  • Solução
Nazo

Nazo 56

Postado
  • Solução
Postado

Tentei no olho aqui @tavarb, vê se funciona aí: 

local focus = 0 -- NÃO EDITE ISSO
local talk_start = 0 -- NÃO EDITE ISSO
local target = 0 -- NÃO EDITE ISSO
local following = false -- NÃO EDITE ISSO
local attacking = false -- NÃO EDITE ISSO
local newbie = 1010101
function onCreatureDisappear(cid, pos)
	if focus == cid then
		selfSay('Good bye then.')
		focus = 0
		talk_start = 0
	end
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, msg)
	local health = 1000
	local maxhealth = 1000
	newbies = getPlayerStorageValue(cid,newbie)
	msg = string.lower(msg)
	newperson = getPlayerStorageValue(cid,newbie)
	if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then
		selfSay('Hello, I am professor Hoa. I was once a legendary pokemon trainer, now I have switched to studies in the laboratory of Professor Oak.')
		focus = cid
		talk_start = os.clock()
	elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then
		selfSay('Sorry, wait your turn.')
	elseif focus == cid then
		talk_start = os.clock()
		if msgcontains(msg, 'help') and newbies <= 0 then
			selfSay('I have a charmander, squirtle anh bulbasaur. I can give you one pokemon to help you make your journey, would you like?')
			talk_state = 1
		elseif talk_state == 1 and newbies <= 0 then
			if msgcontains(msg, 'yes') then
				selfSay('Ok, so what pokemon you like?')
				talk_state_s = 2
			elseif talk_state_s == 2 then
				if msgcontains(msg, 'bulbasaur') then
					addPokeToPlayer(cid, "Bulbasaur", 0, nil, "poke")
					doPlayerAddItem(cid, 2394, 16)
					doPlayerAddItem(cid, 2391, 4)
					doPlayerAddItem(cid, 2393, 1)
					doPlayerAddItem(cid, 12348, 1)
					doPlayerAddSoul(cid, 1)
					setPlayerStorageValue(cid, 54842, "Bulbasaur, ")
					selfSay("Here is your Bulbasaur and some supplies.")
					setPlayerStorageValue(cid,newbie,1)
				elseif msgcontains(msg, 'charmander') then
					local description = "Contains a Charmander."
					local poke1 = "This is Charmander's pokeball. HP = ["..health.."/"..maxhealth.."]"
					addPokeToPlayer(cid, "Charmander", 0, nil, "poke")
					doPlayerAddItem(cid, 2394, 14)
					doPlayerAddItem(cid, 2391, 2)
					doPlayerAddItem(cid, 12347, 1)
					doPlayerAddSoul(cid, 1)
					setPlayerStorageValue(cid, 54842, "Charmander, ")
					selfSay("Here is your Charmander and some supplies.")
					setPlayerStorageValue(cid,newbie,1)
				elseif msgcontains(msg, 'squirtle') then
					local description = "Contains a Squirtle."
					local poke1 = "This is Squirtle's pokeball. HP = ["..health.."/"..maxhealth.."]"
					addPokeToPlayer(cid, "Squirtle", 0, nil, "poke")
					doPlayerAddItem(cid, 2394, 18)
					doPlayerAddItem(cid, 2391, 6)
					doPlayerAddItem(cid, 2392, 1)
					doPlayerAddItem(cid, 12346, 1)
					doPlayerAddSoul(cid, 1)
					setPlayerStorageValue(cid, 54842, "Squirtle, ")
					selfSay("Here is your Squirtle and some supplies.")
					setPlayerStorageValue(cid,newbie,1)
				elseif msgcontains(msg, 'no') then
					selfSay("OK... What you want?")
				elseif msgcontains(msg, 'bye') then
					selfSay("OK! Bye...")
					focus = 0
					talk_start = 0
				else
					selfSay("Tell me what pokemon you like?")
				end
			elseif msgcontains(msg, 'no') then
				selfSay("OK... What you want?")
				talk_state = 0
			elseif msgcontains(msg, 'bye') then
				selfSay("OK! Bye...")
				focus = 0
				talk_start = 0
			end
		elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 2 then
			selfSay('Good bye!')
			focus = 0
			talk_start = 0
		end
	end
end
	
function onThink()
	doNpcSetCreatureFocus(focus)
	if (os.clock() - talk_start) > 30 then
		if focus > 0 then
			selfSay('Bye...')
		end
		focus = 0
	end
	if focus ~= 0 then
		if getDistanceToCreature(focus) >= 2 then
			selfSay('Good bye then.')
			focus = 0
		end
	end
end

 

Programador PHP, Lua, Java, database administrator.

 

"Nada é verdade, tudo é permitido."

Requiescat in pace.

Link para o post
Compartilhar em outros sites

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Seguidores 0
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito