Ir para conteúdo
  • Cadastre-se

Normal [Pedido] Scrippt de Stone [Pokémon]

GOD Vitor

Por ,
em Suporte Tibia Otserv

 Share Seguidores 0

Posts Recomendados

GOD Vitor

GOD Vitor 335

Postado
Postado

Eae galerinha,tava vasculhando o TK e não achei a scrippt que preciso,é a scrippt de stone,que evolui o pokémon,quem me ajudar,vou dar 3 REP+.Obrigado!

Se ajudei reputa. UFIdXwJ.png


Meus Trabalhos
Servidor Pokémon Paraíso V1
Servidor Pokémon Paraíso V2

Servidor Pokémon Paraíso V3
[Talkactions] Teleportar para a área da staff
[Talkactions] Últimas Noticias
[Script] Bike System parecida com a do otPokémon

[2016] Sprites Completas - PokeXGames

[MOD] Store - Pokémon

 

Doar - GOD Vitor

 

Link para o post
Compartilhar em outros sites
GOD Vitor

GOD Vitor 335

Postado
  • Autor
Postado

Especifique melhor sua dúvida para eu tentar ajudar.

Tipo,eu queria um scrippt de um item que evolui o pokémon,ou seja de uma stone que evolui o pokémon,quando você da use nela e clica no pokémon,faz seu pokémon transformar para outro,exemplo: eu uso a pure stone no rhydon ele evolui para rhyperior.

Se ajudei reputa. UFIdXwJ.png


Meus Trabalhos
Servidor Pokémon Paraíso V1
Servidor Pokémon Paraíso V2

Servidor Pokémon Paraíso V3
[Talkactions] Teleportar para a área da staff
[Talkactions] Últimas Noticias
[Script] Bike System parecida com a do otPokémon

[2016] Sprites Completas - PokeXGames

[MOD] Store - Pokémon

 

Doar - GOD Vitor

 

Link para o post
Compartilhar em outros sites
DeCarvalho

DeCarvalho 72

Postado
Postado

Eae galerinha,tava vasculhando o TK e não achei a scrippt que preciso,é a scrippt de stone,que evolui o pokémon,quem me ajudar,vou dar 3 REP+.Obrigado!

Para facilitar a ajuda informe qual a versão você está usando.. são 'n' versões por ai que fica complicado..

 

você chegou a olhar se dentro de data/actions/scripts tem o arquivo evolution.lua?

 

se sim

 

["Sandshrew"] = {level = 55, evolution = "Sandslash", maxh = 3400, count = 2, stoneid = 2287, stoneid2 = 0},

 
     /\                  /\                  /\                /\
Aqui fica o nome      level neces-        nome do novo       vida que o
do pokemon que        sário para          pokemon.          novo pokemon
vai evoluir.         efetuar a evo-                         vai ter.
                      lução.
 
["Nome Do pokemon"] = {level = level necessario para evoluir, evolution = "nome do novo pokemon", count = xx, stoneid = 2287, stoneid2 = 0},
 
count - Aqui quantas stones precisa pra evoluir, segue o modelo:
 
stoneid e stoneid2 = ids das pedras
 
Para fazer evoluir com uma stone
 
count = 1, stoneid = xxxx, stoneid2 = 0.
 
para fazer evuluir com duas stones iguais
 
count = 2, stoneid = xxxx, stoneid2 = 0.
 
Para fazer evoluir com duas pedras diferentes
 
count = 1, stoneid = xxxx, stoneid2 = yyyy.
 
xxx e yyy numero das stones
 
Caso você não tenha, informe a versão do seu server :)

[TFS 1.2  ] Evento Jogos Vorazes

[TFS 1.2  ] Sistema de Diálogo em ModalWindow

[TFS 1.1+] Sistema de Crafting Avançado em ModalWindow

[TFS 1.1+] Sistema de Alquimia Avançada em ModalWindow

[TFS 1.2  ] Sistema VIP completo com portas, items, pisos

Link para o post
Compartilhar em outros sites
GOD Vitor

GOD Vitor 335

Postado
  • Autor
Postado

 

Para facilitar a ajuda informe qual a versão você está usando.. são 'n' versões por ai que fica complicado..

 

você chegou a olhar se dentro de data/actions/scripts tem o arquivo evolution.lua?

 

se sim

 

["Sandshrew"] = {level = 55, evolution = "Sandslash", maxh = 3400, count = 2, stoneid = 2287, stoneid2 = 0},

 
     /\                  /\                  /\                /\
Aqui fica o nome      level neces-        nome do novo       vida que o
do pokemon que        sário para          pokemon.          novo pokemon
vai evoluir.         efetuar a evo-                         vai ter.
                      lução.
 
["Nome Do pokemon"] = {level = level necessario para evoluir, evolution = "nome do novo pokemon", count = xx, stoneid = 2287, stoneid2 = 0},
 
count - Aqui quantas stones precisa pra evoluir, segue o modelo:
 
stoneid e stoneid2 = ids das pedras
 
Para fazer evoluir com uma stone
 
count = 1, stoneid = xxxx, stoneid2 = 0.
 
para fazer evuluir com duas stones iguais
 
count = 2, stoneid = xxxx, stoneid2 = 0.
 
Para fazer evoluir com duas pedras diferentes
 
count = 1, stoneid = xxxx, stoneid2 = yyyy.
 
xxx e yyy numero das stones
 
Caso você não tenha, informe a versão do seu server :)

 

o meu não é assim.

 

Script Evolution: local special = specialevo

