(Resolvido)Evoluir Pokemon Com Talkaction

[Thenew 0]

Zipter98 ficou muito bom parabens.

Mas teria como eu colocar alguma animação ?

 

E ao evoluir o pokemon morre com 1 hit e seus ataques fica super fracos.

[31/03/2015 18:12:19] [Error - TalkAction Interface] 

[31/03/2015 18:12:19] data/talkactions/scripts/evolution.lua:onSay

[31/03/2015 18:12:19] Description: 

[31/03/2015 18:12:19] (luaDoTeleportThing) Thing not found

 

[31/03/2015 18:12:19] [Error - TalkAction Interface] 

[31/03/2015 18:12:19] data/talkactions/scripts/evolution.lua:onSay

[31/03/2015 18:12:19] Description: 

[31/03/2015 18:12:19] (luaDoCreatureSetLookDir) Creature not found

Editado Março 31, 2015 por Thenew (veja o histórico de edições)

[zipter98 460]

Claro.

local evolutions = {
    --["Pokemon_name"] = "Evolution_name",
    ["Alakazam"] = "Mega Alakazam",
}
local effect = xxx                --Animação/efeito.
function onSay(cid, words)
    if #getCreatureSummons(cid) > 0 then
        local poke = getCreatureSummons(cid)[1]
        if evolutions[getCreatureName(poke)] then
            local position, lookDir, pokeName = getThingPos(poke), getCreatureLookDirection(poke), getCreatureName(poke)
            doPlayerSendTextMessage(cid, 27, "Your "..pokeName.." transformed into a "..evolutions[pokeName].."!")
            doRemoveCreature(poke)
            doSummonMonster(cid, evolutions[pokeName])
            local newPoke = getCreatureSummons(cid)[1]
            doTeleportThing(newPoke, position)
            doSendMagicEffect(position, effect)
            doCreatureSetLookDir(newPoke, lookDir)
            adjustStatus(newPoke, getPlayerSlotItem(cid, 8).uid, true, false)
        else
            return doPlayerSendCancel(cid, "This pokemon can't transform.")
        end
    else
        return doPlayerSendCancel(cid, "You do not have summons.")
    end
    return true
end

Editado Março 31, 2015 por zipter98 (veja o histórico de edições)

[joaod123 16]

 

Claro.

local evolutions = {
    --["Pokemon_name"] = "Evolution_name",
    ["Alakazam"] = "Mega Alakazam",
}
local effect = xxx                --Animação/efeito.
function onSay(cid, words)
    if #getCreatureSummons(cid) > 0 then
        local poke = getCreatureSummons(cid)[1]
        if evolutions[getCreatureName(poke)] then
            local position, lookDir, pokeName = getThingPos(poke), getCreatureLookDirection(poke), getCreatureName(poke)
            doPlayerSendTextMessage(cid, 27, "Your "..pokeName.." transformed into a "..evolutions[pokeName].."!")
            doRemoveCreature(poke)
            local newPoke = doSummonMonster(cid, evolutions[pokeName])
            doTeleportThing(newPoke, position)
            doSendMagicEffect(position, effect)
            doCreatureSetLookDir(newPoke, lookDir)
            adjustStatus(newPoke, getPlayerSlotItem(cid, 8).uid, true, false)
        else
            return doPlayerSendCancel(cid, "This pokemon can't transform.")
        end
    else
        return doPlayerSendCancel(cid, "You do not have summons.")
    end
    return true
end

o poke q ele transforma fica mt fraco perde com um só hit

[zipter98 460]

Código alterado, novamente...

Dessa vez vai funcionar, bom proveito.

[joaod123 16]

Zipter98 Cara o effect não funciona teria outro jeito de por?

Deixa pra lá coloquei o effect funcionando vlw zipter

[zipter98 460]

Para o effect aparecer, obviamente teria que substituir o xxx por ele. t.t

[joaod123 16]

No meu eu fiz isso adicionei as linhas

if useKpdoDlls then

doUpdateMoves(cid)
local posi = getThingPosWithDebug(newPoke, position)
posi.x = posi.x+1
posi.y = posi.y+1
doSendMagicEffect(posi, 205)

