[Encerrado] [Pokemon] Dúvidas? - Pda

[FlamesAdmin 261]

soh troca o teu script do chuck por esse... eu n testei mas achu q deve da certo... qlqr coisa soh flar..

 

 

local focus = 0

local max_distance = 8

local talk_start = 0

local conv = 0

local fighting = false

local challenger = 0

local afk_limit_time = 30 -- seconds

local afk_time = 0 -- don't change

local battle_turn = 1 -- don't change

local challenger_turn = 0 -- don't change

 

local pokemons = {

{name = "Shiny Machamp", level = 100, extralevel = 200, sex = SEX_MALE, nick = "Hulk", ball = "normal"},

}

 

 

local function doSummonGymPokemon(npc)

local this = npc

if not isCreature(this) then return true end

if #getCreatureSummons(this) >= 1 or focus == 0 then return true end

local it = pokemons[battle_turn]

doSummonMonster(this, it.name)

local summon = getCreatureSummons(this)[1]

local balleffect = pokeballs["normal"].effect

if it.ball and pokeballs[it.ball] then

balleffect = pokeballs[it.ball].effect

end

doSendMagicEffect(getThingPos(summon), balleffect)

setPlayerStorageValue(summon, 10000, balleffect)

setPlayerStorageValue(summon, 10001, gobackmsgs[math.random(#gobackmsgs)].back:gsub("doka", it.nick ~= "" and it.nick or it.name))

setPlayerStorageValue(summon, 1007, it.nick ~= "" and it.nick or it.name)

doSetMonsterGym(summon, focus)

local name = it.nick ~= "" and it.nick or getCreatureName(this).."s "..it.name

setWildPokemonLevel(summon, it.level, getPokemonStatus(it.name, (it.extralevel + it.level)), name, 1.5)

doCreatureSay(this, gobackmsgs[math.random(#gobackmsgs)].go:gsub("doka", getPlayerStorageValue(summon, 1007)), 1)

fighting = true

battle_turn = battle_turn + 1

end

 

local function doWinDuel(cid, npc)

if not isCreature(cid) then return true end

local this = npc

doPlayerSetStorageValue(cid, 344487, 1)

doCreatureSay(npc, "You won the duel! Congratulations, choose your prize!", 1)

end

 

function onCreatureSay(cid, type, msg)

 

local msg = string.lower(msg)

 

if focus == cid then

talk_start = os.clock()

end

 

if msgcontains(msg, 'hi') and focus == 0 and getDistanceToCreature(cid) <= 4 then

focus = cid

talk_start = os.clock()

conv = 1

selfSay("Hello "..getCreatureName(cid)..", my name is Chuck Norris and I'm Last's Fight Trainer. How may I help you?")

return true

end

 

if isDuelMsg(msg) and conv == 1 and focus == cid then

 

if getPlayerStorageValue(cid, 344481) ~= 1 or getPlayerStorageValue(cid, 344482) ~= 1 or getPlayerStorageValue(cid, 344483) ~= 1 or getPlayerStorageValue(cid, 344484) ~= 1 or getPlayerStorageValue(cid, 344485) ~= 1 or getPlayerStorageValue(cid, 344485) ~= 1 then

selfSay("You need defeated the first, second, third, fourth, fifth and sixth trainer.")

focus = 0

return true

end

if getPlayerStorageValue(cid, 344487) == 1 then

selfSay("You have defeated me, choose your prize!")

focus = 0

return true

end

if getPlayerStorageValue(cid, 344487) == 2 then

selfSay("You have already defeated me!")

focus = 0

return true

end

 

if not hasPokemon(cid) then

selfSay("To battle agains't a gym leader you need pokemons.")

return true

end

 

selfSay("You are challenging me to a battle. It will be a "..#pokemons.." pokemon limit battle, let's start?")

conv = 2

 

return true

end

 

if isConfirmMsg(msg) and conv == 2 and focus == cid then

 

challenger = focus

setPlayerStorageValue(cid, 990, 1)

selfSay("Yea, let's fight!")

talk_start = os.clock()

addEvent(doSummonGymPokemon, 850, getThis())

conv = 3

 

return true

end

 

if isNegMsg(msg) and conv == 2 and focus == cid then

 

focus = 0

selfSay("It is better for you to refuse a battle against me!")

 

return true

end

 

if msgcontains(msg, 'bye') and focus == cid then

selfSay('Bye and do your best trainer!')

setPlayerStorageValue(focus, 990, -1)

focus = 0

return true

end

end

 

local afk_warning = false

local change = false

 

function onThink()

 

if focus == 0 then

selfTurn(2)

fighting = false

challenger = 0

challenger_turn = 0

battle_turn = 1

afk_time = 0

afk_warning = false

 

if #getCreatureSummons(getThis()) >= 1 then

setPlayerStorageValue(getCreatureSummons(getThis())[1], 1006, 0)

doCreatureAddHealth(getCreatureSummons(getThis())[1], -getCreatureMaxHealth(getCreatureSummons(getThis())[1]))

end

 

return true

else

 

if not isCreature(focus) then

focus = 0

return true

end

 

if fighting then

 

talk_start = os.clock()

 

if not isCreature(getCreatureTarget(getThis())) then

if #getCreatureSummons(challenger) >= 1 then

selfAttackCreature(getCreatureSummons(challenger)[1])

change = true

afk_time = 0

else

afk_time = afk_time + 0.5

if change then

change = false

challenger_turn = challenger_turn + 1

end

end

end

 

if afk_time > afk_limit_time then

setPlayerStorageValue(focus, 990, -1)

focus = 0

selfSay("I have waited too long, come back when you are ready!")

return true

end

 

if not afk_warning and afk_time > afk_limit_time / 2 then

selfSay("Where's your pokemon? Let's fight!")

afk_warning = true

end

 

 

if #getCreatureSummons(getThis()) == 0 then

if battle_turn > #pokemons then

addEvent(doWinDuel, 1000, focus, getThis())

setPlayerStorageValue(focus, 990, -1)

focus = 0

return true

end

addEvent(doSummonGymPokemon, 1000, getThis())

end

 

if not hasPokemon(challenger) or challenger_turn >= 7 or challenger_turn > #pokemons then

selfSay("You lost our duel! Maybe some other time you'll defeat me.")

setPlayerStorageValue(focus, 990, -1)

focus = 0

return true

end

 

end

 

local npcpos = getThingPos(getThis())

local focpos = getThingPos(focus)

 

if npcpos.z ~= focpos.z then

setPlayerStorageValue(focus, 990, -1)

focus = 0

selfSay("Bye then.")

return true

end

 

if (os.clock() - talk_start) > 30 then

selfSay("Good bye and keep training!")

setPlayerStorageValue(focus, 990, -1)

focus = 0

end

 

if getDistanceToCreature(focus) > max_distance then

setPlayerStorageValue(focus, 990, -1)

focus = 0

return true

end

 

local dir = doRedirectDirection(getDirectionTo(npcpos, focpos))

selfTurn(dir)

end

return true

end

 

 

vlw lek funfo + 1 rep pra tu ae

 

----EDIT----

ops so amanha ja ti dei rep pelo spoiler

Editado Fevereiro 26, 2012 por FlamesAdmin

[Dynkzin 47]

em lib tem configuration.lua faz 1 copia e abre ele e vai ter

pokemonExpPerLevelRate = 20

baseExpRate = 0.5

generalExpRate = 100

 

tenta aumentar 1 dos 3 caso de algum erro ja tem a copia de configuration, mude 1 de cada vez e tbm em configuration la embaixo tem os stats dos pokemons e + pro fim da linha em cada pokémon tem escrito exp tenta aumentar veja se funciona.

 

vlw kra consegui arrumar aqui ganho meu rep +...

 

alguem sabe algum mapa compativel que tenha respawns?? pq esse nao tem nenhum respaw vlws

[betinhowz666 166]

Tenho uma dúvida como eu poderia liberar todos os outfits para a galera, o povo sendo free ou não.

 

 

 

 

creio que conf.lua deixando assim estara liberado ?

 

 

-- Outfits

allowChangeOutfit = true

allowChangeColors = true

allowChangeAddons = true

disableOutfitsForPrivilegedPlayers = false

addonsOnlyPremium = false

Editado Fevereiro 26, 2012 por betinhowz666

[MarcosFraga 34]

Tenho uma dúvida como eu poderia liberar todos os outfits para a galera, o povo sendo free ou não.

 

 

 

 

creio que conf.lua deixando assim estara liberado ?

 

 

-- Outfits

allowChangeOutfit = true

allowChangeColors = true

allowChangeAddons = true

disableOutfitsForPrivilegedPlayers = false

addonsOnlyPremium = false

Não vai no data/XML abre o arquivo outfits.xml e nas outfits que estiverem premium está assim

premium="yes"> poem ''no'' ou simplismente apaga o premium="yes" em todas as outfits que você quiser.

[Zerots2 0]

alguem tem os pokemons com loots certos???

[Denuvo 71]

Gente algem mim ajuda plz meu ot ta on mais esse negocio tá foda..td mundo reclamando

na versão "F" qando ataca cm o poke m1 m2 m3 m4 m5 m6 m7 m8 m9 m10 m11 m12

fiko aparecendo os "M" tipo se eu atacar cm o m1 o comando m1 aparece junto cm o nome do ataque

e táa móo horrivel isso naum sei oq eu faço mais mais olhei qase td e nada obg pela atenção do REP+ essa semana

tada pra qem conseguir mim ajudar.

[SaikiSailed 0]

Como adicionar mais Pokes?

Editado Fevereiro 26, 2012 por Saiki

[fernandofw 2]

Gente alguem me ajuda veja eu tenho esse Script que é um LUA de uma quest que eu fiz, mas eu coloquei tudo certo e não vem a surpresa, alguem pode corrigir ela? eu não entendo muito de script

 

local starterpokes = {
["Teddiursa"] = {x = 1424, y = 848, z = 7},
}

local level = 5
local extrastr = 1.5
local btype = "normal"

function onUse(cid, item, frompos, item2, topos)

   if pokemon == "" then return true end

   local gender = getRandomGenderByName(pokemon)

   local mypoke = getPokemonStatus(pokemon)

       if not mypoke then return true end

   local offense = mypoke.off * level * extrastr
   local defense = mypoke.def * level * extrastr
   local speed = mypoke.agi * level * extrastr
   local vit = mypoke.vit * level * extrastr
   local spatk = mypoke.spatk * level * extrastr
   local happy = 180
   local leveltable = getPokemonExperienceTable(pokemon)

   doPlayerAddItem(cid, 2394, 10)

   local item = doCreateItemEx(2219)
       doItemSetAttribute(item, "poke", pokemon)
       doItemSetAttribute(item, "hp", 1)
       doItemSetAttribute(item, "level", level)
       doItemSetAttribute(item, "exp", leveltable[level])
       doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level])
       doItemSetAttribute(item, "offense", offense)
       doItemSetAttribute(item, "defense", defense)
       doItemSetAttribute(item, "speed", speed)
       doItemSetAttribute(item, "vitality", vit)
       doItemSetAttribute(item, "specialattack", spatk)
       doItemSetAttribute(item, "happy", happy)
       doItemSetAttribute(item, "gender", gender)
       doItemSetAttribute(item, "description", "Contains a "..pokemon..".")
       doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")
       doItemSetAttribute(item, "firstpoke", getCreatureName(cid))
   doPlayerAddItemEx(cid, item, true)

   doTransformItem(item, pokeballs[btype].on)

   doPlayerSendTextMessage(cid, 27, "You got your first pokemon! You also received some pokeballs to help you in your way.")
   doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!")

   doSendMagicEffect(getThingPos(cid), 29)
   doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
   doSendMagicEffect(getThingPos(cid), 27)
   doSendMagicEffect(getThingPos(cid), 29)


return TRUE
end

[betinhowz666 166]

Estou com dois erros no meu servidor.

 

 

 

Um deles é este que aparece no console.

 

 

[26/02/2012 17:31:09] [Error - MoveEvent::executeStep] Call stack overflow.

 

 

E o outro é que tenho respawn de shiny aleatorio certinho ae quando mato o shiny o corpo dele some, isso acontece com todos os shinys alguem poderia me ajudar?

[Jeffer000 65]

Estou com dois erros no meu servidor.

 

 

 

Um deles é este que aparece no console.

 

 

[26/02/2012 17:31:09] [Error - MoveEvent::executeStep] Call stack overflow.

 

 

E o outro é que tenho respawn de shiny aleatorio certinho ae quando mato o shiny o corpo dele some, isso acontece com todos os shinys alguem poderia me ajudar?

 

Tambem tenho esse erro no movement..quanto ao shiny o corps deles no xml e no configuration.lua ta certinho?

Editado Fevereiro 26, 2012 por jeffe000

[fagundes14 7]

Gente algem mim ajuda plz meu ot ta on mais esse negocio tá foda..td mundo reclamando

na versão "F" qando ataca cm o poke m1 m2 m3 m4 m5 m6 m7 m8 m9 m10 m11 m12

fiko aparecendo os "M" tipo se eu atacar cm o m1 o comando m1 aparece junto cm o nome do ataque

e táa móo horrivel isso naum sei oq eu faço mais mais olhei qase td e nada obg pela atenção do REP+ essa semana

tada pra qem conseguir mim ajudar.

 

Voce Deve Ter Feito Alguma Alteraçao Na Qual Ta Dando Erro

Qual ERRO Ta Aparecendo No Console?

 

ABRASS

Editado Fevereiro 26, 2012 por Fagundes14

[betinhowz666 166]

Jeff voce poderia upar os shiny, com seus itens.xml e o configuration.lua e me manda por pm o link ?

 

 

Creio que um desses tres seja o problema , eu agradeceria muito se fizesse isto.

 

 

 

Igual aquele pack que você tinha feito antes.

Editado Fevereiro 26, 2012 por betinhowz666

[MarcosFraga 34]

Gente algem mim ajuda plz meu ot ta on mais esse negocio tá foda..td mundo reclamando

na versão "F" qando ataca cm o poke m1 m2 m3 m4 m5 m6 m7 m8 m9 m10 m11 m12

fiko aparecendo os "M" tipo se eu atacar cm o m1 o comando m1 aparece junto cm o nome do ataque

e táa móo horrivel isso naum sei oq eu faço mais mais olhei qase td e nada obg pela atenção do REP+ essa semana

tada pra qem conseguir mim ajudar.

Isso só ocorre com você que andou editando alguma coisa eu tenho aqui a versão F crua sem nada editada e esta funcional sem esse seu erro postado tente rever oque você andou mechendo.

Gente alguem me ajuda veja eu tenho esse Script que é um LUA de uma quest que eu fiz, mas eu coloquei tudo certo e não vem a surpresa, alguem pode corrigir ela? eu não entendo muito de script

 

local starterpokes = {
["Teddiursa"] = {x = 1424, y = 848, z = 7},
}

local level = 5
local extrastr = 1.5
local btype = "normal"

function onUse(cid, item, frompos, item2, topos)

if pokemon == "" then return true end

local gender = getRandomGenderByName(pokemon)

local mypoke = getPokemonStatus(pokemon)

	if not mypoke then return true end

local offense = mypoke.off * level * extrastr
local defense = mypoke.def * level * extrastr
local speed = mypoke.agi * level * extrastr
local vit = mypoke.vit * level * extrastr
local spatk = mypoke.spatk * level * extrastr
local happy = 180
local leveltable = getPokemonExperienceTable(pokemon)

doPlayerAddItem(cid, 2394, 10)

local item = doCreateItemEx(2219)
	doItemSetAttribute(item, "poke", pokemon)
	doItemSetAttribute(item, "hp", 1)
	doItemSetAttribute(item, "level", level)
	doItemSetAttribute(item, "exp", leveltable[level])
	doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level])
	doItemSetAttribute(item, "offense", offense)
	doItemSetAttribute(item, "defense", defense)
	doItemSetAttribute(item, "speed", speed)
	doItemSetAttribute(item, "vitality", vit)
	doItemSetAttribute(item, "specialattack", spatk)
	doItemSetAttribute(item, "happy", happy)
	doItemSetAttribute(item, "gender", gender)
	doItemSetAttribute(item, "description", "Contains a "..pokemon..".")
	doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")
	doItemSetAttribute(item, "firstpoke", getCreatureName(cid))
doPlayerAddItemEx(cid, item, true)

doTransformItem(item, pokeballs[btype].on)

doPlayerSendTextMessage(cid, 27, "You got your first pokemon! You also received some pokeballs to help you in your way.")
doPlayerSendTextMessage(cid, 27, "Don\'t forget to use your pokedex on every undiscovered pokemon!")

doSendMagicEffect(getThingPos(cid), 29)
doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
doSendMagicEffect(getThingPos(cid), 27)
doSendMagicEffect(getThingPos(cid), 29)


return TRUE
end

Seguinte esse posição que você botou é pra ter um bau e esse bau e o id desse bau e pra tar adicionado do actions.xml

por exemplo:

<action itemid="iddobau" event="script" value="nomedoscript.lua"/>

Estou com dois erros no meu servidor.

 

 

Um deles é este que aparece no console.

 

 

[26/02/2012 17:31:09] [Error - MoveEvent::executeStep] Call stack overflow.

 

 

E o outro é que tenho respawn de shiny aleatorio certinho ae quando mato o shiny o corpo dele some, isso acontece com todos os shinys alguem poderia me ajudar?

[26/02/2012 17:31:09] [Error - MoveEvent::executeStep] Call stack overflow.

Esse erro ocorre quando tu poem no mapa algum pokemon em algum lugar que ele não pode se mecher ai da o erro no movement call stack overflow ele é infinito você tem que achar o pokemon que pode estar até mesmo no meio d'agua e tira-lo

Obs:Esse erro não é nada grave você pode sim conviver com ele que não afetará nada no servidor a não ser algum player achando o pokemon trancado \o/

 

Quanto ao seu shiny tiver sumindo tenta ver se na pasta data/monsters/pokes/shinys/ e olha os shinys ve se la ta os corpses se não tiver tem que por se tiver é erro nesse shiny aleatório.

Editado Fevereiro 26, 2012 por SoulOroshie

[FlamesAdmin 261]

galera vou fazer um pequeno pedido, alguem poderia me passar alguns npcs de duel que ganhe outfits por pm? dou rep terça-feira, pq o de segunda é do Slicer

[cabrito2v 10]

Alguém sabe me dizer como q funciona esse nick system ?

O que tem que modificar nas sources ?