local types = {

[leaf] = {"Bulbasaur", "Ivysaur", "Oddish", "Gloom", "Bellsprout", "Weepinbell", "Exeggcute", "Chikorita", "Bayleef", "Hoppip", "Skiploom", "Sunkern", "Treecko", "Grovyle", "Lileep"},

[water] = {"Squirtle", "Wartortle", "Horsea", "Goldeen", "Magikarp", "Psyduck", "Poliwag", "Poliwhirl", "Tentacool", "Krabby", "Staryu", "Omanyte", "Eevee", "Totodile", "Croconow", "Chinchou", "Marill", "Wooper", "Slowpoke", "Remoraid", "Seadra", "Mudkip", "Marshtomp", "Seel", "Shellder", "Smoochum", "Swinub"},

[venom] = {"Zubat", "Ekans", "Nidoran male", "Nidoran female", "Nidorino", "Nidorina", "Gloom", "Venonat", "Tentacool", "Grimer", "Koffing", "Spinarak", "Golbat"},

[thunder] = {"Magnemite", "Pikachu", "Voltorb", "Eevee", "Chinchou", "Pichu", "Mareep", "Flaaffy", "Elekid"},

[rock] = {"Geodude", "Graveler", "Rhyhorn", "Kabuto", "Slugma", "Pupitar", "Aron", "Lairon"},

[punch] = {"Machop", "Machoke", "Mankey", "Poliwhirl", "Tyrogue"},

[fire] = {"Charmander", "Charmeleon", "Vulpix", "Growlithe", "Ponyta", "Eevee", "Cyndaquil", "Quilava", "Slugma", "Houndour", "Magby", "Torchic", "Combusken"},

[coccon] = {"Caterpie", "Metapod", "Weedle", "Kakuna", "Paras", "Venonat", "Scyther", "Ledyba", "Spinarak", "Pineco"},

[crystal] = {"Dratini", "Dragonair", "Magikarp", "Omanyte", "Kabuto", "Seadra", "Bagon", "Shelgon", "Vibrava", "Feebas"},

[dark] = {"Gastly", "Haunter", "Eevee", "Houndour", "Pupitar"},

[earth] = {"Cubone", "Sandshrew", "Nidorino", "Nidorina", "Diglett", "Onix", "Rhyhorn", "Wooper", "Swinub", "Phanpy", "Larvitar", "Trapinch"},

[enigma] = {"Abra", "Kadabra", "Psyduck", "Slowpoke", "Drowzee", "Eevee", "Natu", "Smoochum", "Beldum", "Metang"},

[heart] = {"Rattata", "Pidgey", "Pidgeotto", "Spearow", "Clefairy", "Jigglypuff", "Meowth", "Doduo", "Porygon", "Chansey", "Sentret", "Hoothoot", "Cleffa", "Igglybuff", "Togepi", "Snubull", "Teddiursa"},

[ice] = {"Seel", "Shellder", "Smoochum", "Swinub"},

[king] = {"Slowpoke", "Poliwhirl"},

[shiny] = {"Alakazam", "Gyarados", "Venusaur", "Charizard", "Blastoise", "Tentacruel", "Seadra", "Tropius", "Metang", "Metagross", "Milotic", "Salamence", "Dragonite", "Pidgeot", "Abra", "Arcanine", "Ariados", "Beedrill", "Butterfree", "Cubone", "Marowak", "Gengar", "Dratini", "Dragonair", "Electabuzz", "Electrode", "Espeon", "Farfetch'd", "Fearow", "Golbat", "Grimer", "Growlithe", "Hitmonchan", "Hitmonlee", "Horsea", "Jynx", "Kingler", "Krabby", "Magikarp", "Magneton", "Marowak", "Mr. Mime", "Muk", "Oddish", "Onix", "Paras", "Parasect", "Pinsir", "Politoed", "Raichu", "Raticate", "Rhydon", "Scyther", "Tangela", "Zubat", "Venomoth"},

[dragon] = {"Seadra"},

[upgrade] = {"Porygon"},

[sun] = {"Sunkern", "Gloom"},

--[sfire] = {"Shiny Charmander", "Shiny Charmeleon", "Shiny Vulpix", "Shiny Growlithe", "Shiny Ponyta", "Shiny Eevee"},

[swater] = {"Shiny Squirtle", "Shiny Wartortle", "Shiny Horsea", "Shiny Goldeen", "Shiny Magikarp", "Shiny Psyduck", "Shiny Poliwag", "Shiny Poliwhirl", "Shiny Tentacool", "Shiny Krabby", "Shiny Staryu", "Shiny Omanyte", "Shiny Eevee"},

[sleaf] = {"Shiny Bulbasaur", "Shiny Ivysaur", "Shiny Oddish", "Shiny Gloom", "Shiny Bellsprout", "Shiny Weepinbell", "Shiny Exeggcute"},

[sheart] = {"Shiny Rattata", "Shiny Pidgey", "Shiny Pidgeotto", "Shiny Spearow", "Shiny Clefairy", "Shiny Jigglypuff", "Shiny Meowth", "Shiny Doduo", "Shiny Porygon", "Shiny Chansey"},

[senigma] = {"Shiny Abra", "Shiny Kadabra", "Shiny Psyduck", "Shiny Slowpoke", "Shiny Drowzee", "Shiny Eevee"},

[srock] = {"Shiny Geodude", "Shiny Graveler", "Shiny Rhyhorn", "Shiny Kabuto"},

[svenom] = {"Shiny Zubat", "Shiny Ekans", "Shiny Nidoran male", "Shiny Nidoran female", "Shiny Nidorino", "Shiny Nidorina", "Shiny Gloom", "Shiny Venonat", "Shiny Tentacool", "Shiny Grimer", "Shiny Koffing"},

[sice] = {"Shiny Seel", "Shiny Shellder"},

[sthunder] = {"Shiny Magnemite", "Shiny Pikachu", "Shiny Voltorb", "Shiny Eevee"},

[scrystal] = {"Shiny Dratini", "Shiny Dragonair", "Shiny Magikarp", "Shiny Omanyte", "Shiny Kabuto"},

[scoccon] = {"Shiny Caterpie", "Shiny Metapod", "Shiny Weedle", "Shiny Kakuna", "Shiny Paras", "Shiny Venonat", "Shiny Scyther"},

[sdarkness] = {"Shiny Gastly", "Shiny Haunter", "Shiny Eevee"},

[spunch] = {"Shiny Machop", "Shiny Machoke", "Shiny Mankey", "Shiny Poliwhirl"},

[searth] = {"Shiny Cubone", "Shiny Sandshrew", "Shiny Nidorino", "Shiny Nidorina", "Shiny Diglett", "Shiny Onix", "Shiny Rhyhorn"}

}

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

local pokeball = getPlayerSlotItem(cid, 8)

if not isMonster(item2.uid) or not isSummon(item2.uid) or #getCreatureSummons(cid) > 1 then   --alterado v2.9

    return true

end

if getCreatureCondition(item2.uid, CONDITION_INVISIBLE) then return true end

local pevo = poevo[getCreatureName(item2.uid)]

if not isInArray(specialevo, getCreatureName(item2.uid)) then

   if not pevo then

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

        return true

   end

   if pevo.level ~= 1 and not allEvolutionsCanBeInduzedByStone then

      doPlayerSendCancel(cid, "This pokemon doesn't evolve using stones.")

        return true

   end

   if not isPlayer(getCreatureMaster(item2.uid)) or getCreatureMaster(item2.uid) ~= cid then

      doPlayerSendCancel(cid, "You can only use stones on pokemons you own.")

        return true

   end

   if pevo.stoneid ~= item.itemid and pevo.stoneid2 ~= item.itemid then

      doPlayerSendCancel(cid, "This isn't the needed stone to evolve this pokemon.")

        return true

   end

end

local minlevel = 0

if getPokemonName(item2.uid) == "Eevee" then

   local eevee = ""

   if item.itemid == thunder then

      eevee = "Jolteon"

   elseif item.itemid == water then

      eevee = "Vaporeon"

   elseif item.itemid == fire then

      eevee = "Flareon"

   elseif item.itemid == enigma and allEvolutionsCanBeInduzedByStone then

      eevee = "Espeon"

   elseif item.itemid == dark and allEvolutionsCanBeInduzedByStone then

      eevee = "Umbreon"

   else

      doPlayerSendCancel(cid, "This isn't the required stone to evolve this pokemon.")

      return true

   end

   minlevel = pokes[eevee].level

   if getPlayerLevel(cid) < minlevel then

      doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

        return true

   end

   

   if getPokemonLevel(item2.uid) < 20 then

      return doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (20).")

   end

   doRemoveItem(item.uid, 1)

   doEvolvePokemon(cid, item2, eevee, 0, 0)

   return true

