Ir para conteúdo
  • Cadastre-se

[8.54] Erondino Poketibia Revolution 1.0


Posts Recomendados

  • Respostas 24
  • Created
  • Última resposta

Top Posters In This Topic

Top Posters In This Topic

Popular Posts

Hidden Content Give reaction to this post to see the hidden content. Apresentação Prezados Hidden Content Give reaction to this post to see the hidden content. , com muito prazer a ERONDINO TEAM está aqui para disponibilizar a melhor versão FULL de Poketibia, totalmente OPEN. Nossa politica é sempre disponibilizar versões totalm

hum... talves Posto o meu Server Original com pokes de Unova para vcs!! mais para eu Postar quero REP++ sei que nãoo vale para nada mais eu quero xD

cara é no Config.lua que eu saiba desse Server nessa parte -- Rates -- NOTE: experienceStages configuration is located in data/XML/stages.xml. -- rateExperienceFromPlayers 0 to disable. experienceStages = false rateExperience = 0 rateExperienceFromPlayers = 0 rateSkill = 1 rateMagic = 1.0 rateLoot = 1 rateSpawn = 1

  • Sub-Admin

usa a minha que modifiquei 

 

local rate = 30

function onUse(cid, item, fromPos, item2, toPos)

if not isCreature(item2.uid) then
return true
end

if isPlayer(item2.uid) then
return doPlayerSendCancel(cid, "Você só pode usar pokedex em pokemons DBR!")
end

local poke = getCreatureName(item2.uid)

if isMonster(item2.uid) then

local this = newpokedex[getCreatureName(item2.uid)]
local leveltable = getPokemonExperienceTable(getCreatureName(item2.uid))
local myball = 0
  if isSummon(item2.uid) then
  myball = getPlayerSlotItem(getCreatureMaster(item2.uid), 8)
  end

  if not getPlayerInfoAboutPokemon(cid, poke).dex then
   local exp = this.level * rate

                doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Parabéns, você acabou de desbloquear "..getCreatureName(item2.uid).." em sua pokedex!")
   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Como recompensa, você ganhou "..exp.." de experiência.")

   doSendMagicEffect(getThingPos(cid), 210)
   doPlayerAddExperience(cid, exp)

   doAddPokemonInDexList(cid, poke)

  else

   doShowPokedexRegistration(cid, item2, myball, leveltable)

  end
return true
end

if not isPlayer(item2.uid) then return true end

local unlock = 0

for i = 1, #oldpokedex do
  if getPlayerInfoAboutPokemon(item2.uid, oldpokedex[1]).dex then
  unlock = unlock + 1
  end
end

local str = ""
local lnl = 0
local poks = ""
local player = getRecorderPlayer(toPos, cid)

for x = 1001, 1251 do
  local y = tonumber(x - 1000)
  if getPlayerInfoAboutPokemon(player, oldpokedex[y][1]).dex then
   if isPokemonInOwnList(player, oldpokedex[y][1]) then
    str = str.."\n["..threeNumbers(y).."] - "..oldpokedex[y][1].."   (•)"
    lnl = lnl + 1
   else
    str = str.."\n["..threeNumbers(y).."] - "..oldpokedex[y][1]..""
   end

  else
   str = str.."\n["..threeNumbers(y).."] -  ?"
  end
end

if cid == player then

  doPlayerSendTextMessage(cid, 27, "You can open a pokedex entry by typing \"/dex <name>\". Example: \"/dex Pikachu\".")
  str = "Pokédex Information:\n\n- Unlocked pokémon species: "..unlock.."\n- Pokémon species that you own: "..lnl.."\n\n(•) means that you have already used that pokémon species.\n\nPokémon Database:\n"..str..""
   if string.len(str) <= 8192 then
    doShowTextDialog(cid, 2382, str)
   end
else
  doPlayerSendTextMessage(cid, 27, getPlayerName(player).." has unlocked "..unlock.."/251 pokémons already, and has captured "..lnl.." pokemons until now.")
end

return true
end

 

20230912_034613.png.cf49b650c34dd7d7b1f79bd49c70f53c.png

Eu sou um entusiasta da programação apaixonado por ajudar a comunidade open source a crescer. Sempre em busca de novos desafios e oportunidades para contribuir com meu código.  #OpenSource #Programação #Contribuição

 

Link para o post
Compartilhar em outros sites
  Em 26/12/2012 em 13:33, Gabrieltxu disse:

hum... talves Posto o meu Server Original com pokes de Unova para vcs!! mais para eu Postar quero REP++ sei que nãoo vale para nada mais eu quero xD

Expand   Mostrar mais  

por mim é rep+  posta ai pra gente,vai ajudar muito :D

Link para o post
Compartilhar em outros sites

Galera faz tempo isso ... fez 2 anos ... nao mecho mais com esse servidor faz tempo

Meu Ultimo projeto em desenvolvimento!

 

http://www.tibiaking.com/forum/topic/47753-show-off-ultimo-projeto-para-download/

 

 

Grupo do facebook para OtServidores! (Divulgação + Criação de Equipe)

 

https://www.facebook.com/groups/otservidores/

 

Link para o post
Compartilhar em outros sites
  • 1 month later...

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

  • Estatísticas dos Fóruns

    96842
    Tópicos
    519602
    Posts



×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo