Npc que troca e sobe o rank do clã

Por Sh4DoW GR

novembro 02, 2017 em Tópicos Sem Resposta

Sh4DoW GR

Campones

INFOS

Grupo: Campones

Registrado: 09/03/16

Posts: 24

Postado em novembro 02, 2017

Alguém ai poderia fazer um npc que mudava o clã e subia o rank do clã do player, mas por uma quantia de dinheiro, por exemplo:

Player: Hi

Npc: Ola Player você deseja Trocar de clã ou Subir de rank?

Player: Trocar

Npc: Qual clã vc deseja?

Player: Seavell

Npc: Você realmente quer trocar de clã? você precisa ter 200k para fazer a troca

Player: yes

Npc: Muito bem, agora você pertence a o clã seavell

--------------------------------------------------------------------------------------------------------

Player: Hi

Npc: Ola Player você deseja Trocar de clã ou Subir de rank?

Player: Subir

Npc: Você realmente quer subir para o rank 5? Você precisa ter 500k para subir de rank

Player: yes

Npc: parabens! agora vc pertence ao rank 5

Obs: O dinheiro é configuravel e o rank é apenas o 5

Se alguém pudesse fazer eu agradeceria muito msm

Dou Rep+

Everson Miranda

Campones

INFOS

Grupo: Campones

Registrado: 23/04/17

Posts: 17

Gênero: Masculino

Char no Tibia: Ever Hellraiser

Postado em novembro 08, 2017

Em 02/11/2017 at 21:14, Sh4DoW GR disse:

Alguém ai poderia fazer um npc que mudava o clã e subia o rank do clã do player, mas por uma quantia de dinheiro, por exemplo:

Player: Hi

Npc: Ola Player você deseja Trocar de clã ou Subir de rank?

Player: Trocar

Npc: Qual clã vc deseja?

Player: Seavell

Npc: Você realmente quer trocar de clã? você precisa ter 200k para fazer a troca

Player: yes

Npc: Muito bem, agora você pertence a o clã seavell

--------------------------------------------------------------------------------------------------------

Player: Hi

Npc: Ola Player você deseja Trocar de clã ou Subir de rank?

Player: Subir

Npc: Você realmente quer subir para o rank 5? Você precisa ter 500k para subir de rank

Player: yes

Npc: parabens! agora vc pertence ao rank 5

Obs: O dinheiro é configuravel e o rank é apenas o 5

Se alguém pudesse fazer eu agradeceria muito msm

Dou Rep+

Bem vamos la...

Crie um arquivo com o nome do NPC, apos cole o script abaixo (TROQUE O NOME DO NPC AONDE ESTA ESCRITO NOMEDONPC) nao mexa mais em nada. Salve dentro da pasta data/npcs

Spoiler

<?xml version="1.0" encoding="UTF-8"?>
<npc name="NOMEDONPC" script="NOMEDONPC.lua" walkinterval="2000" floorchange="0">
	<health now="100" max="100"/>
	<look type="132" head="0" body="78" legs="50" feet="39"/>
	<parameters>
		<parameter key="message_greet" value="Ola |PLAYERNAME| você deseja {entrar} em um clã, {Trocar} de clã ou {Subir} de rank?"/>
    </parameters>
</npc>

Agora vamos a melhor parte o script .lua, dentro da pasta NPCS abra a pasta script e crie um arquivo com o msm nome (igual ate as letras maiusculas se houver) que vc criou anteriormente.

Cole o seguinte script abaixo:

Spoiler

local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
local talkState = {}
function onCreatureAppear(cid)                          npcHandler:onCreatureAppear(cid)                        end
function onCreatureDisappear(cid)                       npcHandler:onCreatureDisappear(cid)                     end
function onCreatureSay(cid, type, msg)                  npcHandler:onCreatureSay(cid, type, msg)                end
function onThink()                                      npcHandler:onThink()                                    end
function creatureSayCallback(cid, type, msg)
        if(not npcHandler:isFocused(cid)) then
                return false
        end
	local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
	local seavell = getPlayerStorageValue(cid, 20006)
	local naturia = getPlayerStorageValue(cid, 20007)
	local psycraft = getPlayerStorageValue(cid, 20008)
	local gardestrike = getPlayerStorageValue(cid, 20009)
	local wingeon = getPlayerStorageValue(cid, 20010)
	local storage = getPlayerStorageValue(cid, 20011)
	local valor = getPlayerItemCount(cid, 2160)
	local storageelite = getPlayerStorageValue(cid, 20012)
		
		if msgcontains(msg, 'trocar')then
		if seavell == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {seavell}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif naturia == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {naturia}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif psycraft == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {psycraft}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif gardestrike == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {gardestrike}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif wingeon == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {wingeon}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif seavell == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite seavell}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif naturia == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite naturia}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif psycraft == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite psycraft}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif gardestrike == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite gardestrike}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif wingeon == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite wingeon}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif seavell == 1 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif naturia == 1 or naturia == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif psycraft == 1 or psycraft == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif gardestrike == 1 or gardestrike == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif wingeon == 1 or wingeon == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	  else
			npcHandler:say("você não faz parte de nenhum clã.", cid)
end
	elseif msgcontains(msg, 'entrar') then		
		if seavell == -1 and naturia == -1 and psycraft == -1 and gardestrike == -1 and wingeon == -1 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20011, 2)
	  else
			npcHandler:say("você ja faz parte de um clã, deseja {trocar}?.", cid)		
end	
	elseif msgcontains(msg, 'seavell') then
	
		if seavell >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {seavell}.", cid)
			setPlayerStorageValue(cid, 20006, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'naturia') then
		
		if naturia >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {naturia}.", cid)
			setPlayerStorageValue(cid, 20007, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'psycraft') then
		
		if psycraft >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {psycraft}.", cid)
			setPlayerStorageValue(cid, 20008, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'gardestrike') then
		if gardestrike >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {gardestrike}.", cid)
			setPlayerStorageValue(cid, 20009, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'wingeon') then
		if wingeon >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {wingeon}.", cid)
			setPlayerStorageValue(cid, 20010, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'yes') or msgcontains(msg, 'sim') then		
		
		if seavell == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {naturia}, {psycraft}, {gardestrike} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20006, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
				
		elseif naturia == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {psycraft}, {gardestrike} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20007, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif psycraft == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {gardestrike} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20008, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif gardestrike == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20009, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif wingeon == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft} ou {gardestrike}?", cid)
					setPlayerStorageValue(cid, 20010, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif seavell == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite seavell}!", cid)
					setPlayerStorageValue(cid, 20006, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif naturia == 1 and storage == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite naturia}!", cid)
					setPlayerStorageValue(cid, 20007, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif psycraft == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite psycraft}!", cid)
					setPlayerStorageValue(cid, 20008, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif gardestrike == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite gardestrike}!", cid)
					setPlayerStorageValue(cid, 20009, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif wingeon == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite wingeon}!", cid)
					setPlayerStorageValue(cid, 20010, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		else
			npcHandler:say("você não tem o dinheiro adequado! Volte quando conseguir.", cid)
	end
		elseif msgcontains(msg, 'subir') then		
		
		if seavell == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite seavell}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
					
		elseif naturia == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite naturia}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif psycraft == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite psycraft}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif gardestrike == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite gardestrike}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif wingeon == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite wingeon}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
      elseif seavell == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite seavell}? voce vai precisar de 500k para isso está realmente certo?", cid)				
		elseif naturia == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite naturia}? voce vai precisar de 500k para isso está realmente certo?", cid)
		elseif psycraft == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite psycraft}? voce vai precisar de 500k para isso está realmente certo?", cid)
		elseif gardestrike == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite gardestrike}? voce vai precisar de 500k para isso está realmente certo?", cid)
		elseif wingeon == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite wingeon}? voce vai precisar de 500k para isso está realmente certo?", cid)
end		
		elseif msgcontains(msg, 'no') or msgcontains(msg, 'nao') then
			if seavell == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif naturia == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif psycraft == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif gardestrike == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif wingeon == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif seavell == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif naturia == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif psycraft == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif gardestrike == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif wingeon == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
end	
	
	end
	return TRUE
end



npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

DEU BASTANTE TRABALHO!!!UFF! mas está ai qualquer coisa so postar aqui

Creditos 100% Meu!

Coloquei os 5 ranks ai seavell - naturia - psycraft - gardenstrike e wingeon

Sh4DoW GR

Campones

INFOS

Grupo: Campones

Registrado: 09/03/16

Posts: 24

Postado em novembro 11, 2017

Eu posso adicionar mais clãs? ou só funciona com esses 5?

Muito obrigado msm ajudou bastante <3

Tem alguns erros mas já arrumei.

troca essa linha:

elseif seavell == 1 or and storage == 1 then

por essa:

elseif seavell == 1 and storage == 1 then

depois só é trocar essa linha:

if seavell == -1 and == -1 and psycraft == -1 and gardestrike == -1 and wingeon == -1 and stprage == -1 then

por essa:

if seavell == -1 and naturia == -1 and psycraft == -1 and gardestrike == -1 and wingeon == -1 then

Everson Miranda

Campones

INFOS

Grupo: Campones

Registrado: 23/04/17

Posts: 17

Gênero: Masculino

Char no Tibia: Ever Hellraiser

Postado em novembro 11, 2017

2 horas atrás, Sh4DoW GR disse:

Eu posso adicionar mais clãs? ou só funciona com esses 5?

Muito obrigado msm ajudou bastante <3

Tem alguns erros mas já arrumei.

troca essa linha:

elseif seavell == 1 or and storage == 1 then

por essa:

elseif seavell == 1 and storage == 1 then

depois só é trocar essa linha:

if seavell == -1 and == -1 and psycraft == -1 and gardestrike == -1 and wingeon == -1 and stprage == -1 then

por essa:

if seavell == -1 and naturia == -1 and psycraft == -1 and gardestrike == -1 and wingeon == -1 then

eu fiz correndo no trabalho, nao conferi nem testei mas fico feliz de ter funcionado, e da sim para adicionar mais clãns me fala os nomes que eu te ajudo

ja arrumei obrigado ^^

Sh4DoW GR

Campones

INFOS

Grupo: Campones

Registrado: 09/03/16

Posts: 24

Postado em novembro 11, 2017

Agora, Everson Miranda disse:

eu fiz correndo no trabalho, nao conferi nem testei mas fico feliz de ter funcionado, e da sim para adicionar mais clãns me fala os nomes que eu te ajudo

ah e tem uns outros bugs também, quando eu tento trocar de clã o npc fala q eu não estou em um clã mesmo eu estando em 1, e também não da pra subir de rank, e os clãs pra adicionar era orebound, volcanic, raibolt e malefic.

Coloca o npc pra subir só do rank 1 pro 5.

Everson Miranda

Campones

INFOS

Grupo: Campones

Registrado: 23/04/17

Posts: 17

Gênero: Masculino

Char no Tibia: Ever Hellraiser

Postado em novembro 11, 2017

Perai vou testar aqui

amigo o script funcionou perfeitamente aqui...

perdao realmente esta faltando algumas coisas mas ja estou consertando

20 minutos atrás, Sh4DoW GR disse:

ah e tem uns outros bugs também, quando eu tento trocar de clã o npc fala q eu não estou em um clã mesmo eu estando em 1, e também não da pra subir de rank, e os clãs pra adicionar era orebound, volcanic, raibolt e malefic.

Coloca o npc pra subir só do rank 1 pro 5.

24 minutos atrás, Sh4DoW GR disse:

ah e tem uns outros bugs também, quando eu tento trocar de clã o npc fala q eu não estou em um clã mesmo eu estando em 1, e também não da pra subir de rank, e os clãs pra adicionar era orebound, volcanic, raibolt e malefic.

Coloca o npc pra subir só do rank 1 pro 5.

TESTADO E ATUALIZADO SÓ COPIAR E COLAR ESTAO FUNCIONANDO TODOS LOGO MAIS ADICIONO OS OUTROS RANKS E QUE TENHO QUE SAIR AGORA

Spoiler

