Npc Battle Pokémon - Brock

Matheuzinhoul

stay in rook
avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 11/02/11Posts: 169

Eai galera, como vão?

 

Um pedido que eu atendi hoje no fórum, era um NPC igualzinho ao "meu", então vou postar pra vocês.

 

Nome: Brock

Função: Batalha

 

Primeiramente, os créditos son para Nacho Rico.

 

Espanhois ownando

 

Battle.lua

 

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 getUidsInContainer(containeruid) -- By MatheusMkalo

local dat = {}

for i = 0, (getContainerSize(containeruid)-1) do

local item = getContainerItem(containeruid, i)

if isContainer(item.uid) then

local items = getUidsInContainer(item.uid)

for i = 0, #items do

table.insert(dat, items)

end

else

table.insert(dat, item.uid)

end

end

return dat

end

 

function creatureSayCallback(cid, type, msg)

 

if(not npcHandler:isFocused(cid)) then

return false

end

 

 

if getPlayerStorageValue(cid, 64999) == 1 then

selfSay('Eu vou vencê-lo mais tarde, {!exit}.', cid)

npcHandler:ResetNpc()

end

 

 

if msgcontains(msg:lower(), "duel") then

selfSay('Olá, eu sou o Líder do Ginásio de Pewter, meu nome é Brock e eu uso Pokémons do tipo Pedra, você quer batalhar comigo?', cid)

talk_state = 1

elseif msgcontains(msg:lower(), "yes") and talk_state == 1 then

 

if getPlayerStorageValue(cid,987876) ~= 1 then

if getPlayerStorageValue(cid,574225) ~= 1 then

selfSay('Go, Golem', cid)

doCreateMonster("Golem", getCreaturePosition(getNpcId()))

doSendMagicEffect(getCreaturePosition(getNpcId()) , 10)

setPlayerStorageValue(cid, 574225, 1)

else

selfSay('...', cid)

end

else

if getPlayerStorageValue(cid, 987877) ~= 1 and getPlayerStorageValue(cid,574225) == 1 then

if getPlayerStorageValue(cid,574226) ~= 1 then

selfSay('Go, Onix', cid)

doCreateMonster("Onix", getCreaturePosition(getNpcId()))

doSendMagicEffect(getCreaturePosition(getNpcId()) , 10)

talk_state = 2

setPlayerStorageValue(cid, 574226, 1)

else

selfSay('...', cid)

end

else

if getPlayerStorageValue(cid, 63768) ~= 1 and getPlayerStorageValue(cid,574226) == 1 and getPlayerStorageValue(cid,987877) == 1 then

selfSay('Parabéns, você me venceu com seu carisma e estilo. Aqui está sua recompensa...', cid)

doTransformItem(getUidsInContainer(getPlayerSlotItem(cid, CONST_SLOT_AMMO).uid)[7], 2555)

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Você ganhou do Líder de Ginásio de Pewter (Brock), você ganhou a Boulder Badge!")

setPlayerStorageValue(cid, 63768, 1)

else

selfSay('Você conseguiu... me venceu.', cid)

end

end

end

end

 

return true

end

 

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

npcHandler:addModule(FocusModule:new())

Vermelho - Pokémons que o Brock irá sumonar.

 

Brock.xml

 

<?xml version="1.0" encoding="UTF-8"?>

<npc name="Brock" script="brock.lua" walkinterval="0" floorchange="0">

<health now="100" max="100"/>

<look type="178" head="17" body="54" legs="114" feet="0" addons="0"/>

</npc>

 

Vermelho - Nome do NPC

 

É só isso mesmo povo, espero que tenha ajudado em alguma coisa.

Abraços.

 

#Edit

Só está funcionando o primeiro pokémon, até semana que vem eu atualizo.

luisfelipinho15

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 17/03/11Posts: 35

So tem um problema o npc so libera o golem o 2 nao vai '-'

Ajudei??Rep+

Cotar.jpg

Matheuzinhoul

stay in rook
avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 11/02/11Posts: 169

So tem um problema o npc so libera o golem o 2 nao vai '-'

 

Realmente, não est[a funcionando. Este não é o script original que eu peguei, infelizmente eu perdi por que formatei meu PC.

Vou tentar arrumar, e atualizo o tópico.

luisfelipinho15

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 17/03/11Posts: 35

Ok entao '-'

ja dei REP

To esperando pq eu tentei modifica

e nao deu.

Ajudei??Rep+

Cotar.jpg

Huntre

avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 23/02/11Posts: 157

credito para min que eu que postei la e tu pego de min neh qw

 

 

na real pegase do meu topico neh mais blz

gorz

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 16/02/11Posts: 50Char no Tibia: GB Lord

se vai atualiza?

sandim69

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 21/03/10Posts: 20

Pessoal estou a muito tempo tentando criar esse npc para um amigo meu, e ate agora nada.

Será que alguém pode Ajudar?

Valewww!!

meubk

@miillerdomingues
avatar
Visconde
Visconde

INFOS

Grupo: ViscondeRegistrado: 21/04/08Posts: 311

Reportado para fechar, eu qui fiz, e já cansei de fechar tópicos com esse script.

HevoMind

     
avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 26/01/11Posts: 62

ESSE SCRIPT FOI FEITO PELO UM ESPANÕL SE EU NÃO ME ENGANO.

O_O

neobux.jpg

Quer ganhar um dinheirinho online? Participe já do

neobux!

PTC confiável e bom.

 

 

 

4859_medalhamembro.pngmedalhastaff.png

sandim69

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 21/03/10Posts: 20

Reportado para fechar, eu qui fiz, e já cansei de fechar tópicos com esse script.

 

Também já cansei de ver você fechando tópicos com esse script, mesmo sabendo que ele nem funciona direito.

 

Cara deixa de ser opressor, afinal o forum foi feito para as pessoas se ajudarem.

Se não quer que seu trabalho seja exposto para que divulgar então.

meubk

@miillerdomingues
avatar
Visconde
Visconde

INFOS

Grupo: ViscondeRegistrado: 21/04/08Posts: 311

e eu divulguei por acaso ? até hj ñ sei como foi parar aki...

Slicer

Insanity
avatar
Príncipe
Príncipe

INFOS

Grupo: PríncipeRegistrado: 19/08/10Posts: 4014Gênero: Masculino

Eu tenhu esse script 100% funcionando \o/ -vlw xotservx por fazer a base pra mim *--* - sei la pq tu nao posta ele neh.. mas ja q tu nao quer posta eu tb nao vo posta pra nao avacalha hehe good luck pro pessoal q quer ter esse script ;x -e esse script nao funfa pq falta bastante coisa nele ... como as creaturescripts ..-

"Só a beira do abismo que os seres humanos acham forças para mudar."... E isso me da nojo... ¬¬

"Insanity is doing the exact... same fucking thing... over and over again expecting... shit to change... That. Is. Crazy." -Vass/Einstein

 

Matheuzinhoul

stay in rook
avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 11/02/11Posts: 169

Não fiquei sabendo que foi o xotserver que fez, sério. Se qusier podem fechar, só tentei ajudar. Não entrei no pc esses dias, então não tentei fazer nada, obrigado.

 

@Huntre

Esse não é o do seu tópico, e mesmo que fosse os créditos não seriam seus '-'

Huntre

avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 23/02/11Posts: 157

é mais nao disse que os creditos e meu o espanhol deu a permiçao para min posta para pedir ajuda ja pra você ele deu permiçao?