end

if getPokemonName(item2.uid) == "Shiny Eevee" then

   local eevee = ""

   if item.itemid == sthunder then

      eevee = "Shiny Jolteon"

   elseif item.itemid == swater then

      eevee = "Shiny Vaporeon"

   elseif item.itemid == sfire then

      eevee = "Shiny Flareon"

   else

      doPlayerSendCancel(cid, "This isn't the required stone to evolve this pokemon.")

      return true

   end

   minlevel = pokes[eevee].level

   if getPlayerLevel(cid) < minlevel then

        doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

        return true

   end

   if getPokemonLevel(item2.uid) < 20 then

      return doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (20).")

   end

   doRemoveItem(item.uid, 1)

   doEvolvePokemon(cid, item2, eevee, 0, 0)

   return true

end

if isInArray(specialevo, getPokemonName(item2.uid)) then

   if getPokemonName(item2.uid) == "Poliwhirl" then

      local evolution = 0

        local theevo = ""

        local nlevel = 45

      

      if item.itemid == water then

         if getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, king) >= 1 then

              evolution = king

                theevo = "Politoed"

            elseif getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, punch) >= 1 and allEvolutionsCanBeInduzedByStone then

                evolution = punch

                theevo = "Poliwrath"

            else

                if getPokemonLevel(item2.uid) < 36 then

                   doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")

                   return true

                end

                if allEvolutionsCanBeInduzedByStone then

                    if getPlayerItemCount(cid, king) <= 0 and getPlayerItemCount(cid, punch) <= 0 then

                        doPlayerSendCancel(cid, "You need a water stone and a punch stone (Poliwrath) or a King's Rock (Politoed) to evolve this pokemon.")

                       return true

                    end

                else

                    if getPlayerItemCount(cid, king) <= 0 then

                        doPlayerSendCancel(cid, "You need a Water Stone and a King's Rock to evolve this pokemon to a Politoed.")

                       return true

                    end

                end

            end

         minlevel = pokes[theevo].level

         if getPlayerLevel(cid) < minlevel then

               doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

               return true

            end

            if theevo == "Poliwrath" and getPokemonLevel(item2.uid) < 36 then

               doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")

               return true

            end

            if getPlayerItemCount(cid, punch) >= 1 and getPlayerItemCount(cid, king) >= 1 and allEvolutionsCanBeInduzedByStone then

                doPlayerSendCancel(cid, "Please, use your Punch Stone to evolve this pokemon to a Poliwrath, or a King's Rock to a Politoed.")

               return true

            end

            if evolution == 0 then

                if allEvolutionsCanBeInduzedByStone then

                    doPlayerSendCancel(cid, "You need at least one Water Stone, and a Punch Stone (Poliwrath) or a King's Rock (Politoed) to evolve this pokemon.")

                else

                    doPlayerSendCancel(cid, "You need at least one Water Stone and a King's Rock to evolve this pokemon.")

                end

               return true

            end

            if evolution ~= 0 then

               doEvolvePokemon(cid, item2, theevo, evolution, water)

               return true

            end

        elseif item.itemid == punch then

            minlevel = pokes["Poliwrath"].level

            if not allEvolutionsCanBeInduzedByStone then

                doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")

            return true

            end

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            if getPokemonLevel(item2.uid) < 36 then

            doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (45).")

            return true

            end

            if getPlayerItemCount(cid, water) <= 0 then

            doPlayerSendCancel(cid, "You need at least one Punch Stone and one Water Stone to evolve this pokemon.")

            return true

            end

            local theevo = "Poliwrath"

            doEvolvePokemon(cid, item2, theevo, water, punch)

    

        elseif item.itemid == king then

            minlevel = pokes["Politoed"].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            if getPlayerItemCount(cid, water) <= 0 then

            doPlayerSendCancel(cid, "You need at least one Punch Stone and one King's Rock to evolve this pokemon.")

            return true

            end

            local theevo = "Politoed"

            doEvolvePokemon(cid, item2, theevo, water, king)

        end

     elseif getPokemonName(item2.uid) == "Shiny Poliwhirl" then

        local evolution = 0

        local theevo = ""

        local nlevel = 45

        if item.itemid == swater then

            if getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, punch) >= 1 and allEvolutionsCanBeInduzedByStone then

                evolution = spunch

                theevo = "Shiny Poliwrath"

            else

                if getPokemonLevel(item2.uid) < 36 then

                doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")

                return true

                end

                if allEvolutionsCanBeInduzedByStone then

                    if getPlayerItemCount(cid, punch) <= 0 then

                        doPlayerSendCancel(cid, "You need a shining water stone and a shining punch stone Shiny Poliwrath to evolve this pokemon.")

                    return true

                    end

                else

                    

                end

            end

            minlevel = pokes[theevo].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            if theevo == "Shiny Poliwrath" and getPokemonLevel(item2.uid) < 36 then

                doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")

            return true

            end

            if getPlayerItemCount(cid, spunch) >= 1 and allEvolutionsCanBeInduzedByStone then

                doPlayerSendCancel(cid, "Please, use your shining Punch Stone to evolve this pokemon to a Poliwrath.")

            return true

            end

            if evolution == 0 then

                if allEvolutionsCanBeInduzedByStone then

                    doPlayerSendCancel(cid, "You need at least one shining Water Stone and a shining Punch Stone ,Shiny Poliwrath to evolve this pokemon.")

                else

                    doPlayerSendCancel(cid, "You need at least one shining Water Stone evolve this pokemon.")

                end

            return true

            end

            if evolution ~= 0 then

            doEvolvePokemon(cid, item2, theevo, evolution, swater)

            return true

            end

        elseif item.itemid == spunch then

            minlevel = pokes["Shiny Poliwrath"].level

            if not allEvolutionsCanBeInduzedByStone then

                doPlayerSendCancel(cid, "This is not the required shining stone to evolve this pokemon.")

            return true

            end

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            if getPokemonLevel(item2.uid) < 36 then

            doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (45).")

            return true

            end

            if getPlayerItemCount(cid, swater) <= 0 then

            doPlayerSendCancel(cid, "You need at least one shining Punch Stone and one shining Water Stone to evolve this pokemon.")

            return true

            end

            local theevo = "Shiny Poliwrath"

            doEvolvePokemon(cid, item2, theevo, swater, spunch)

        

        end

    elseif getPokemonName(item2.uid) == "Gloom" then

        if getPokemonLevel(item2.uid) < 31 then

        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (31).")

        return true

        end

    if item.itemid == leaf then

        local theevo = ""

        local evolution = 0

            if getPlayerItemCount(cid, venom) >= 1 and getPlayerItemCount(cid, sun) >= 1 then

            doPlayerSendCancel(cid, "Please, use your Venom Stone to evolve this pokemon to a Vileplume, or a Sun Stone to a Bellossom.")

            return true

            end

            if getPlayerItemCount(cid, venom) <= 0 and getPlayerItemCount(cid, sun) <= 0 then

            doPlayerSendCancel(cid, "You need at least one Leaf Stone, and a Sun Stone (Bellossom) or a Venom Stone (Vileplume) to evolve this pokemon.")

            return true

            end

            if getPlayerItemCount(cid, venom) >= 1 then

            theevo = "Vileplume"

            evolution = venom

            elseif getPlayerItemCount(cid, sun) >= 1 then

            theevo = "Bellossom"

            evolution = sun

            end

            minlevel = pokes[theevo].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            doEvolvePokemon(cid, item2, theevo, evolution, leaf)

        elseif item.itemid == venom then

            minlevel = pokes["Vileplume"].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            if getPlayerItemCount(cid, leaf) <= 0 then

            doPlayerSendCancel(cid, "You need at least one Leaf Stone and one Venom Stone to evolve this pokemon.")

            return true

            end

            doEvolvePokemon(cid, item2, "Vileplume", venom, leaf)

        elseif item.itemid == sun then

            minlevel = pokes["Bellossom"].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            if getPlayerItemCount(cid, leaf) <= 0 then

            doPlayerSendCancel(cid, "You need at least one Leaf Stone and one Sun Stone to evolve this pokemon.")

            return true

            end

            doEvolvePokemon(cid, item2, "Bellossom", sun, leaf)

        end

      elseif getPokemonName(item2.uid) == "Shiny Gloom" then

        if getPokemonLevel(item2.uid) < 31 then

        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (31).")

        return true

        end

    if item.itemid == sleaf then

        local theevo = ""

        local evolution = 0

            if getPlayerItemCount(cid, svenom) >= 1 then

            doPlayerSendCancel(cid, "Please, use your shining Venom Stone to evolve this pokemon to a Shiny Vileplume.")

            return true

            end

            if getPlayerItemCount(cid, svenom) <= 0 then

            doPlayerSendCancel(cid, "You need at least one shining Leaf Stone or a shining Venom Stone (Shiny Vileplume) to evolve this pokemon.")

            return true

            end

            if getPlayerItemCount(cid, svenom) >= 1 then

            theevo = "Shiny Vileplume"

            evolution = svenom

            end

            minlevel = pokes[theevo].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            doEvolvePokemon(cid, item2, theevo, evolution, sleaf)

        elseif item.itemid == svenom then

            minlevel = pokes["Shiny Vileplume"].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            if getPlayerItemCount(cid, sleaf) <= 0 then

            doPlayerSendCancel(cid, "You need at least one Leaf Stone and one shining Venom Stone to evolve this pokemon.")

            return true

            end

            doEvolvePokemon(cid, item2, "Shiny Vileplume", svenom, sleaf)

        end

    elseif getPokemonName(item2.uid) == "Slowpoke" then

        if getPokemonLevel(item2.uid) < 28 then

        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (28).")

        return true

        end

        if item.itemid == enigma then

            if not allEvolutionsCanBeInduzedByStone then

                doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")

            return true

            end

            minlevel = pokes["Slowbro"].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            doEvolvePokemon(cid, item2, "Slowbro", enigma, 0)

        elseif item.itemid == king then

            minlevel = pokes["Slowking"].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            doEvolvePokemon(cid, item2, "Slowking", king, 0)

        end

    elseif getPokemonName(item2.uid) == "Dragonair" then

        if getPokemonLevel(item2.uid) < 28 then

        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (28).")

        return true

        end

        if item.itemid == crystal then

            if not allEvolutionsCanBeInduzedByStone then

                doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")

            return true

            end

            minlevel = pokes["Dragonite"].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            doEvolvePokemon(cid, item2, "Dragonite", crystal, 0)

        elseif item.itemid == shiny then

            minlevel = pokes["Shiny Dragonair"].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            doEvolvePokemon(cid, item2, "Shiny Dragonair", shiny, 0)

        end

    elseif getPokemonName(item2.uid) == "Metang" then

        if getPokemonLevel(item2.uid) < 28 then

        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (28).")

        return true

        end

        if item.itemid == enigma then

            if not allEvolutionsCanBeInduzedByStone then

                doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")

            return true

            end

            minlevel = pokes["Metagross"].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            doEvolvePokemon(cid, item2, "Metagross", enigma, 0)

        elseif item.itemid == shiny then

            minlevel = pokes["Shiny Metang"].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            doEvolvePokemon(cid, item2, "Shiny Metang", shiny, 2)

        end