local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
local talkState = {}
function onCreatureAppear(cid)                          npcHandler:onCreatureAppear(cid)                        end
function onCreatureDisappear(cid)                       npcHandler:onCreatureDisappear(cid)                     end
function onCreatureSay(cid, type, msg)                  npcHandler:onCreatureSay(cid, type, msg)                end
function onThink()                                      npcHandler:onThink()                                    end
function creatureSayCallback(cid, type, msg)
        if(not npcHandler:isFocused(cid)) then
                return false
        end
	local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
	local seavell = getPlayerStorageValue(cid, 20006)
	local naturia = getPlayerStorageValue(cid, 20007)
	local psycraft = getPlayerStorageValue(cid, 20008)
	local gardestrike = getPlayerStorageValue(cid, 20009)
	local wingeon = getPlayerStorageValue(cid, 20010)
	local storage = getPlayerStorageValue(cid, 20011)
	local valor = getPlayerItemCount(cid, 2160)
	local storageelite = getPlayerStorageValue(cid, 20012)
		
		if msgcontains(msg, 'trocar')then
		if seavell == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {seavell}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif naturia == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {naturia}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif psycraft == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {psycraft}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif gardestrike == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {gardestrike}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif wingeon == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {wingeon}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif seavell == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite seavell}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif naturia == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite naturia}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif psycraft == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite psycraft}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif gardestrike == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite gardestrike}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif wingeon == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite wingeon}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif seavell == 1 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif naturia == 1 or naturia == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif psycraft == 1 or psycraft == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif gardestrike == 1 or gardestrike == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif wingeon == 1 or wingeon == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	  else
			npcHandler:say("você não faz parte de nenhum clã.", cid)
end
	elseif msgcontains(msg, 'entrar') then		
		if seavell == -1 and naturia == -1 and psycraft == -1 and gardestrike == -1 and wingeon == -1 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20011, 2)
	  else
			npcHandler:say("você ja faz parte de um clã, deseja {trocar}?.", cid)		
end	
	elseif msgcontains(msg, 'seavell') then
	
		if seavell >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {seavell}.", cid)
			setPlayerStorageValue(cid, 20006, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif seavell >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {seavell}.", cid)
			setPlayerStorageValue(cid, 20006, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'naturia') then
		
		if naturia >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {naturia}.", cid)
			setPlayerStorageValue(cid, 20007, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif naturia >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {naturia}.", cid)
			setPlayerStorageValue(cid, 20007, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'psycraft') then
		
		if psycraft >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {psycraft}.", cid)
			setPlayerStorageValue(cid, 20008, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif psycraft >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {psycraft}.", cid)
			setPlayerStorageValue(cid, 20008, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'gardestrike') then
		if gardestrike >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {gardestrike}.", cid)
			setPlayerStorageValue(cid, 20009, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif gardestrike >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {gardestrike}.", cid)
			setPlayerStorageValue(cid, 20009, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'wingeon') then
		if wingeon >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {wingeon}.", cid)
			setPlayerStorageValue(cid, 20010, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif wingeon >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {wingeon}.", cid)
			setPlayerStorageValue(cid, 20010, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'yes') or msgcontains(msg, 'sim') then		
		
		if seavell == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {naturia}, {psycraft}, {gardestrike} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20006, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
				
		elseif naturia == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {psycraft}, {gardestrike} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20007, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif psycraft == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {gardestrike} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20008, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif gardestrike == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20009, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif wingeon == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft} ou {gardestrike}?", cid)
					setPlayerStorageValue(cid, 20010, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif seavell == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {naturia}, {psycraft}, {gardestrike} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20006, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
				
		elseif naturia == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {psycraft}, {gardestrike} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20007, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif psycraft == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {gardestrike} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20008, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif gardestrike == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft} ou {wingeon}?", cid)
					setPlayerStorageValue(cid, 20009, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif wingeon == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft} ou {gardestrike}?", cid)
					setPlayerStorageValue(cid, 20010, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif seavell == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite seavell}!", cid)
					setPlayerStorageValue(cid, 20006, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif naturia == 1 and storage == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite naturia}!", cid)
					setPlayerStorageValue(cid, 20007, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif psycraft == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite psycraft}!", cid)
					setPlayerStorageValue(cid, 20008, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif gardestrike == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite gardestrike}!", cid)
					setPlayerStorageValue(cid, 20009, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif wingeon == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite wingeon}!", cid)
					setPlayerStorageValue(cid, 20010, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		else
			npcHandler:say("você não tem o dinheiro adequado! Volte quando conseguir.", cid)
	end
		elseif msgcontains(msg, 'subir') then		
		
		if seavell == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite seavell}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
					
		elseif naturia == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite naturia}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif psycraft == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite psycraft}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif gardestrike == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite gardestrike}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif wingeon == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite wingeon}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
      elseif seavell == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite seavell}? voce vai precisar de 500k para isso está realmente certo?", cid)				
		elseif naturia == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite naturia}? voce vai precisar de 500k para isso está realmente certo?", cid)
		elseif psycraft == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite psycraft}? voce vai precisar de 500k para isso está realmente certo?", cid)
		elseif gardestrike == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite gardestrike}? voce vai precisar de 500k para isso está realmente certo?", cid)
		elseif wingeon == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite wingeon}? voce vai precisar de 500k para isso está realmente certo?", cid)