para que ele ganhe os ataques do poke evoluido, e o efeito saia em cima do pokemon 

Editado Abril 1, 2015 por joaod123 (veja o histórico de edições)

[Thiago Rulexz 111]

LoL vlw msm cara Arrazou xD

 

@Edit Adicionei o script do joaod123 e funcionou xD muda os atk

Pra quem n sabe add segue o script pronto

 

local evolutions = {

    --["Pokemon_name"] = "Evolution_name",

    ["Alakazam"] = "Pikachu",

}

local effect = xxx                --Animação/efeito.

function onSay(cid, words)

 

    if #getCreatureSummons(cid) > 0 then

        local poke = getCreatureSummons(cid)[1]

        if evolutions[getCreatureName(poke)] then

            local position, lookDir, pokeName = getThingPos(poke), getCreatureLookDirection(poke), getCreatureName(poke)

            doPlayerSendTextMessage(cid, 27, "Your "..pokeName.." transformed into a "..evolutions[pokeName].."!")

            doRemoveCreature(poke)

            doSummonMonster(cid, evolutions[pokeName])

            local newPoke = getCreatureSummons(cid)[1]

            doTeleportThing(newPoke, position)

            doSendMagicEffect(position, effect)

            doCreatureSetLookDir(newPoke, lookDir)

            adjustStatus(newPoke, getPlayerSlotItem(cid, 8).uid, true, false)

        else

            return doPlayerSendCancel(cid, "This pokemon can't transform.")

        end

 

    else

        return doPlayerSendCancel(cid, "You do not have summons.")

    end

if useKpdoDlls then

doUpdateMoves(cid)

local posi = getThingPosWithDebug(newPoke, position)

posi.x = posi.x+1

posi.y = posi.y+1

doSendMagicEffect(posi, 205)

end

    return true

end

Editado Abril 1, 2015 por macacaue (veja o histórico de edições)

[Thenew 0]

Muito dahora esse script parabens Zipter.

Agora vo largar de ser preguiçoso e vo dar uma estudara para por para ele requerir um item na bag antes kkk

[Maneluxo 11]

Ta blz Thiago Rulexz bom ja que vc consegui pode medar completo tipo passo a passo doque vc fez pois quero add pokes megas mas eu nao quero por 

Talkaction  e sim por um item(mega stone) POR FAVOR ME RESPONDA VOU OLHAR ESTE TOPICO TODO DIA 

 

 

OBG POR SUA ATENÇÂO E PF ME RESPONDA

 

estou esperando Falow!           

[joaod123 16]

Pessoal pra quem quer q evolua o pokemon com um item ta ai

local evolutions = { --["Pokemon_name"] = {ID_do_item_necessário_para_evoluir, "Evolution_name"}, ["Charizard"] = {14208, "Mega Charizard"}, } function onSay(cid, words) if #getCreatureSummons(cid) > 0 then local poke = getCreatureSummons(cid)[1] if evolutions[getCreatureName(poke)] then if getPlayerItemCount(cid, evolutions[getCreatureName(poke)][1]) >= 1 then local position, lookDir, pokeName = getThingPos(poke), getCreatureLookDirection(poke), getCreatureName(poke) doPlayerSendTextMessage(cid, 27, "Your "..pokeName.." transformed into a "..evolutions[pokeName][2].."!") doRemoveCreature(poke) doSummonMonster(cid, evolutions[pokeName][2]) local newPoke = getCreatureSummons(cid)[1] doTeleportThing(newPoke, position) doCreatureSetLookDir(newPoke, lookDir) adjustStatus(newPoke, getPlayerSlotItem(cid, 8).uid, true, false) if useKpdoDlls then doUpdateMoves(cid) local posi = getThingPosWithDebug(newPoke, position) posi.x = posi.x+1 posi.y = posi.y+1 doSendMagicEffect(posi, 205) else return doPlayerSendCancel(cid, "You need 1 "..getItemNameById(evolutions[getCreatureName(poke)][1]).." to evolve this pokemon.") end else return doPlayerSendCancel(cid, "This pokemon can't transform.") end else return doPlayerSendCancel(cid, "You do not have summons.") end return true end end

Creditos ao @zipter98

[Thiago Rulexz 111]

Pessoal pra quem quer q evolua o pokemon com um item ta ai

local evolutions = { --["Pokemon_name"] = {ID_do_item_necessário_para_evoluir, "Evolution_name"}, ["Charizard"] = {14208, "Mega Charizard"}, } function onSay(cid, words) if #getCreatureSummons(cid) > 0 then local poke = getCreatureSummons(cid)[1] if evolutions[getCreatureName(poke)] then if getPlayerItemCount(cid, evolutions[getCreatureName(poke)][1]) >= 1 then local position, lookDir, pokeName = getThingPos(poke), getCreatureLookDirection(poke), getCreatureName(poke) doPlayerSendTextMessage(cid, 27, "Your "..pokeName.." transformed into a "..evolutions[pokeName][2].."!") doRemoveCreature(poke) doSummonMonster(cid, evolutions[pokeName][2]) local newPoke = getCreatureSummons(cid)[1] doTeleportThing(newPoke, position) doCreatureSetLookDir(newPoke, lookDir) adjustStatus(newPoke, getPlayerSlotItem(cid, 8).uid, true, false) if useKpdoDlls then doUpdateMoves(cid) local posi = getThingPosWithDebug(newPoke, position) posi.x = posi.x+1 posi.y = posi.y+1 doSendMagicEffect(posi, 205) else return doPlayerSendCancel(cid, "You need 1 "..getItemNameById(evolutions[getCreatureName(poke)][1]).." to evolve this pokemon.") end else return doPlayerSendCancel(cid, "This pokemon can't transform.") end else return doPlayerSendCancel(cid, "You do not have summons.") end return true end end

Creditos ao @zipter98

 

 

Pelo script parece estar certo... não testei '-'

[joaod123 16]

Pelo script parece estar certo... não testei '-'

foi o zipter98 q fez , eu testei e funciono perfeitamente

[Maneluxo 11]

vlw galera vcs sao 1000

 

mais agora vamos ao que interessa Thiago Rulexz ja que vc consegui fico como tipo a instalação desse comando tipo onde colocar e como fazer funcionar

 

PF RESPONDA-ME 

 

OBG POR SUA ATENÇÂO

 

VOU VIZUALIZAR ESTE TOPICO TODO DIA

Editado Maio 23, 2015 por Maneluxo (veja o histórico de edições)

[Thiago Rulexz 111]

@Maneluxo, me adicione no skype

Este tópico jah foi resolvido... algum moderador pode chamar a sua atenção '-'

[Maneluxo 11]

ok Thiago Rulexz eu demorei a responder pq tava no banho kk vo ligar o skape e te chamar lá ok?

 

 

 

qual seu skape?

Editado Maio 23, 2015 por Maneluxo (veja o histórico de edições)

[Morphred 0]

Galera é o seguinte...

 

Esses dois scripts o sem e o com item pra evoluir pro mega, eles ao morrerem voltam ao normal?

e pega na base poke dash v9 (open source)?

 

Se pegar (ou não) poderiam fazer para usar o item no poke e a evolução e desevolução se torne uma skill do cd_bar? 

tipo eu uso a mega stone no pokemon ai surge a skill na cd_bar ... ai eu clico na skill (ou uso m12) e ele se torna mega (até morrer ou eu clicar na skill de novo(ou usar m12)

 

Se não der assim que pelo menos se torne uma skill na cd_bar e que qndo eu usar ele mude pro mega, e volte ao normal sempre que entrar na ball morto ou não..

 

 

Agradeço desde já!!

[santoslucas 4]

Muito bom rep+, mas poderia fazer um tutorial escrito como colocar isso em um ot server de pda

[Thiago Rulexz 111]

Muito bom rep+, mas poderia fazer um tutorial escrito como colocar isso em um ot server de pda

Posso sim

Hoje estou sem tempo mais em breve eu faço

[santoslucas 4]

quando irá fazer?

Editado Junho 11, 2015 por santoslucas (veja o histórico de edições)