elseif getPokemonName(item2.uid) == "Shiny Slowpoke" then

        if getPokemonLevel(item2.uid) < 28 then

        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (28).")

        return true

        end

        if item.itemid == senigma then

            if not allEvolutionsCanBeInduzedByStone then

                doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")

            return true

            end

            minlevel = pokes["Shiny Slowbro"].level

            if getPlayerLevel(cid) < minlevel then

            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

            return true

            end

            doEvolvePokemon(cid, item2, "Shiny Slowbro", senigma, 0)

        end

    elseif getPokemonName(item2.uid) == "Tyrogue" then

        if getPokemonLevel(item2.uid) < 20 then

        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (20).")

        return true

        end

        if not allEvolutionsCanBeInduzedByStone then

            doPlayerSendCancel(cid, "This pokemon doesn't evolve using stones.")

        return true

        end

        local evolution = ""

        if getOffense(item2.uid) == getDefense(item2.uid) then

            evolution = "Hitmontop"

        elseif getOffense(item2.uid) > getDefense(item2.uid) then

            evolution = "Hitmonlee"

        else

            evolution = "Hitmonchan"

        end

        minlevel = pokes[evolution].level

        if getPlayerLevel(cid) < minlevel then

        doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

        return true

        end

        doEvolvePokemon(cid, item2, evolution, punch, 0)

    end

return true

end

local count = poevo[getPokemonName(item2.uid)].count

local stnid = poevo[getPokemonName(item2.uid)].stoneid

local stnid2 = poevo[getPokemonName(item2.uid)].stoneid2

local evo = poevo[getPokemonName(item2.uid)].evolution

local nlevel = poevo[getPokemonName(item2.uid)].level

local count = poevo[getPokemonName(item2.uid)].count

local stnid = poevo[getPokemonName(item2.uid)].stoneid

local stnid2 = poevo[getPokemonName(item2.uid)].stoneid2

local evo = poevo[getPokemonName(item2.uid)].evolution

local nlevel = poevo[getPokemonName(item2.uid)].level

if stnid2 > 1 and (getPlayerItemCount(cid, stnid2) < count or getPlayerItemCount(cid, stnid) < count) then

doPlayerSendCancel(cid, "You need at least one "..getItemNameById(stnid).." and one "..getItemNameById(stnid2).." to evolve this pokemon!")

return true

end

if getPlayerItemCount(cid, stnid) < count then

local str = ""

    if count >= 2 then

    str = "s"

    end

return doPlayerSendCancel(cid, "You need at least "..count.." "..getItemNameById(stnid)..""..str.." to evolve this pokemon!")

end

minlevel = pokes[evo].level

if getPlayerLevel(cid) < minlevel and evolutionByStoneRequireLevel then

doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")

return true

end

if getPokemonLevel(item2.uid) < nlevel and evolutionByStoneRequireLevel then

doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve ("..nlevel..").")

return true

end

if count >= 2 then

stnid2 = stnid

end

doEvolvePokemon(cid, item2, evo, stnid, stnid2)

return TRUE

end

 

 

 

 

 

bom,o servidor é 8.54,base pokémon paraiso v2

Se ajudei reputa. UFIdXwJ.png


Meus Trabalhos
Servidor Pokémon Paraíso V1
Servidor Pokémon Paraíso V2

Servidor Pokémon Paraíso V3
[Talkactions] Teleportar para a área da staff
[Talkactions] Últimas Noticias
[Script] Bike System parecida com a do otPokémon

[2016] Sprites Completas - PokeXGames

[MOD] Store - Pokémon

 

Doar - GOD Vitor

 

Link para o post
Compartilhar em outros sites
DeCarvalho

DeCarvalho 72

Postado
Postado

estou meio apertado mas logo vejo se acho algo para te ajudar não respondi antes pq to meio apertado

 

.. mas da proxima vez por favor use spoiler e code para facilitar a vida.. o post fica melhor e mais organizado

 

use [ spoiler ] [/ spoiler] e [ code ] [/ code ] (sem espaço) e coloque o conteudo dentro para fazer assim


exemplo de spoiler 



exemplo de code

 

spoiler com code

code dentro do spoiler

[TFS 1.2  ] Evento Jogos Vorazes

[TFS 1.2  ] Sistema de Diálogo em ModalWindow

[TFS 1.1+] Sistema de Crafting Avançado em ModalWindow

[TFS 1.1+] Sistema de Alquimia Avançada em ModalWindow

[TFS 1.2  ] Sistema VIP completo com portas, items, pisos

Link para o post
Compartilhar em outros sites
GOD Vitor

GOD Vitor 335

Postado
  • Autor
Postado (editado) 


local special = specialevo

local types = {
[leaf] = {"Bulbasaur", "Ivysaur", "Oddish", "Gloom", "Bellsprout", "Weepinbell", "Exeggcute", "Chikorita", "Bayleef", "Hoppip", "Skiploom", "Sunkern", "Treecko", "Grovyle", "Lileep"},
[water] = {"Squirtle", "Wartortle", "Horsea", "Goldeen", "Magikarp", "Psyduck", "Poliwag", "Poliwhirl", "Tentacool", "Krabby", "Staryu", "Omanyte", "Eevee", "Totodile", "Croconow", "Chinchou", "Marill", "Wooper", "Slowpoke", "Remoraid", "Seadra", "Mudkip", "Marshtomp", "Seel", "Shellder", "Smoochum", "Swinub"},
[venom] = {"Zubat", "Ekans", "Nidoran male", "Nidoran female", "Nidorino", "Nidorina", "Gloom", "Venonat", "Tentacool", "Grimer", "Koffing", "Spinarak", "Golbat"},
[thunder] = {"Magnemite", "Pikachu", "Voltorb", "Eevee", "Chinchou", "Pichu", "Mareep", "Flaaffy", "Elekid"},
[rock] = {"Geodude", "Graveler", "Rhyhorn", "Kabuto", "Slugma", "Pupitar", "Aron", "Lairon"},
[punch] = {"Machop", "Machoke", "Mankey", "Poliwhirl", "Tyrogue"},
[fire] = {"Charmander", "Charmeleon", "Vulpix", "Growlithe", "Ponyta", "Eevee", "Cyndaquil", "Quilava", "Slugma", "Houndour", "Magby", "Torchic", "Combusken"},
[coccon] = {"Caterpie", "Metapod", "Weedle", "Kakuna", "Paras", "Venonat", "Scyther", "Ledyba", "Spinarak", "Pineco"},
[crystal] = {"Dratini", "Dragonair", "Magikarp", "Omanyte", "Kabuto", "Seadra", "Bagon", "Shelgon", "Vibrava", "Feebas"},
[dark] = {"Gastly", "Haunter", "Eevee", "Houndour", "Pupitar"},
[earth] = {"Cubone", "Sandshrew", "Nidorino", "Nidorina", "Diglett", "Onix", "Rhyhorn", "Wooper", "Swinub", "Phanpy", "Larvitar", "Trapinch"},
[enigma] = {"Abra", "Kadabra", "Psyduck", "Slowpoke", "Drowzee", "Eevee", "Natu", "Smoochum", "Beldum", "Metang"},
[heart] = {"Rattata", "Pidgey", "Pidgeotto", "Spearow", "Clefairy", "Jigglypuff", "Meowth", "Doduo", "Porygon", "Chansey", "Sentret", "Hoothoot", "Cleffa", "Igglybuff", "Togepi", "Snubull", "Teddiursa"},
[ice] = {"Seel", "Shellder", "Smoochum", "Swinub"},
[king] = {"Slowpoke", "Poliwhirl"},
[shiny] = {"Alakazam", "Gyarados", "Venusaur", "Charizard", "Blastoise", "Tentacruel", "Seadra", "Tropius", "Metang", "Metagross", "Milotic", "Salamence", "Dragonite", "Pidgeot", "Abra", "Arcanine", "Ariados", "Beedrill", "Butterfree", "Cubone", "Marowak", "Gengar", "Dratini", "Dragonair", "Electabuzz", "Electrode", "Espeon", "Farfetch'd", "Fearow", "Golbat", "Grimer", "Growlithe", "Hitmonchan", "Hitmonlee", "Horsea", "Jynx", "Kingler", "Krabby", "Magikarp", "Magneton", "Marowak", "Mr. Mime", "Muk", "Oddish", "Onix", "Paras", "Parasect", "Pinsir", "Politoed", "Raichu", "Raticate", "Rhydon", "Scyther", "Tangela", "Zubat", "Venomoth"},
[dragon] = {"Seadra"},
[upgrade] = {"Porygon"},
[sun] = {"Sunkern", "Gloom"},
--[sfire] = {"Shiny Charmander", "Shiny Charmeleon", "Shiny Vulpix", "Shiny Growlithe", "Shiny Ponyta", "Shiny Eevee"},
[swater] = {"Shiny Squirtle", "Shiny Wartortle", "Shiny Horsea", "Shiny Goldeen", "Shiny Magikarp", "Shiny Psyduck", "Shiny Poliwag", "Shiny Poliwhirl", "Shiny Tentacool", "Shiny Krabby", "Shiny Staryu", "Shiny Omanyte", "Shiny Eevee"},
[sleaf] = {"Shiny Bulbasaur", "Shiny Ivysaur", "Shiny Oddish", "Shiny Gloom", "Shiny Bellsprout", "Shiny Weepinbell", "Shiny Exeggcute"},
[sheart] = {"Shiny Rattata", "Shiny Pidgey", "Shiny Pidgeotto", "Shiny Spearow", "Shiny Clefairy", "Shiny Jigglypuff", "Shiny Meowth", "Shiny Doduo", "Shiny Porygon", "Shiny Chansey"},
[senigma] = {"Shiny Abra", "Shiny Kadabra", "Shiny Psyduck", "Shiny Slowpoke", "Shiny Drowzee", "Shiny Eevee"},
[srock] = {"Shiny Geodude", "Shiny Graveler", "Shiny Rhyhorn", "Shiny Kabuto"},
[svenom] = {"Shiny Zubat", "Shiny Ekans", "Shiny Nidoran male", "Shiny Nidoran female", "Shiny Nidorino", "Shiny Nidorina", "Shiny Gloom", "Shiny Venonat", "Shiny Tentacool", "Shiny Grimer", "Shiny Koffing"},
[sice] = {"Shiny Seel", "Shiny Shellder"},
[sthunder] = {"Shiny Magnemite", "Shiny Pikachu", "Shiny Voltorb", "Shiny Eevee"},
[scrystal] = {"Shiny Dratini", "Shiny Dragonair", "Shiny Magikarp", "Shiny Omanyte", "Shiny Kabuto"},
[scoccon] = {"Shiny Caterpie", "Shiny Metapod", "Shiny Weedle", "Shiny Kakuna", "Shiny Paras", "Shiny Venonat", "Shiny Scyther"},
[sdarkness] = {"Shiny Gastly", "Shiny Haunter", "Shiny Eevee"},
[spunch] = {"Shiny Machop", "Shiny Machoke", "Shiny Mankey", "Shiny Poliwhirl"},
[searth] = {"Shiny Cubone", "Shiny Sandshrew", "Shiny Nidorino", "Shiny Nidorina", "Shiny Diglett", "Shiny Onix", "Shiny Rhyhorn"}

}

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

local pokeball = getPlayerSlotItem(cid, 8)

if not isMonster(item2.uid) or not isSummon(item2.uid) or #getCreatureSummons(cid) > 1 then   --alterado v2.9
    return true
end
if getCreatureCondition(item2.uid, CONDITION_INVISIBLE) then return true end

local pevo = poevo[getCreatureName(item2.uid)]

if not isInArray(specialevo, getCreatureName(item2.uid)) then
   if not pevo then
      doPlayerSendCancel(cid, "This pokemon can't evolve.")
        return true
   end

   if pevo.level ~= 1 and not allEvolutionsCanBeInduzedByStone then
      doPlayerSendCancel(cid, "This pokemon doesn't evolve using stones.")
        return true
   end

   if not isPlayer(getCreatureMaster(item2.uid)) or getCreatureMaster(item2.uid) ~= cid then
      doPlayerSendCancel(cid, "You can only use stones on pokemons you own.")
        return true
   end

   if pevo.stoneid ~= item.itemid and pevo.stoneid2 ~= item.itemid then
      doPlayerSendCancel(cid, "This isn't the needed stone to evolve this pokemon.")
        return true
   end
end

local minlevel = 0

if getPokemonName(item2.uid) == "Eevee" then
   local eevee = ""
   if item.itemid == thunder then
      eevee = "Jolteon"
   elseif item.itemid == water then
      eevee = "Vaporeon"
   elseif item.itemid == fire then
      eevee = "Flareon"
   elseif item.itemid == enigma and allEvolutionsCanBeInduzedByStone then
      eevee = "Espeon"
   elseif item.itemid == dark and allEvolutionsCanBeInduzedByStone then
      eevee = "Umbreon"
   else
      doPlayerSendCancel(cid, "This isn't the required stone to evolve this pokemon.")
      return true
   end
   minlevel = pokes[eevee].level
   if getPlayerLevel(cid) < minlevel then
      doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
        return true
   end
   
   if getPokemonLevel(item2.uid) < 20 then
      return doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (20).")
   end
   doRemoveItem(item.uid, 1)
   doEvolvePokemon(cid, item2, eevee, 0, 0)
   return true
end

if getPokemonName(item2.uid) == "Shiny Eevee" then
   local eevee = ""
   if item.itemid == sthunder then
      eevee = "Shiny Jolteon"
   elseif item.itemid == swater then
      eevee = "Shiny Vaporeon"
   elseif item.itemid == sfire then
      eevee = "Shiny Flareon"
   else
      doPlayerSendCancel(cid, "This isn't the required stone to evolve this pokemon.")
      return true
   end
   minlevel = pokes[eevee].level
   if getPlayerLevel(cid) < minlevel then
        doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
        return true
   end
   if getPokemonLevel(item2.uid) < 20 then
      return doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (20).")
   end
   doRemoveItem(item.uid, 1)
   doEvolvePokemon(cid, item2, eevee, 0, 0)
   return true
end