end		
		elseif msgcontains(msg, 'no') or msgcontains(msg, 'nao') then
			if seavell == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif naturia == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif psycraft == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif gardestrike == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif wingeon == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif seavell == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif naturia == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif psycraft == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif gardestrike == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif wingeon == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
end	
	
	end
	return TRUE
end



npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

Everson Miranda

Campones

INFOS

Grupo: Campones

Registrado: 23/04/17

Posts: 17

Gênero: Masculino

Char no Tibia: Ever Hellraiser

Postado em novembro 14, 2017

Em 11/11/2017 at 18:08, Sh4DoW GR disse:

ah e tem uns outros bugs também, quando eu tento trocar de clã o npc fala q eu não estou em um clã mesmo eu estando em 1, e também não da pra subir de rank, e os clãs pra adicionar era orebound, volcanic, raibolt e malefic.

Coloca o npc pra subir só do rank 1 pro 5.

Ta aqui meu amigo o script 100% funcional com os novos ranks^^

Spoiler

local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
local talkState = {}
function onCreatureAppear(cid)                          npcHandler:onCreatureAppear(cid)                        end
function onCreatureDisappear(cid)                       npcHandler:onCreatureDisappear(cid)                     end
function onCreatureSay(cid, type, msg)                  npcHandler:onCreatureSay(cid, type, msg)                end
function onThink()                                      npcHandler:onThink()                                    end
function creatureSayCallback(cid, type, msg)
        if(not npcHandler:isFocused(cid)) then
                return false
        end
	local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
	local seavell = getPlayerStorageValue(cid, 20006)
	local naturia = getPlayerStorageValue(cid, 20007)
	local psycraft = getPlayerStorageValue(cid, 20008)
	local gardestrike = getPlayerStorageValue(cid, 20009)
	local wingeon = getPlayerStorageValue(cid, 20010)
	local orebound = getPlayerStorageValue(cid, 20013)
	local volcanic = getPlayerStorageValue(cid, 20014)
	local raibolt = getPlayerStorageValue(cid, 20015)
	local malefic = getPlayerStorageValue(cid, 20016)
	local storage = getPlayerStorageValue(cid, 20011)
	local valor = getPlayerItemCount(cid, 2160)
	local storageelite = getPlayerStorageValue(cid, 20012)
		
		if msgcontains(msg, 'trocar')then
		if seavell == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {seavell}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif naturia == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {naturia}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif psycraft == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {psycraft}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif gardestrike == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {gardestrike}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif wingeon == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {wingeon}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif orebound == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {orebound}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif volcanic == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {volcanic}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif raibolt == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {raibolt}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif malefic == 1 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {malefic}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif seavell == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite seavell}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif naturia == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite naturia}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif psycraft == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite psycraft}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif gardestrike == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite gardestrike}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif wingeon == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite wingeon}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif orebound == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite orebound}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif volcanic == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite volcanic}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif raibolt == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite raibolt}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif malefic == 5 and storage == -1 then
		npcHandler:say("Você pertense atualmente ao clã {elite malefic}. Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
		setPlayerStorageValue(cid, 20011, 1)
	elseif seavell == 1 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif naturia == 1 or naturia == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif psycraft == 1 or psycraft == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif gardestrike == 1 or gardestrike == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif wingeon == 1 or wingeon == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif orebound == 1 or orebound == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif volcanic == 1 or volcanic == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif raibolt == 1 or raibolt == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	elseif malefic == 1 or malefic == 5 and storage == 1 then
		npcHandler:say("Você ainda não se decidiu! Realmente deseja trocar? você precisa ter 200k para fazer a troca.", cid)
	  else
			npcHandler:say("você não faz parte de nenhum clã.", cid)
end
	elseif msgcontains(msg, 'entrar') then		
		if seavell == -1 and naturia == -1 and psycraft == -1 and gardestrike == -1 and wingeon == -1 and orebound == -1 and malefic == -1 and volcanic == -1 and raibolt == -1then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike}, {wingeon}, {orebound}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20011, 2)
	  else
			npcHandler:say("você ja faz parte de um clã, deseja {trocar}?.", cid)		
end	
	elseif msgcontains(msg, 'seavell') then
	
		if seavell >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {seavell}.", cid)
			setPlayerStorageValue(cid, 20006, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif seavell >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {seavell}.", cid)
			setPlayerStorageValue(cid, 20006, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'naturia') then
		
		if naturia >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {naturia}.", cid)
			setPlayerStorageValue(cid, 20007, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif naturia >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {naturia}.", cid)
			setPlayerStorageValue(cid, 20007, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'psycraft') then
		
		if psycraft >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {psycraft}.", cid)
			setPlayerStorageValue(cid, 20008, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif psycraft >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {psycraft}.", cid)
			setPlayerStorageValue(cid, 20008, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'gardestrike') then
		if gardestrike >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {gardestrike}.", cid)
			setPlayerStorageValue(cid, 20009, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif gardestrike >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {gardestrike}.", cid)
			setPlayerStorageValue(cid, 20009, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'wingeon') then
		if wingeon >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {wingeon}.", cid)
			setPlayerStorageValue(cid, 20010, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif wingeon >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {wingeon}.", cid)
			setPlayerStorageValue(cid, 20010, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'orebound') then
		if orebound >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {orebound}.", cid)
			setPlayerStorageValue(cid, 20013, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif orebound >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {orebound}.", cid)
			setPlayerStorageValue(cid, 20013, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'volcanic') then
		if volcanic >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {volcanic}.", cid)
			setPlayerStorageValue(cid, 20014, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif volcanic >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {volcanic}.", cid)
			setPlayerStorageValue(cid, 20014, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'raibolt') then
		if raibolt >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {raibolt}.", cid)
			setPlayerStorageValue(cid, 20015, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif raibolt >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {raibolt}.", cid)
			setPlayerStorageValue(cid, 20015, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'malefic') then
		if malefic >= 1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {malefic}.", cid)
			setPlayerStorageValue(cid, 20016, 1)
			setPlayerStorageValue(cid, 20011, -1)
		elseif malefic >= -1 and storage == 2 then
			npcHandler:say("Parabéns você agora é um membro do clã {malefic}.", cid)
			setPlayerStorageValue(cid, 20016, 1)
			setPlayerStorageValue(cid, 20011, -1)
end
	elseif msgcontains(msg, 'yes') or msgcontains(msg, 'sim') then		
		
		if seavell == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {naturia}, {psycraft}, {gardestrike}, {wingeon}, {orebound}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20006, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)				
		elseif naturia == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {psycraft}, {gardestrike}, {wingeon}, {orebound}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20007, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif psycraft == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {gardestrike}, {wingeon}, {orebound}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20008, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif gardestrike == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {wingeon}, {orebound}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20009, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif wingeon == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike}, {orebound}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20010, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif orebound == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike}, {wingeon}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20013, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif volcanic == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike}, {wingeon}, {orebound}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20014, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif raibolt == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike}, {wingeon}, {orebound}, {volcanic} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20015, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif malefic == 1 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike}, {wingeon}, {orebound}, {volcanic} ou {raibolt}?", cid)
					setPlayerStorageValue(cid, 20016, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif seavell == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {naturia}, {psycraft}, {gardestrike}, {wingeon}, {orebound}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20006, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif naturia == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {psycraft}, {gardestrike}, {wingeon}, {orebound}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20007, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif psycraft == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {gardestrike}, {wingeon}, {orebound}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20008, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif gardestrike == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {wingeon}, {orebound}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20009, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif wingeon == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike}, {orebound}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20010, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif orebound == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike}, {wingeon}, {volcanic}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20013, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif volcanic == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike}, {wingeon}, {orebound}, {raibolt} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20014, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif raibolt == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike}, {wingeon}, {orebound}, {volcanic} ou {malefic}?", cid)
					setPlayerStorageValue(cid, 20015, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif malefic == 5 and storage == 1 and valor >= 20 then
					npcHandler:say("Qual clã vc deseja entrar {seavell}, {naturia}, {psycraft}, {gardestrike}, {wingeon}, {orebound}, {volcanic} ou {raibolt}?", cid)
					setPlayerStorageValue(cid, 20016, -1)
					setPlayerStorageValue(cid, 20011, 2)
					doPlayerRemoveItem(cid,2160,20)
		elseif seavell == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite seavell}!", cid)
					setPlayerStorageValue(cid, 20006, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif naturia == 1 and storage == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite naturia}!", cid)
					setPlayerStorageValue(cid, 20007, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif psycraft == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite psycraft}!", cid)
					setPlayerStorageValue(cid, 20008, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif gardestrike == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite gardestrike}!", cid)
					setPlayerStorageValue(cid, 20009, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif wingeon == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite wingeon}!", cid)
					setPlayerStorageValue(cid, 20010, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif orebound == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite orebound}!", cid)
					setPlayerStorageValue(cid, 20013, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif volcanic == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite volcanic}!", cid)
					setPlayerStorageValue(cid, 20014, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif raibolt == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite raibolt}!", cid)
					setPlayerStorageValue(cid, 20015, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		elseif malefic == 1 and storageelite == 1 and valor >= 50 then
					npcHandler:say("Parabens você agora é um {elite malefic}!", cid)
					setPlayerStorageValue(cid, 20016, 5)
					setPlayerStorageValue(cid, 20012, -1)
					doPlayerRemoveItem(cid,2160, 50)
		else
			npcHandler:say("você não tem o dinheiro adequado! Volte quando conseguir.", cid)
	end
		elseif msgcontains(msg, 'subir') then		
		
		if seavell == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite seavell}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
					
		elseif naturia == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite naturia}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif psycraft == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite psycraft}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif gardestrike == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite gardestrike}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif wingeon == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite wingeon}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif orebound == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite orebound}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif volcanic == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite volcanic}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif raibolt == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite raibolt}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif malefic == 1 and storageelite == -1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite malefic}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif seavell == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite seavell}? voce vai precisar de 500k para isso está realmente certo?", cid)				
		elseif naturia == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite naturia}? voce vai precisar de 500k para isso está realmente certo?", cid)
		elseif psycraft == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite psycraft}? voce vai precisar de 500k para isso está realmente certo?", cid)
		elseif gardestrike == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite gardestrike}? voce vai precisar de 500k para isso está realmente certo?", cid)
		elseif wingeon == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite wingeon}? voce vai precisar de 500k para isso está realmente certo?", cid)
		elseif orebound == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite orebound}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif volcanic == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite volcanic}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif raibolt == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite raibolt}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
		elseif malefic == 1 and storageelite == 1 then
					npcHandler:say("Deseja subir para o {rank 5} e se tornar um {elite malefic}? voce vai precisar de 500k para isso está realmente certo?", cid)
					setPlayerStorageValue(cid, 20012, 1)
end		
		elseif msgcontains(msg, 'no') or msgcontains(msg, 'nao') then
			if seavell == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif naturia == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif psycraft == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif gardestrike == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif wingeon == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif orebound == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif volcanic == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif raibolt == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif malefic == 1 and storage == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif seavell == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif naturia == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif psycraft == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif gardestrike == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif wingeon == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif orebound == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif volcanic == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif raibolt == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
		elseif malefic == 1 and storageelite == 1 then
		npcHandler:say("Entendo sua decisão volte quando estiver realmente decidido.", cid)
		setPlayerStorageValue(cid, 20011, -1)
end	
	
	end
	return TRUE
end



npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

Ranks: seavell, naturia, psycraft, gardestrike, wingeon, orebound, volcanic, raibolt e malefic

Sh4DoW GR

Campones

INFOS

Grupo: Campones

Registrado: 09/03/16

Posts: 24

Postado em novembro 14, 2017

Funcionou, muito obrigado