• TibiaFace

    Tibiaface | Una comunidad Open Tibia donde encontras : mapas, scripts, Otserver, npc y amigos etc ...

    .
    demo menumenu

    Afiliados



    Votar:

    ayuda con el pokedex

    Compartir:

    Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje (Página 1 de 1.)

    1default ayuda con el pokedex el Sáb Oct 20, 2018 4:02 pm

    manuel123

    avatar
    Miembro
    Miembro
    cuando uso el pokedex si me da la experiencia y me marca que encontre un poquemon que no avia mirado pero a la hora de queder usar el poquedex denuevo en el mismo poquemon ya no sale nada nisiquiera mensaje de error y pues no puedo ver que ataques tiene el poquemon ni el lvl a evolucionar etc...

    Ver perfil de usuario

    2default Re: ayuda con el pokedex el Dom Oct 21, 2018 4:57 pm

    [Admin] God Maya

    avatar
    Administrador
    Administrador
    vamos a etiquetar a [Tienes que estar registrado y conectado para ver este vínculo] el maneja ot pokemons



    Ver perfil de usuario http://www.tibiaface.com

    3default Re: ayuda con el pokedex el Dom Nov 04, 2018 8:16 pm

    Psycho

    avatar
    Moderador
    Moderador
    Prueba con este ponlo en lib/pokedex system.lua

    Código:
    local skills = specialabilities                                    --alterado v1.9 \/ peguem tudo!

    function doAddPokemonInDexList(cid, poke)
    if getPlayerInfoAboutPokemon(cid, poke).dex then return true end
       local a = newpokedex[poke]                                             
       local b = getPlayerStorageValue(cid, a.storage)
       setPlayerStorageValue(cid, a.storage, b.." dex,")
    end

    function getPokemonEvolutionDescription(name, next)
       local kev = poevo[name]
       local stt = {}
       if isInArray(specialevo, name) then
          if name == "Poliwhirl" then
              if next then
                return "\nPoliwrath or Politoed, requires level 65."
              end 
              table.insert(stt, "Evolve Stone: Water Stone and Punch Stone or Water Stone and King's Rock\n\n")
              table.insert(stt, "Evolutions:\nPoliwrath, requires level 65.\nPolitoed, requires level 65.")
          elseif name == "Gloom" then
              if next then
                return "\nVileplume or Bellossom, requires level 50."
              end
              table.insert(stt, "Evolve Stone: Leaf Stone and Venom Stone or Leaf Stone and Sun Stone\n\n")
              table.insert(stt, "Evolutions:\nVileplume, requires level 50.\nBellossom, requires level 50.")
          elseif name == "Slowpoke" then
              if next then
                return "\nSlowbro, requires level 45.\nSlowking, requires level 100."
              end
              table.insert(stt, "Evolve Stone: Enigma Stone or King's Rock\n\n")
              table.insert(stt, "Evolutions:\nSlowbro, requires level 45.\nSlowking, requires level 100.")
          ----
          elseif name == "Dialga" then
              if next then
                return "\nShiny Dialga, requires level 200.\nGreen Dialga, requires level 200."
              end
              table.insert(stt, "Evolve Stone: Hydra Stone or Nature Stone\n\n")
              table.insert(stt, "Evolutions:\nShiny Dialga, requires level 200.\nGreen Dialga, requires level 200.")
          ----
          elseif name == "Eevee" then
              if next then
                return "\nVaporeon, requires level 55.\nJolteon, requires level 55.\nFlareon, requires level 55.\nUmbreon, requires level 55.\nEspeon, requires level 55."
              end
              table.insert(stt, "Evolve Stone: Water Stone or Thunder Stone or Fire Stone or Darkness Stone or Enigma Stone\n\n")
              table.insert(stt, "Evolutions:\nVaporeon, requires level 55.\nJolteon, requires level 55.\nFlareon, requires level 55.\nUmbreon, requires level 55.\nEspeon, requires level 55.")
          elseif name == "Tyrogue" then
              if next then
                return "\nHitmonlee, requires level 60.\nHitmonchan, requires level 60.\nHitmontop, requires level 60."
              end
              table.insert(stt, "Evolve Stone: Punch Stone\n\n") 
              table.insert(stt, "Evolutions:\nHitmonlee, requires level 60.\nHitmonchan, requires level 60.\nHitmontop, requires level 60.")
          end
        elseif kev then
          if next then
              table.insert(stt, "\n"..kev.evolution..", requires level "..kev.level..".")
              return table.concat(stt)
          end
          local id = tonumber(kev.stoneid)
          local id2 = tonumber(kev.stoneid2)
          local stone = ""
          if tonumber(kev.count) == 2 then
              stone = doConvertStoneIdToString(id).." (2x)"
          else
              stone = id2 == 0 and doConvertStoneIdToString(id) or doConvertStoneIdToString(id).." and "..doConvertStoneIdToString(id2)
          end
          table.insert(stt, "Evolve Stone: "..stone.."\n\n")
          table.insert(stt, "Evolutions:\n"..kev.evolution..", requeris level "..kev.level..".")
          table.insert(stt, getPokemonEvolutionDescription(kev.evolution, true))
        else
            if not next then
              table.insert(stt, "Evolutions:\nIt doen't evolve.")
            end
        end 
    return table.concat(stt)
    end

    local function getMoveDexDescr(cid, name, number)
       local x = movestable[name]
       if not x then return "" end
       
       local z = "\n"
       local tables = {x.move1, x.move2, x.move3, x.move4, x.move5, x.move6, x.move7, x.move8, x.move9, x.move10, x.move11, x.move12}
       local y = tables[number]
       if not y then return "" end
       
    if getTableMove(cid, y.name) == "" then
      print(""..y.name.." faltando")
      return "unknown error"
    end
    local txt = ""..z..""..y.name.." - m"..number.." - level "..y.level.." - "..(y.t)
    return txt
    end     
                                                                                                                                    --alterado v1.8
    local skillcheck = {"fly", "ride", "surf", "teleport", "rock smash", "cut", "dig", "light", "blink", "control mind", "transform", "levitate_fly"}
    local passivas = {
    ["Electricity"] = {"Electabuzz", "Shiny Electabuzz", "Elekid", tpw = "electric"},
    ["Lava Counter"] = {"Magmar", "Magby", tpw = "fire"},
    ["Counter Helix"] = {"Scyther", "Shiny Scyther", tpw = "bug"},
    ["Giroball"] = {"Pineco", "Forretress", tpw = "steel"},
    ["Counter Claw"] = {"Scizor", tpw = "bug"},
    ["Counter Spin"] = {"Hitmontop", "Shiny Hitmontop", tpw = "fighting"},
    ["Demon Kicker"] = {"Hitmonlee", "Shiny Hitmonlee", tpw = "fighting"},
    ["Demon Puncher"] = {"Hitmonchan", "Shiny Hitmonchan", tpw = "unknow"},              --alterado v1.6
    ["Stunning Confusion"] = {"Psyduck", "Golduck", "Wobbuffet", tpw = "psychic"},
    ["Groundshock"] = {"Kangaskhan", tpw = "normal"},
    ["Electric Charge"] = {"Pikachu", "Raichu", "Shiny Raichu", tpw = "electric"},
    ["Melody"] = {"Wigglytuff", tpw = "normal"},
    ["Dragon Fury"] = {"Dratini", "Dragonair", "Dragonite", "Shiny Dratini", "Shiny Dragonair", "Shiny Dragonite", tpw = "dragon"},
    ["Fury"] = {"Persian", "Raticate", "Shiny Raticate", tpw = "normal"},
    ["Mega Drain"] = {"Oddish", "Gloom", "Vileplume", "Kabuto", "Kabutops", "Parasect", "Tangela", "Shiny Vileplume", "Shiny Tangela", tpw = "grass"},
    ["Spores Reaction"] = {"Oddish", "Gloom", "Vileplume", "Shiny Vileplume", tpw = "grass"},
    ["Amnesia"] = {"Wooper", "Quagsire", "Swinub", "Piloswine", tpw = "psychic"},
    ["Zen Mind"] = {"Slowking", tpw = "psychic"},
    ["Mirror Coat"] = {"Wobbuffet", tpw = "psychic"},
    ["Lifesteal"] = {"Crobat", tpw = "normal"},
    ["Evasion"] = {"Scyther", "Scizor", "Hitmonlee", "Hitmonchan", "Hitmontop", "Tyrogue", "Shiny Scyther", "Shiny Hitmonchan", "Shiny Hitmonlee", "Shiny Hitmontop", "Ledian", "Ledyba", "Sneasel", tpw = "normal"},
    ["Foresight"] = {"Machamp", "Shiny Hitmonchan", "Shiny Hitmonlee", "Shiny Hitmontop", "Hitmontop", "Hitmonlee", "Hitmonchan", tpw = "fighting"},
    ["Levitate"] = {"Gengar", "Haunter", "Gastly", "Misdreavus", "Weezing", "Koffing", "Unown", "Shiny Gengar", tpw = "ghost"},
    }


    function doShowPokedexRegistration(cid, pokemon, ball)
    local item2 = pokemon
    local virtual = false
      if type(pokemon) == "string" then
          virtual = true
      end
    local myball = ball
    local name = virtual and pokemon or getCreatureName(item2.uid)

    local v = fotos[name]
    local stt = {}

    table.insert(stt, "Name: "..name.."\n")

    if pokes[name].type2 and pokes[name].type2 ~= "no type" then
      table.insert(stt, "Type: "..pokes[name].type.."/"..pokes[name].type2)
    else
        table.insert(stt, "Type: "..pokes[name].type)
    end

    if virtual then
      table.insert(stt, "\nRequired level: "..pokes[name].level.."\n")
    else
      table.insert(stt, "\nRequired level: ".. getPokemonLevel(item2.uid, true) .."\n")
    end

    table.insert(stt, "\n"..getPokemonEvolutionDescription(name).."\n")

    table.insert(stt, "\nMoves:")

    if name == "Ditto" then
      if virtual then
          table.insert(stt, "\nIt doesn't use any moves until transformed.")
      elseif getPlayerStorageValue(item2.uid, 1010) == "Ditto" or getPlayerStorageValue(item2.uid, 1010) == -1 then
          table.insert(stt, "\nIt doesn't use any moves until transformed.")
      else
          for a = 1, 15 do
            table.insert(stt, getMoveDexDescr(item2.uid, getPlayerStorageValue(item2.uid, 1010), a))
          end
      end
    else
      for a = 1, 15 do
          table.insert(stt, getMoveDexDescr(item2.uid, name, a))
      end
    end

    for e, f in pairs(passivas) do
      if isInArray(passivas[e], name) then
          local tpw = passivas[e].tpw
          if name == "Pineco" and passivas[e] == "Giroball" then
            tpw = "bug"
          end
          table.insert(stt, "\n"..e.." - passive - "..tpw)
      end
    end
               
    table.insert(stt, "\n\nAbility:\n")
    local abilityNONE = true                  --alterado v1.8 \/
             
    for b, c in pairs(skills) do
      if isInArray(skillcheck, b) then
          if isInArray(c, name) then
            table.insert(stt, (b == "levitate_fly" and "Levitate" or doCorrectString(b)).."\n")
            abilityNONE = false
          end
      end
    end
    if abilityNONE then
      table.insert(stt, "None")
    end
          
    if string.len(table.concat(stt)) > 8192 then
      print("Error while making pokedex info with pokemon named "..name..".\n  Pokedex registration has more than 8192 letters (it has "..string.len(stt).." letters), it has been blocked to prevent fatal error.")
      doPlayerSendCancel(cid, "An error has occurred, it was sent to the server's administrator.")
    return true
    end   

    doShowTextDialog(cid, v, table.concat(stt))
    end



    AFC By Psycho & Alfa Server
    [Tienes que estar registrado y conectado para ver este vínculo]
    Ver perfil de usuario http://dio-pcl.ddns.net

    Contenido patrocinado


    Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje (Página 1 de 1.)

    Permisos de este foro:
    No puedes responder a temas en este foro.

     

    BienvenidosTibiaFace es una comunidad de Open Tibia. Para participar debes estar registrado (click para Regístrate).