if isInArray(specialevo, getPokemonName(item2.uid)) then
   if getPokemonName(item2.uid) == "Poliwhirl" then
      local evolution = 0
        local theevo = ""
        local nlevel = 45
      
      if item.itemid == water then
         if getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, king) >= 1 then
              evolution = king
                theevo = "Politoed"
            elseif getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, punch) >= 1 and allEvolutionsCanBeInduzedByStone then
                evolution = punch
                theevo = "Poliwrath"
            else
                if getPokemonLevel(item2.uid) < 36 then
                   doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")
                   return true
                end
                if allEvolutionsCanBeInduzedByStone then
                    if getPlayerItemCount(cid, king) <= 0 and getPlayerItemCount(cid, punch) <= 0 then
                        doPlayerSendCancel(cid, "You need a water stone and a punch stone (Poliwrath) or a King's Rock (Politoed) to evolve this pokemon.")
                       return true
                    end
                else
                    if getPlayerItemCount(cid, king) <= 0 then
                        doPlayerSendCancel(cid, "You need a Water Stone and a King's Rock to evolve this pokemon to a Politoed.")
                       return true
                    end
                end
            end
         minlevel = pokes[theevo].level
         if getPlayerLevel(cid) < minlevel then
               doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
               return true
            end

            if theevo == "Poliwrath" and getPokemonLevel(item2.uid) < 36 then
               doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")
               return true
            end

            if getPlayerItemCount(cid, punch) >= 1 and getPlayerItemCount(cid, king) >= 1 and allEvolutionsCanBeInduzedByStone then
                doPlayerSendCancel(cid, "Please, use your Punch Stone to evolve this pokemon to a Poliwrath, or a King's Rock to a Politoed.")
               return true
            end

            if evolution == 0 then
                if allEvolutionsCanBeInduzedByStone then
                    doPlayerSendCancel(cid, "You need at least one Water Stone, and a Punch Stone (Poliwrath) or a King's Rock (Politoed) to evolve this pokemon.")
                else
                    doPlayerSendCancel(cid, "You need at least one Water Stone and a King's Rock to evolve this pokemon.")
                end
               return true
            end

            if evolution ~= 0 then
               doEvolvePokemon(cid, item2, theevo, evolution, water)
               return true
            end

        elseif item.itemid == punch then

            minlevel = pokes["Poliwrath"].level

            if not allEvolutionsCanBeInduzedByStone then
                doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")
            return true
            end

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            if getPokemonLevel(item2.uid) < 36 then
            doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (45).")
            return true
            end

            if getPlayerItemCount(cid, water) <= 0 then
            doPlayerSendCancel(cid, "You need at least one Punch Stone and one Water Stone to evolve this pokemon.")
            return true
            end

            local theevo = "Poliwrath"
            doEvolvePokemon(cid, item2, theevo, water, punch)
    
        elseif item.itemid == king then

            minlevel = pokes["Politoed"].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            if getPlayerItemCount(cid, water) <= 0 then
            doPlayerSendCancel(cid, "You need at least one Punch Stone and one King's Rock to evolve this pokemon.")
            return true
            end

            local theevo = "Politoed"
            doEvolvePokemon(cid, item2, theevo, water, king)
        end

     elseif getPokemonName(item2.uid) == "Shiny Poliwhirl" then

        local evolution = 0
        local theevo = ""
        local nlevel = 45

        if item.itemid == swater then

            if getPokemonLevel(item2.uid) >= 36 and getPlayerItemCount(cid, punch) >= 1 and allEvolutionsCanBeInduzedByStone then
                evolution = spunch
                theevo = "Shiny Poliwrath"
            else
                if getPokemonLevel(item2.uid) < 36 then
                doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")
                return true
                end
                if allEvolutionsCanBeInduzedByStone then
                    if getPlayerItemCount(cid, punch) <= 0 then
                        doPlayerSendCancel(cid, "You need a shining water stone and a shining punch stone Shiny Poliwrath to evolve this pokemon.")
                    return true
                    end
                else
                    
                end
            end

            minlevel = pokes[theevo].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            if theevo == "Shiny Poliwrath" and getPokemonLevel(item2.uid) < 36 then
                doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (36).")
            return true
            end

            if getPlayerItemCount(cid, spunch) >= 1 and allEvolutionsCanBeInduzedByStone then
                doPlayerSendCancel(cid, "Please, use your shining Punch Stone to evolve this pokemon to a Poliwrath.")
            return true
            end

            if evolution == 0 then
                if allEvolutionsCanBeInduzedByStone then
                    doPlayerSendCancel(cid, "You need at least one shining Water Stone and a shining Punch Stone ,Shiny Poliwrath to evolve this pokemon.")
                else
                    doPlayerSendCancel(cid, "You need at least one shining Water Stone evolve this pokemon.")
                end
            return true
            end

            if evolution ~= 0 then
            doEvolvePokemon(cid, item2, theevo, evolution, swater)
            return true
            end

        elseif item.itemid == spunch then

            minlevel = pokes["Shiny Poliwrath"].level

            if not allEvolutionsCanBeInduzedByStone then
                doPlayerSendCancel(cid, "This is not the required shining stone to evolve this pokemon.")
            return true
            end

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            if getPokemonLevel(item2.uid) < 36 then
            doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (45).")
            return true
            end

            if getPlayerItemCount(cid, swater) <= 0 then
            doPlayerSendCancel(cid, "You need at least one shining Punch Stone and one shining Water Stone to evolve this pokemon.")
            return true
            end

            local theevo = "Shiny Poliwrath"
            doEvolvePokemon(cid, item2, theevo, swater, spunch)
        
        end

    elseif getPokemonName(item2.uid) == "Gloom" then

        if getPokemonLevel(item2.uid) < 31 then
        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (31).")
        return true
        end

    if item.itemid == leaf then

        local theevo = ""
        local evolution = 0

            if getPlayerItemCount(cid, venom) >= 1 and getPlayerItemCount(cid, sun) >= 1 then
            doPlayerSendCancel(cid, "Please, use your Venom Stone to evolve this pokemon to a Vileplume, or a Sun Stone to a Bellossom.")
            return true
            end

            if getPlayerItemCount(cid, venom) <= 0 and getPlayerItemCount(cid, sun) <= 0 then
            doPlayerSendCancel(cid, "You need at least one Leaf Stone, and a Sun Stone (Bellossom) or a Venom Stone (Vileplume) to evolve this pokemon.")
            return true
            end

            if getPlayerItemCount(cid, venom) >= 1 then
            theevo = "Vileplume"
            evolution = venom
            elseif getPlayerItemCount(cid, sun) >= 1 then
            theevo = "Bellossom"
            evolution = sun
            end

            minlevel = pokes[theevo].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            doEvolvePokemon(cid, item2, theevo, evolution, leaf)

        elseif item.itemid == venom then

            minlevel = pokes["Vileplume"].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            if getPlayerItemCount(cid, leaf) <= 0 then
            doPlayerSendCancel(cid, "You need at least one Leaf Stone and one Venom Stone to evolve this pokemon.")
            return true
            end

            doEvolvePokemon(cid, item2, "Vileplume", venom, leaf)

        elseif item.itemid == sun then

            minlevel = pokes["Bellossom"].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            if getPlayerItemCount(cid, leaf) <= 0 then
            doPlayerSendCancel(cid, "You need at least one Leaf Stone and one Sun Stone to evolve this pokemon.")
            return true
            end

            doEvolvePokemon(cid, item2, "Bellossom", sun, leaf)
        end

      elseif getPokemonName(item2.uid) == "Shiny Gloom" then

        if getPokemonLevel(item2.uid) < 31 then
        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (31).")
        return true
        end

    if item.itemid == sleaf then

        local theevo = ""
        local evolution = 0

            if getPlayerItemCount(cid, svenom) >= 1 then
            doPlayerSendCancel(cid, "Please, use your shining Venom Stone to evolve this pokemon to a Shiny Vileplume.")
            return true
            end

            if getPlayerItemCount(cid, svenom) <= 0 then
            doPlayerSendCancel(cid, "You need at least one shining Leaf Stone or a shining Venom Stone (Shiny Vileplume) to evolve this pokemon.")
            return true
            end

            if getPlayerItemCount(cid, svenom) >= 1 then
            theevo = "Shiny Vileplume"
            evolution = svenom
            end

            minlevel = pokes[theevo].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            doEvolvePokemon(cid, item2, theevo, evolution, sleaf)

        elseif item.itemid == svenom then

            minlevel = pokes["Shiny Vileplume"].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            if getPlayerItemCount(cid, sleaf) <= 0 then
            doPlayerSendCancel(cid, "You need at least one Leaf Stone and one shining Venom Stone to evolve this pokemon.")
            return true
            end

            doEvolvePokemon(cid, item2, "Shiny Vileplume", svenom, sleaf)

        end

    elseif getPokemonName(item2.uid) == "Slowpoke" then

        if getPokemonLevel(item2.uid) < 28 then
        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (28).")
        return true
        end

        if item.itemid == enigma then

            if not allEvolutionsCanBeInduzedByStone then
                doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")
            return true
            end

            minlevel = pokes["Slowbro"].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            doEvolvePokemon(cid, item2, "Slowbro", enigma, 0)

        elseif item.itemid == king then

            minlevel = pokes["Slowking"].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            doEvolvePokemon(cid, item2, "Slowking", king, 0)
        end

    elseif getPokemonName(item2.uid) == "Dragonair" then

        if getPokemonLevel(item2.uid) < 28 then
        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (28).")
        return true
        end

        if item.itemid == crystal then

            if not allEvolutionsCanBeInduzedByStone then
                doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")
            return true
            end

            minlevel = pokes["Dragonite"].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            doEvolvePokemon(cid, item2, "Dragonite", crystal, 0)

        elseif item.itemid == shiny then

            minlevel = pokes["Shiny Dragonair"].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            doEvolvePokemon(cid, item2, "Shiny Dragonair", shiny, 0)
        end

    elseif getPokemonName(item2.uid) == "Metang" then

        if getPokemonLevel(item2.uid) < 28 then
        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (28).")
        return true
        end

        if item.itemid == enigma then

            if not allEvolutionsCanBeInduzedByStone then
                doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")
            return true
            end

            minlevel = pokes["Metagross"].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            doEvolvePokemon(cid, item2, "Metagross", enigma, 0)

        elseif item.itemid == shiny then

            minlevel = pokes["Shiny Metang"].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            doEvolvePokemon(cid, item2, "Shiny Metang", shiny, 2)
        end


elseif getPokemonName(item2.uid) == "Shiny Slowpoke" then

        if getPokemonLevel(item2.uid) < 28 then
        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (28).")
        return true
        end

        if item.itemid == senigma then

            if not allEvolutionsCanBeInduzedByStone then
                doPlayerSendCancel(cid, "This is not the required stone to evolve this pokemon.")
            return true
            end

            minlevel = pokes["Shiny Slowbro"].level

            if getPlayerLevel(cid) < minlevel then
            doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
            return true
            end

            doEvolvePokemon(cid, item2, "Shiny Slowbro", senigma, 0)

        end


    elseif getPokemonName(item2.uid) == "Tyrogue" then

        if getPokemonLevel(item2.uid) < 20 then
        doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve (20).")
        return true
        end

        if not allEvolutionsCanBeInduzedByStone then
            doPlayerSendCancel(cid, "This pokemon doesn't evolve using stones.")
        return true
        end

        local evolution = ""

        if getOffense(item2.uid) == getDefense(item2.uid) then
            evolution = "Hitmontop"
        elseif getOffense(item2.uid) > getDefense(item2.uid) then
            evolution = "Hitmonlee"
        else
            evolution = "Hitmonchan"
        end

        minlevel = pokes[evolution].level

        if getPlayerLevel(cid) < minlevel then
        doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
        return true
        end

        doEvolvePokemon(cid, item2, evolution, punch, 0)
    end

return true
end

local count = poevo[getPokemonName(item2.uid)].count
local stnid = poevo[getPokemonName(item2.uid)].stoneid
local stnid2 = poevo[getPokemonName(item2.uid)].stoneid2
local evo = poevo[getPokemonName(item2.uid)].evolution
local nlevel = poevo[getPokemonName(item2.uid)].level

local count = poevo[getPokemonName(item2.uid)].count
local stnid = poevo[getPokemonName(item2.uid)].stoneid
local stnid2 = poevo[getPokemonName(item2.uid)].stoneid2
local evo = poevo[getPokemonName(item2.uid)].evolution
local nlevel = poevo[getPokemonName(item2.uid)].level


if stnid2 > 1 and (getPlayerItemCount(cid, stnid2) < count or getPlayerItemCount(cid, stnid) < count) then
doPlayerSendCancel(cid, "You need at least one "..getItemNameById(stnid).." and one "..getItemNameById(stnid2).." to evolve this pokemon!")
return true
end

if getPlayerItemCount(cid, stnid) < count then
local str = ""
    if count >= 2 then
    str = "s"
    end
return doPlayerSendCancel(cid, "You need at least "..count.." "..getItemNameById(stnid)..""..str.." to evolve this pokemon!")
end

minlevel = pokes[evo].level

if getPlayerLevel(cid) < minlevel and evolutionByStoneRequireLevel then
doPlayerSendCancel(cid, "You don't have enough level to evolve this pokemon ("..minlevel..").")
return true
end

if getPokemonLevel(item2.uid) < nlevel and evolutionByStoneRequireLevel then
doPlayerSendCancel(cid, "Sorry, your pokemon doesn't have the required level to evolve ("..nlevel..").")
return true
end

if count >= 2 then
stnid2 = stnid
end

doEvolvePokemon(cid, item2, evo, stnid, stnid2)

return TRUE
end

e.e deu certo,vlw

Editado por GOD Vitor (veja o histórico de edições)

Se ajudei reputa. UFIdXwJ.png


Meus Trabalhos
Servidor Pokémon Paraíso V1
Servidor Pokémon Paraíso V2

Servidor Pokémon Paraíso V3
[Talkactions] Teleportar para a área da staff
[Talkactions] Últimas Noticias
[Script] Bike System parecida com a do otPokémon

[2016] Sprites Completas - PokeXGames

[MOD] Store - Pokémon

 

Doar - GOD Vitor

 

Link para o post
Compartilhar em outros sites

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.

×
 Share
Seguidores 0
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

  • Conteúdo Similar

    • Jaurez
      .
      Por Jaurez
      .
    • Cat
      Tibia 8.60 v2 Map Editor Release (Corrige erro: Could not locate Tibia.dat and/or Tibia.spr, please navigate to your Tibia 8.60 installation folder)
      Por Cat
      Em alguns casos, o tibia 8.60 comum não abre de jeito nenhum no map editor, mesmo desmarcando check file signatures e configurando o path corretamente.
       
      Este é o client 8.60 adaptado para o Remere's Map Editor. Resolvi postar já que ele foi removido do site oficial do RME. (ficou apenas a versão para linux lá)
      Se estiver tendo problemas para abrir a versão 8.60, tente utilizar este.
                                                                                                                     
      Baixar o Tibia Client 8.60 que funciona no Remere’s Map Editor
      Essa versão do Tibia 8.60 client resolve o erro unsupported client version ou Could not locate tibia.dat and/or tibia.spr, please navigate to your tibia 8.60 installation folder.
       
      Downloads
      https://tibiaking.com/applications/core/interface/file/attachment.php?id=47333

      Scan: https://www.virustotal.com/gui/file/333e172ac49ba2028db9eb5889994509e7d2de28ebccfa428c04e86defbe15cc
       
    • danilo belato
      (Resolvido)Problema com Dat Editor (Sprites que e exportada n abri)
      Por danilo belato
      Fala Galera To Com um problema aki 
       
      quero exporta umas sprites de um server para colocar em outro 
       
      eu clico na sprites ai aparece tds a forma delas do lado de la >>
       
      ai eu clico nela e ponho a opiçao de export mais quando salvo a sprite ela n abri 
       
      aparece isso quando tento vê-la 
       
      visualização não disponível ( no formatos png e bitmap)
       
      Agora no formato idc fala que o paint n pode ler 
       
      me ajudem ae...
    • Vitor Bicaleto
      (Resolvido)Script addon bugado
      Por Vitor Bicaleto
      Galera to com o script do addon doll aqui, quando eu digito apenas "!addon" ele aparece assim: Digite novamente, algo está errado!"
      quando digito por exemplo: "!addon citizen" ele não funciona e não da nenhum erro
       
      mesma coisa acontece com o mount doll.. 
    • Ayron5
      (Resolvido)Cannot load boost
      Por Ayron5
      Substitui uma stone no serve, deu tudo certo fora  esse  erro ajudem  Valendo  Rep+  Grato  

      Erro: data/actions/scripts/boost.lua:557: table index is nil
       [Warning - Event::loadScript] Cannot load script (data/actions/scripts/boost.lua)

      Script:

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito