pedido [Pedido] Lvl system pokemon

[willian12345 8]

Ola galera queria pedir um system de lvl do pokemon igual pokemonBr

rep+ pra quem ajuda

 

[Junior001 362]

Não é mais facil você baixar um servidor de Pokémon com Level System ??

[willian12345 8]

eu ja tenho de lvl system mais queria igual do br ou kpdo

 

o do kpdo e tipo eu vo upando o poke mais a xp e um poco foda ai ele chrga a serto lvl e vc clika num negocio que fuika do lado do slowth da pokebola e quando vc clika la o pokemon evolui e vouta lvl 0 e so evolui se vc tive o lvl pra usa o poke

ngm vai me responder?

[dalvorsn 268]

Isso feito por lua é ruim cara, tem pra ficar bacana e bom fazer pelas sources, e de graça acredito que ninguém vá fazer rs

[RodriigoRobson 110]

- Eu Tenhu um Sistema Parecido de Pokelevel !

- No Pokemonbr o Pokemon so Ganha HP a Cada LVL e nao Aumenta na Força Bosta nenhuma e o Sistema de Sexo e so De Infeite Tambem!

- A Diferença e que nao vai aparece do Lado do nome do Poke Ex: Charmander [10] é so No Look

- NAO DAREI SUPORTE NO SCRIPT POIS NAO FUI EU QUE FIZ!

- Obs: Limite de Pokelevel: [30]

- Se Quiser aumentar o Limite de LvL Pokemon e so Seguir de Acordo com o Script

- Vai em Creaturescripts e Cria um Arquivo Chamado Pokelevel.lua:

 

local kkkkk = {
["Abra"] = {exp = 100},
["Aerodactyl"] = {exp = 600},
["Alakazam"] = {exp = 480},
["Arbok"] = {exp = 170},
["Arcanine"] = {exp = 240},
["Articuno"] = {exp = 800},
["Beedrill"] = {exp = 200},
["Bellsprout"] = {exp = 1000},
["Blastoise"] = {exp = 370},
["Bulbasaur"] = {exp = 180},
["Butterfree"] = {exp = 140},
["Caterpie"] = {exp = 70},
["Chansey"] = {exp = 280},
["Charmander"] = {exp = 270},
["Charmeleon"] = {exp = 340},
["Charizard"] = {exp = 670},
["Clefable"] = {exp = 280},
["Clefairy"] = {exp = 170},
["Cloyster"] = {exp = 270},
["Crystal Onix"] = {exp = 700},
["Cubone"] = {exp = 70},
["Dewgong"] = {exp = 170},
["Diglett"] = {exp = 70},
["Ditto"] = {exp = 480},
["Dodrio"] = {exp = 270},
["Doduo"] = {exp = 170},
["Dragonair"] = {exp = 270},
["Dragonite"] = {exp = 570},
["Dratini"] = {exp = 170},
["Drowzee"] = {exp = 170},
["Dugtrio"] = {exp = 270},
["Eevee"] = {exp = 470},
["Ekans"] = {exp = 4000},
["Elder Charizard"] = {exp = 870},
["Electabuzz"] = {exp = 670},
["Electrode"] = {exp = 470},
["Exeggcute"] = {exp = 370},
["Exeggutor"] = {exp = 570},
["Farfetchd"] = {exp = 470},
["Fearow"] = {exp = 270},
["Flareon"] = {exp = 470},
["Gastly"] = {exp = 170},
["Gengar"] = {exp = 470},
["Geodude"] = {exp = 70},
["Gloom"] = {exp = 170},
["Golbat"] = {exp = 270},
["Goldeen"] = {exp = 70},
["Golduck"] = {exp = 170},
["Golem"] = {exp = 470},
["Graveler"] = {exp = 170},
["Grimer"] = {exp = 70},
["Growlithe"] = {exp = 170},
["Gyarados"] = {exp = 770},
["Haunter"] = {exp = 370},
["Hitmonchan"] = {exp = 570},
["Hitmonlee"] = {exp = 670},
["Horsea"] = {exp = 70},
["Hypno"] = {exp = 470},
["Ivysaur"] = {exp = 270},
["Jigglypuff"] = {exp = 270},
["Jolteon"] = {exp = 370},
["Jynx"] = {exp = 470},
["Kabuto"] = {exp = 370},
["Kabutops"] = {exp = 570},
["Kadabra"] = {exp = 470},
["Kakuna"] = {exp = 70},
["Kangaskhan"] = {exp = 870},
["Kingler"] = {exp = 170},
["Koffing"] = {exp = 170},
["Krabby"] = {exp = 70},
["Lapras"] = {exp = 470},
["Lickitung"] = {exp = 270},
["Machamp"] = {exp = 470},
["Machoke"] = {exp = 270},
["Machop"] = {exp = 70},
["Magikarp"] = {exp = 17},
["Magmar"] = {exp = 570},
["Magnemite"] = {exp = 70},
["Magneton"] = {exp = 270},
["Mankey"] = {exp = 70},
["Marowak"] = {exp = 170},
["Meowth"] = {exp = 70},
["Metapod"] = {exp = 70},
["Mew"] = {exp = 870},
["Mewtwo"] = {exp = 970},
["Moltres"] = {exp = 870},
["Mr Mime"] = {exp = 570},
["Muk"] = {exp = 270},
["Nidoking"] = {exp = 670},
["Nidoqueen"] = {exp = 470},
["Nidoran Female"] = {exp = 70},
["Nidoran Male"] = {exp = 70},
["Nidorina"] = {exp = 70},
["Nidorino"] = {exp = 70},
["Ninetales"] = {exp = 570},
["Oddish"] = {exp = 70},
["Omanyte"] = {exp = 270},
["Omastar"] = {exp = 170},
["Onix"] = {exp = 470},
["Paras"] = {exp = 70},
["Parasect"] = {exp = 270},
["Persian"] = {exp = 170},
["Pidgeot"] = {exp = 370},
["Pidgeotto"] = {exp = 170},
["Pidgey"] = {exp = 70},
["Pikachu"] = {exp = 270},
["Pinsir"] = {exp = 370},
["Poliwag"] = {exp = 70},
["Poliwhirl"] = {exp = 270},
["Poliwrath"] = {exp = 470},
["Ponyta"] = {exp = 170},
["Porygon"] = {exp = 670},
["Primeape"] = {exp = 370},
["Psyduck"] = {exp = 170},
["Raichu"] = {exp = 370},
["Rapidash"] = {exp = 470},
["Raticate"] = {exp = 270},
["Rattata"] = {exp = 70},
["Rhydon"] = {exp = 570},
["Rhyhorn"] = {exp = 370},
["Sandshrew"] = {exp = 70},
["Sandslash"] = {exp = 470},
["Scyther"] = {exp = 870},
["Seadra"] = {exp = 370},
["Seaking"] = {exp = 170},
["Seel"] = {exp = 70},
["Shellder"] = {exp = 70},
["Slowbro"] = {exp = 170},
["Slowpoke"] = {exp = 70},
["Snorlax"] = {exp = 870},
["Spearow"] = {exp = 70},
["Squirtle"] = {exp = 170},
["Starmie"] = {exp = 370},
["Staryu"] = {exp = 70},
["Tangela"] = {exp = 270},
["Tauros"] = {exp = 170},
["Tentacool"] = {exp = 70},
["Tentacruel"] = {exp = 470},
["Vaporeon"] = {exp = 270},
["Venomoth"] = {exp = 170},
["Venonat"] = {exp = 70},
["Venusaur"] = {exp = 370},
["Victreebel"] = {exp = 570},
["Vileplume"] = {exp = 470},
["Voltorb"] = {exp = 70},
["Vulpix"] = {exp = 170},
["Wartortle"] = {exp = 170},
["Weedle"] = {exp = 70},
["Weepinbell"] = {exp = 270},
["Weezing"] = {exp = 370},
["Wigglytuff"] = {exp = 570},
["Zapdos"] = {exp = 870},
["Zubat"] = {exp = 70},
["Shiny Venusaur"] = {exp = 1700},
["Shiny Tentacool"] = {exp = 570},
["Shiny Tentacruel"] = {exp = 870},
["Shiny Abra"] = {exp = 470},
["Shiny Blastoise"] = {exp = 2500},
["Shiny Butterfree"] = {exp = 1500},
["Shiny Beedrill"] = {exp = 1000},
["Shiny Rattata"] = {exp = 125},
["Shiny Raticate"] = {exp = 163},
["Shiny Raichu"] = {exp = 600},
["Shiny Zubat"] = {exp = 162},
["Shiny Magikarp"] = {exp = 32},
["Shiny Paras"] = {exp = 200},
["Shiny Parasect"] = {exp = 800},
["Shiny Growlithe"] = {exp = 1500},
["Shiny Arcanine"] = {exp = 4000},
["Shiny Grimer"] = {exp = 1500},
["Shiny Hitmonchan"] = {exp = 4500},
["Shiny Hitmonlee"] = {exp = 4500},
["Shiny Muk"] = {exp = 1000},
["Shiny Krabby"] = {exp = 300},
["Shiny Kingler"] = {exp = 900},
["Shiny Voltorb"] = {exp = 1500},
["Shiny Electrode"] = {exp = 1200},
["Shiny Farfetchd"] = {exp = 3200},
["Shiny Horsea"] = {exp = 170},
["Shiny Oddish"] = {exp = 150},
["Shiny Seadra"] = {exp = 900},
["Shiny Scyther"] = {exp = 3000},
["Shiny Jynx"] = {exp = 3000},
["Shiny Electabuzz"] = {exp = 3000},
["Shiny Venomoth"] = {exp = 2000},
["Shiny Dratini"] = {exp = 2000}
}

function onKill(cid, target)
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
local chck = getItemAttribute(feet.uid, "levell")
local chckc = getItemAttribute(feet.uid, "level")
if isPlayer(cid) == TRUE and isSummon(target) == true then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your Pokemon dont gain experience in Duel")
return TRUE
end
------------------------------------- level 1 ----------------------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == False then
return true
end
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 1 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 1999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/2000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 1999 and getItemAttribute(feet.uid, "level") == 1 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 1 to Level 2!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end

--------------------------------------- level 2 ---------------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 2 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 3999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/4000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 3999 and getItemAttribute(feet.uid, "level") == 2 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 2 to Level 3!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
-------------------------------------- level 3 ------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 3 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 7999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/8000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 7999 and getItemAttribute(feet.uid, "level") == 3 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 3 to Level 4!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 4 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 4 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 11999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/12000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 11999 and getItemAttribute(feet.uid, "level") == 4 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 4 to Level 5!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 5 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 5 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 14999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/15000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 14999 and getItemAttribute(feet.uid, "level") == 5 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 5 to Level 6!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 6 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 6 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 18999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/19000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 18999 and getItemAttribute(feet.uid, "level") == 6 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 6 to Level 7!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
-------------------------------------- level 7 ------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 7 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 24999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/25000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 24999 and getItemAttribute(feet.uid, "level") == 7 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 7 to Level 8!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 8 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 8 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 29999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/30000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 29999 and getItemAttribute(feet.uid, "level") == 8 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 8 to Level 9!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 9 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 9 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 35999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/36000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 35999 and getItemAttribute(feet.uid, "level") == 9 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 9 to Level 10!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 10 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 10 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 41999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/42000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 41999 and getItemAttribute(feet.uid, "level") == 10 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 10 to Level 11!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
------------------------------------- level 11 ----------------------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 11 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 46999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/47000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 46999 and getItemAttribute(feet.uid, "level") == 11 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 11 to Level 12!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
-------------------------------------- level 12 ------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 12 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 52999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/53000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 52999 and getItemAttribute(feet.uid, "level") == 12 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 12 to Level 13!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 13 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 13 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 57999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/58000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 57999 and getItemAttribute(feet.uid, "level") == 13 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 13 to Level 14!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 14 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 14 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 62999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/63000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 62999 and getItemAttribute(feet.uid, "level") == 14 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 14 to Level 15!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 15 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 15 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 68999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/69000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 68999 and getItemAttribute(feet.uid, "level") == 15 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 15 to Level 16!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
-------------------------------------- level 16 ------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 16 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 74999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/75000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 74999 and getItemAttribute(feet.uid, "level") == 16 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 16 to Level 17!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 17 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 17 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 78999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/79000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 78999 and getItemAttribute(feet.uid, "level") == 17 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 17 to Level 18!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 18 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 18 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 85999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/86000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 85999 and getItemAttribute(feet.uid, "level") == 18 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 18 to Level 19!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 19 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 19 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 94999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/95000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 94999 and getItemAttribute(feet.uid, "level") == 19 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 19 to Level 20!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
------------------------------------- level 20 ----------------------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 20 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 98999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/99000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 98999 and getItemAttribute(feet.uid, "level") == 20 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 20 to Level 21!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
-------------------------------------- level 21 ------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 21 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 104999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/105000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 104999 and getItemAttribute(feet.uid, "level") == 21 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 21 to Level 22!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 22 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 22 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 109999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/110000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 109999 and getItemAttribute(feet.uid, "level") == 22 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 22 to Level 23!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 24 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 23 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 117999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/118000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 117999 and getItemAttribute(feet.uid, "level") == 23 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 23 to Level 24!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 23 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 24 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 126999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/127000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 126999 and getItemAttribute(feet.uid, "level") == 24 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 24 to Level 25!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
-------------------------------------- level 24 ------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 25 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 135999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/136000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 135999 and getItemAttribute(feet.uid, "level") == 25 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 25 to Level 26!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 25 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 26 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 142999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/143000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 142999 and getItemAttribute(feet.uid, "level") == 26 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 26 to Level 27!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 26 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 27 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 148999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/149000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 148999 and getItemAttribute(feet.uid, "level") == 27 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 27 to Level 28!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)

return true
end
end
--------------------------------------- level 27 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 28 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 156999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/157000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 156999 and getItemAttribute(feet.uid, "level") == 28 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 28 to Level 29!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)
return true
end
end
--------------------------------------- level 28 -----------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 29 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 199999 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/200000")
doItemSetAttribute(feet.uid, "levell", chck +tab.exp)
return true
end
end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 199999 and getItemAttribute(feet.uid, "level") == 29 then
local tab = kkkkk[getCreatureName(target)]
if tab then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 29 to Level 30!")
doItemSetAttribute(feet.uid, "level", chckc +1)
doItemSetAttribute(feet.uid, "levell", 1)
return true
end
end
-------------------------------------- level 29 ---------------------------------------------------
if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 30 then
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Limite de Level")
return true
end
end

 

*XML

<event type="kill" name="kill" event="script" value="pokelevel.lua"/>

registerCreatureEvent(cid, "kill")

 

 

- Depois vai no Look.lua :

 

function onLook(cid, item2, skill)
tabela2 = {
[1] = {"He"},
[0] = {"She"},
}
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if item2.uid == cid then
doPlayerSendTextMessage(cid, 25, "You see yourself.")
return FALSE
end
if isPlayer(item2.uid) == TRUE and isSummon(item2.uid) == FALSE then
local cidade = getTownName(getPlayerTown(item2.uid))
table2 = tabela2[getPlayerSex(item2.uid)]
doPlayerSendTextMessage(cid, 25, "You see a ".. getCreatureName(item2.uid) ..". ".. table2[1] .." is ".. getPlayerVocationName(item2.uid) .." from ".. cidade ..".\n ".. table2[1] .." have ".. getPlayerPremiumDays(item2.uid) .." Premium Days.")
return FALSE
end
if isSummon(item2.uid) == TRUE and isPlayer(item2.uid) == FALSE and getItemAttribute(feet.uid, "level") == False and isPlayer(getCreatureMaster(item2.uid)) == TRUE then
doPlayerSendTextMessage(cid, 25, "You see a ".. getCreatureName(item2.uid) ..". It is belongs to ".. getCreatureName(getCreatureMaster(item2.uid)) ..".\nHit points: "..getCreatureHealth(item2.uid).."/"..getCreatureMaxHealth(item2.uid).."")
else
if isSummon(item2.uid) == TRUE and isPlayer(item2.uid) == FALSE and isPlayer(getCreatureMaster(item2.uid)) == TRUE then
doPlayerSendTextMessage(cid, 25, "You see a ".. getCreatureName(item2.uid) ..". It is belongs to ".. getCreatureName(getCreatureMaster(item2.uid)) ..".\nHit points: "..getCreatureHealth(item2.uid).."/"..getCreatureMaxHealth(item2.uid)..". Level [".. getItemAttribute(feet.uid, "level") .."]")
elseif isSummon(item2.uid) == TRUE and isPlayer(item2.uid) == FALSE and isPlayer(getCreatureMaster(item2.uid)) == FALSE then
else
return TRUE
end
end
end

 

*XML

<event type="look" name="Alook" event="script" value="look.lua"/>

registerCreatureEvent(cid, "Alook")

 

- Depois data/actions/Goback.lua:

 

local pokes = {
["Bulbasaur"] = {level = 20, cons = 7, vida = 700},
["Ivysaur"] = {level = 40, cons = 10, vida = 3000},
["Venusaur"] = {level = 85, cons = 15, vida = 5200},
["Charmander"] = {level = 20, cons = 7, vida = 970},
["Charmeleon"] = {level = 40, cons = 10, vida = 2900},
["Charizard"] = {level = 85, cons = 15, vida = 5200},
["Squirtle"] = {level = 20, cons = 7, vida = 650},
["Wartortle"] = {level = 40, cons = 10, vida = 2300},
["Blastoise"] = {level = 85, cons = 15, vida = 5200},
["Caterpie"] = {level = 1, cons = 5, vida = 200},
["Metapod"] = {level = 10, cons = 10, vida = 405},
["Butterfree"] = {level = 30, cons = 15, vida = 2500},
["Weedle"] = {level = 1, cons = 5, vida = 325},
["Kakuna"] = {level = 10, cons = 10, vida = 900},
["Beedrill"] = {level = 30, cons = 15, vida = 1900},
["Pidgey"] = {level = 1, cons = 6, vida = 380},
["Pidgeotto"] = {level = 20, cons = 10, vida = 1400},
["Pidgeot"] = {level = 65, cons = 15, vida = 3800},
["Rattata"] = {level = 1, cons = 5, vida = 350},
["Raticate"] = {level = 20, cons = 10, vida = 900},
["Spearow"] = {level = 5, cons = 10, vida = 350},
["Fearow"] = {level = 50, cons = 15, vida = 3300},
["Ekans"] = {level = 12, cons = 10, vida = 600},
["Arbok"] = {level = 30, cons = 15, vida = 2300},
["Pikachu"] = {level = 20, cons = 10, vida = 1250},
["Raichu"] = {level = 50, cons = 15, vida = 3500},
["Sandshrew"] = {level = 18, cons = 10, vida = 700},
["Sandslash"] = {level = 55, cons = 15, vida = 3400},
["Nidoran Female"] = {level = 10, cons = 8, vida = 600},
["Nidorina"] = {level = 25, cons = 12, vida = 2135},
["Nidoqueen"] = {level = 65, cons = 15, vida = 6445},
["Nidoran Male"] = {level = 10, cons = 8, vida = 620},
["Nidorino"] = {level = 25, cons = 12, vida = 2125},
["Nidoking"] = {level = 65, cons = 15, vida = 4200},
["Clefairy"] = {level = 10, cons = 10, vida = 1400},
["Clefable"] = {level = 35, cons = 15, vida = 2400},
["Vulpix"] = {level = 20, cons = 7, vida = 400},
["Ninetales"] = {level = 65, cons = 15, vida = 3400},
["Jigglypuff"] = {level = 10, cons = 10, vida = 500},
["Wigglytuff"] = {level = 42, cons = 15, vida = 2900},
["Zubat"] = {level = 5, cons = 8, vida = 450},
["Golbat"] = {level = 30, cons = 10, vida = 1900},
["Oddish"] = {level = 5, cons = 6, vida = 450},
["Gloom"] = {level = 18, cons = 10, vida = 1400},
["Vileplume"] = {level = 50, cons = 15, vida = 3300},
["Paras"] = {level = 1, cons = 5, vida = 400},
["Parasect"] = {level = 50, cons = 10, vida = 2500},
["Venonat"] = {level = 18, cons = 10, vida = 1350},
["Venomoth"] = {level = 50, cons = 15, vida = 3000},
["Diglett"] = {level = 5, cons = 7, vida = 470},
["Dugtrio"] = {level = 35, cons = 10, vida = 2400},
["Meowth"] = {level = 12, cons = 10, vida = 4000},
["Persian"] = {level = 30, cons = 12, vida = 1000},
["Psyduck"] = {level = 12, cons = 10, vida = 800},
["Golduck"] = {level = 55, cons = 12, vida = 3880},
["Mankey"] = {level = 10, cons = 8, vida = 1050},
["Primeape"] = {level = 45, cons = 10, vida = 3000},
["Growlithe"] = {level = 20, cons = 10, vida = 1000},
["Arcanine"] = {level = 80, cons = 15, vida = 6000},
["Poliwag"] = {level = 5, cons = 5, vida = 200},
["Poliwhirl"] = {level = 20, cons = 10, vida = 1200},
["Poliwrath"] = {level = 65, cons = 15, vida = 4400},
["Abra"] = {level = 15, cons = 8, vida = 620},
["Kadabra"] = {level = 50, cons = 10, vida = 2500},
["Alakazam"] = {level = 80, cons = 15, vida = 4000},
["Machop"] = {level = 18, cons = 8, vida = 1100},
["Machoke"] = {level = 40, cons = 10, vida = 2850},
["Machamp"] = {level = 70, cons = 15, vida = 6100},
["Bellsprout"] = {level = 1, cons = 6, vida = 420},
["Weepinbell"] = {level = 18, cons = 10, vida = 1100},
["Victreebel"] = {level = 50, cons = 15, vida = 4000},
["Tentacool"] = {level = 12, cons = 8, vida = 725},
["Tentacruel"] = {level = 80, cons = 15, vida = 7050},
["Geodude"] = {level = 1, cons = 10, vida = 700},
["Graveler"] = {level = 40, cons = 12, vida = 3000},
["Golem"] = {level = 70, cons = 15, vida = 6500},
["Ponyta"] = {level = 20, cons = 10, vida = 1000},
["Rapidash"] = {level = 60, cons = 15, vida = 3000},
["Slowpoke"] = {level = 12, cons = 10, vida = 600},
["Slowbro"] = {level = 45, cons = 15, vida = 1500},
["Magnemite"] = {level = 15, cons = 10, vida = 450},
["Magneton"] = {level = 40, cons = 15, vida = 1750},
["Farfetchd"] = {level = 40, cons = 15, vida = 3000},
["Doduo"] = {level = 12, cons = 10, vida = 600},
["Dodrio"] = {level = 45, cons = 15, vida = 2650},
["Seel"] = {level = 20, cons = 10, vida = 750},
["Dewgong"] = {level = 65, cons = 15, vida = 5200},
["Grimer"] = {level = 12, cons = 10, vida = 600},
["Muk"] = {level = 30, cons = 15, vida = 2400},
["Shellder"] = {level = 5, cons = 10, vida = 800},
["Cloyster"] = {level = 65, cons = 15, vida = 4000},
["Gastly"] = {level = 18, cons = 10, vida = 850},
["Haunter"] = {level = 45, cons = 12, vida = 2500},
["Gengar"] = {level = 80, cons = 15, vida = 7000},
["Onix"] = {level = 50, cons = 15, vida = 3000},
["Crystal Onix"] = {level = 50, cons = 20, vida = 8300},
["Drowzee"] = {level = 22, cons = 10, vida = 1150},
["Hypno"] = {level = 50, cons = 15, vida = 1500},
["Krabby"] = {level = 5, cons = 45, vida = 500},
["Kingler"] = {level = 35, cons = 15, vida = 2750},
["Voltorb"] = {level = 1, cons = 10, vida = 620},
["Electrode"] = {level = 38, cons = 15, vida = 2000},
["Exeggcute"] = {level = 8, cons = 10, vida = 800},
["Exeggutor"] = {level = 48, cons = 15, vida = 2300},
["Cubone"] = {level = 18, cons = 10, vida = 900},
["Marowak"] = {level = 45, cons = 15, vida = 1400},
["Hitmonlee"] = {level = 60, cons = 15, vida = 5000},
["Hitmonchan"] = {level = 60, cons = 20, vida = 4000},
["Lickitung"] = {level = 45, cons = 10, vida = 3000},
["Koffing"] = {level = 15, cons = 10, vida = 700},
["Weezing"] = {level = 30, cons = 15, vida = 1250},
["Rhyhorn"] = {level = 35, cons = 10, vida = 2900},
["Rhydon"] = {level = 65, cons = 15, vida = 4200},
["Chansey"] = {level = 60, cons = 10, vida = 2500},
["Tangela"] = {level = 40, cons = 8, vida = 800},
["Kangaskhan"] = {level = 60, cons = 12, vida = 5000},
["Horsea"] = {level = 5, cons = 10, vida = 300},
["Seadra"] = {level = 45, cons = 10, vida = 2000},
["Goldeen"] = {level = 10, cons = 10, vida = 800},
["Seaking"] = {level = 25, cons = 12, vida = 1300},
["Staryu"] = {level = 15, cons = 10, vida = 1050},
["Starmie"] = {level = 45, cons = 15, vida = 2000},
["Mr Mime"] = {level = 60, cons = 15, vida = 3500},
["Scyther"] = {level = 70, cons = 15, vida = 5000},
["Jynx"] = {level = 65, cons = 15, vida = 4500},
["Elekid"] = {level = 30, cons = 15, vida = 1500},
["Electabuzz"] = {level = 70, cons = 15, vida = 4000},
["Magmar"] = {level = 70, cons = 15, vida = 4000},
["Pinsir"] = {level = 42, cons = 15, vida = 2000},
["Tauros"] = {level = 40, cons = 10, vida = 2400},
["Magikarp"] = {level = 1, cons = 5, vida = 120},
["Gyarados"] = {level = 75, cons = 15, vida = 3000},
["Lapras"] = {level = 70, cons = 15, vida = 5000},
["Ditto"] = {level = 40, cons = 10, vida = 1500},
["Eevee"] = {level = 20, cons = 15, vida = 1500},
["Vaporeon"] = {level = 55, cons = 15, vida = 3500},
["Jolteon"] = {level = 55, cons = 15, vida = 3500},
["Flareon"] = {level = 55, cons = 15, vida = 3500},
["Porygon"] = {level = 45, cons = 15, vida = 2000},
["Omanyte"] = {level = 20, cons = 15, vida = 1000},
["Omastar"] = {level = 70, cons = 15, vida = 3000},
["Kabuto"] = {level = 20, cons = 10, vida = 1300},
["Kabutops"] = {level = 70, cons = 15, vida = 5000},
["Aerodactyl"] = {level = 100, cons = 15, vida = 5000},
["Snorlax"] = {level = 85, cons = 15, vida = 4000},
["Articuno"] = {level = 120, cons = 15, vida = 11000},
["Zapdos"] = {level = 120, cons = 15, vida = 11000},
["Moltres"] = {level = 120, cons = 15, vida = 11000},
["Dratini"] = {level = 10, cons = 15, vida = 800},
["Dragonair"] = {level = 70, cons = 15, vida = 3000},
["Dragonite"] = {level = 100, cons = 15, vida = 4000},
["Mewtwo"] = {level = 100, cons = 15, vida = 18000},
["Mew"] = {level = 100, cons = 15, vida = 7200},
["Elder Charizard"] = {level = 10, cons = 15, vida = 3000},
["Shiny Abra"] = {level = 14, cons = 15, vida = 1000},
["Shiny Arcanine"] = {level = 70, cons = 15, vida = 10000},
["Shiny Beedrill"] = {level = 24, cons = 15, vida = 3000},
["Shiny Blastoise"] = {level = 70, cons = 15, vida = 8000},
["Shiny Butterfree"] = {level = 34, cons = 15, vida = 485},
["Shiny Dratini"] = {level = 30, cons = 15, vida = 2000},
["Shiny Electabuzz"] = {level = 90, cons = 15, vida = 4200},
["Shiny Electrode"] = {level = 48, cons = 15, vida = 4000},
["Shiny Farfetchd"] = {level = 38, cons = 15, vida = 5000},
["Shiny Grimer"] = {level = 16, cons = 15, vida = 2000},
["Shiny Hitmonchan"] = {level = 70, cons = 15, vida = 8000},
["Shiny Hitmonlee"] = {level = 120, cons = 15, vida = 8000},
["Shiny Horsea"] = {level = 14, cons = 15, vida = 1080},
["Shiny Jynx"] = {level = 70, cons = 15, vida = 5000},
["Shiny Kingler"] = {level = 24, cons = 15, vida = 4000},
["Shiny Krabby"] = {level = 70, cons = 15, vida = 700},
["Shiny Magikarp"] = {level = 34, cons = 15, vida = 180},
["Shiny Muk"] = {level = 30, cons = 15, vida = 3500},
["Shiny Oddish"] = {level = 90, cons = 15, vida = 700},
["Shiny Paras"] = {level = 48, cons = 15, vida = 600},
["Shiny Parasect"] = {level = 38, cons = 15, vida = 3500},
["Shiny Raichu"] = {level = 16, cons = 15, vida = 4500},
["Shiny Rattata"] = {level = 70, cons = 15, vida = 600},
["Shiny Raticate"] = {level = 38, cons = 15, vida = 1200},
["Shiny Scyther"] = {level = 16, cons = 15, vida = 7000},
["Shiny Seadra"] = {level = 70, cons = 15, vida = 2500},
["Shiny Tentacool"] = {level = 120, cons = 15, vida = 1000},
["Shiny Tentacruel"] = {level = 14, cons = 15, vida = 9000},
["Shiny Venomoth"] = {level = 70, cons = 15, vida = 4500},
["Shiny Venusaur"] = {level = 24, cons = 15, vida = 6000},
["Shiny Voltorb"] = {level = 70, cons = 15, vida = 1000},
["Shiny Zubat"] = {level = 34, cons = 15, vida = 990},
}


local msgunica = true
local msgunicago1, msgunicaback1 = "Go, doka!", "Come back, doka!"
local msgunicago2, msgunicaback2 = "Let's do it, doka!", "Thanks for helping, doka!"
local msgunicago3, msgunicaback3 = "I choose you, doka!", "That's enough, come back!"
local msgunicago4, msgunicaback4 = "I need your help, doka!", "You were great, doka!"
local msgunicago5, msgunicaback5 = "Let's fight, doka!", "Excellent work, doka!"
local msgunicago6, msgunicaback6 = "It's battle time, doka!", "Well done, doka!"

function onUse(cid, item, frompos, item2, topos)
if #getCreatureSummons(cid) >= 1 and getPlayerStorageValue(getCreatureSummons(cid)[1], 33) >= 1 then
return true
end
local random2 = math.random(1,6)
if random2 == 1 then
msgunicaback = msgunicaback1
elseif random2 == 2 then
msgunicaback = msgunicaback2
elseif random2 == 3 then
msgunicaback = msgunicaback3
elseif random2 == 4 then
msgunicaback = msgunicaback4
elseif random2 == 5 then
msgunicaback = msgunicaback5
elseif random2 == 6 then
msgunicaback = msgunicaback6
end
local random = math.random(1,6)
if random == 1 then
msgunicago = msgunicago1
elseif random == 2 then
msgunicago = msgunicago2
elseif random == 3 then
msgunicago = msgunicago3
elseif random == 4 then
msgunicago = msgunicago4
elseif random == 5 then
msgunicago = msgunicago5
elseif random == 6 then
msgunicago = msgunicago6
end

if item.itemid == 2222 or item.itemid == 2223 then
gobackeff = 10
elseif item.itemid == 2239 or item.itemid == 2240 then
gobackeff = 189
elseif item.itemid == 2234 or item.itemid == 2235 then
gobackeff = 190
elseif item.itemid == 2220 or item.itemid == 2221 then
gobackeff = 191
elseif item.itemid == 2242 or item.itemid == 2243 then
gobackeff = 226
elseif item.itemid == 2192 or item.itemid == 2193 then
gobackeff = 223
elseif item.itemid == 2660 or item.itemid == 2661 then
gobackeff = 194
elseif item.itemid == 2663 or item.itemid == 2664 then
gobackeff = 193
elseif item.itemid == 2655 or item.itemid == 2656 then
gobackeff = 195
end
local effect = gobackeff

if item.itemid == 2223 or item.itemid == 2240 or item.itemid == 2235 or item.itemid == 2221 or item.itemid == 2243 or item.itemid == 2193 or item.itemid == 2661 or item.itemid == 2664 or item.itemid == 2656 then
for a, b in pairs(ginasios) do
if getPlayerStorageValue(cid, b.storage) == 1 then -- GYM
doPlayerSendCancel(cid, "You can't return your pokemon during gym battles.")
return true
end
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if #getCreatureSummons(cid) >= 1 then
if getPlayerStorageValue(cid, 6547) >= 4 then
return true
end
if getPlayerStorageValue(cid, 4897) >= 7 then
return true
end
local z = getCreatureSummons(cid)[1]
local pokename = getCreatureName(z)
local mbk = msgunicaback:gsub("doka", pokename)
if getItemAttribute(item.uid, "poke"):find(getCreatureName(z)) then
doTransformItem(item.uid, item.itemid-1)
doCreatureSay(cid, mbk, TALKTYPE_SAY)
local summom = getCreatureSummons(cid)
local maxh = pokes[getCreatureName(summom[1])].vida
local pct2 = ((getCreatureHealth(summom[1])) / (getCreatureMaxHealth(summom[1])))
local vids = ((getCreatureHealth(summom[1])) - 2)
doCreatureAddHealth(summom[1], -vids)
setCreatureMaxHealth(summom[1], maxh)
doCreatureAddHealth(summom[1], ((maxh) * (pct2)))
doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")) .. " HP = ["..getCreatureHealth(z).."/"..getCreatureMaxHealth(z).."]")
setPlayerStorageValue(cid, 61204, 0)
setPlayerStorageValue(cid, 2, 0)
doSendMagicEffect(getCreaturePosition(z), effect)
doRemoveCreature(z)
if getPlayerGroupId(cid) == 8 then
setPlayerGroupId(cid, 1)
return true
end
end
end

if getPlayerGroupId(cid) == 8 then
setPlayerGroupId(cid, 1)
return true
end

elseif item.itemid == 2222 or item.itemid == 2239 or item.itemid == 2234 or item.itemid == 2220 or item.itemid == 2242 or item.itemid == 2192 or item.itemid == 2660 or item.itemid == 2663 or item.itemid == 2655 then

if item.uid ~= getPlayerSlotItem(cid, CONST_SLOT_FEET).uid then
doPlayerSendCancel(cid, "You must put your pokeball in the correct place!")
return TRUE
end


if not canSummon(cid) then
return doPlayerSendDefaultCancel(cid, RETURNVALUE_NOTENOUGHROOM)
end

if getPlayerStorageValue(cid, 63215) >= 1 then
return doPlayerSendCancel(cid, "You can't use pokeball while surfing.")
end

if getPlayerStorageValue(cid, 62314) >= 1 then
return doPlayerSendCancel(cid, "You can't use pokeball while flying.")
end

if #getCreatureSummons(cid) >= 1 then
return doPlayerSendCancel(cid, "You have already summoned a pokemon.")
end

for i,x in pairs(pokes) do
if i == getItemAttribute(item.uid, "poke"):sub(9, findLetter(getItemAttribute(item.uid, "poke"), "'")-1) then

if getPlayerLevel(cid) < x.level then
doPlayerSendCancel(cid, "You need level "..x.level.." or higher to use this pokemon.")
return true
end
local removed = doCreateItem(1285, 1, getThingPos(cid))
if getItemAttribute(item.uid, "level") == False then
doItemSetAttribute(item.uid, "level", 1)
else
doItemSetAttribute(item.uid, "description", " Contains a "..getItemAttribute(item.uid, "poke"):sub(9, findLetter(getItemAttribute(item.uid, "poke"), "'")-1).." Level : "..getItemAttribute(item.uid, "level").."")
end
doSummonMonster(cid, i)
local pk = getCreatureSummons(cid)[1]
doTeleportThing(pk, getClosestFreeTile(pk, getThingPos(cid)), false)
doRemoveItem(removed, 1)
doCreatureSetLookDir(pk, 2)
local maxh = pokes[getCreatureName(pk)].vida
local levellife = ((getPlayerLevel(cid)) * (pokes[getCreatureName(pk)].cons))
local health = tonumber(getItemAttribute(item.uid, "poke"):match("%[(.-)/"))
doConvinceCreature(cid, pk)
doCreatureAddHealth(pk, health-maxh)
local pct = ((getCreatureHealth(pk)) / (getCreatureMaxHealth(pk)))
local vidis = (getCreatureHealth(pk))
setCreatureMaxHealth(pk, ((maxh) + (levellife)))
doCreatureAddHealth(pk, 2)
doCreatureAddHealth(pk, -vidis)
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 2 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+100)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 3 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+200)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 4 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+300)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 5 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+400)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 6 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+500)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 7 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+600)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 8 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+700)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 9 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+800)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 10 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+900)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 11 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1000)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 12 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1100)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 13 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1200)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 14 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1300)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 15 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1400)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 16 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1500)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 17 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1600)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 18 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1700)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 19 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1800)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 20 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1900)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 21 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2000)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 22 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2100)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 23 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2200)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 24 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2300)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 25 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2400)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 26 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2500)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 27 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2600)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 28 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2700)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 29 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2800)
end
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
if getItemAttribute(feet.uid, "level") == 30 then
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+3000)
end
if getItemText(item.uid) == 2 then
doCreatureSetSkullType(pk, 3)
else
doCreatureSetSkullType(pk, getItemText(item.uid))
end
doCreatureAddHealth(pk, ((getCreatureMaxHealth(pk)) * (pct)) - 2)
doTransformItem(item.uid, item.itemid+1)
if getPlayerGroupId(cid) == 1 then
setPlayerGroupId(cid, 8)
end
local pokename = getCreatureName(getCreatureSummons(cid)[1])
local mgo = msgunicago:gsub("doka", pokename)
doCreatureSay(cid, mgo, TALKTYPE_SAY)
doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")))
doSendMagicEffect(getCreaturePosition(pk), effect)
setPlayerStorageValue(cid, 61204, 1)
registerCreatureEvent(pk, "DiePoke")
registerCreatureEvent(pk, "Exp")
if getItemAttribute(item.uid, "levell") == False then
doItemSetAttribute(item.uid, "levell", 0)
break
end
end
end
end
return TRUE
end

 

*XML

<action itemid="ID BALL","ID BALL","ID BALL" event="script" value="goback.lua" />

 

- Depois Catch.lua:

 

local pokes = {
["Abra"] = {corpse = 2905, chance = 100, health = 620, maxhealth = 620},
["Aerodactyl"] = {corpse = 6338, chance = 2300, health = 5000, maxhealth = 5000},
["Alakazam"] = {corpse = 6057, chance = 1100, health = 4000, maxhealth = 4000},
["Arbok"] = {corpse = 5984, chance = 200, health = 2300, maxhealth = 2300},
["Arcanine"] = {corpse = 6031, chance = 1500, health = 6000, maxhealth = 6000},
["Articuno"] = {corpse = 7256, chance = 4000, health = 11000, maxhealth = 11000},
["Beedrill"] = {corpse = 5990, chance = 230, health = 1900, maxhealth = 1900},
["Bellsprout"] = {corpse = 2806, chance = 60, health = 420, maxhealth = 420},
["Blastoise"] = {corpse = 5999, chance = 1500, health = 5200, maxhealth = 5200},
["Bulbasaur"] = {corpse = 5969, chance = 120, health = 700, maxhealth = 700},
["Butterfree"] = {corpse = 5985, chance = 200, health = 2500, maxhealth = 2500},
["Caterpie"] = {corpse = 5971, chance = 20, health = 200, maxhealth = 200},
["Chansey"] = {corpse = 6010, chance = 1300, health = 2500, maxhealth = 2500},
["Charmander"] = {corpse = 5983, chance = 120, health = 970, maxhealth = 970},
["Charmeleon"] = {corpse = 5981, chance = 260, health = 2900, maxhealth = 2900},
["Charizard"] = {corpse = 6005, chance = 1500, health = 5200, maxhealth = 5200},
["Clefable"] = {corpse = 6006, chance = 400, health = 2400, maxhealth = 2400},
["Clefairy"] = {corpse = 2968, chance = 200, health = 1400, maxhealth = 1400},
["Cloyster"] = {corpse = 2932, chance = 450, health = 4000, maxhealth = 4000},
["Crystal Onix"] = {corpse = 6320, chance = 5000, health = 8300, maxhealth = 8300},
["Cubone"] = {corpse = 6050, chance = 90, health = 900, maxhealth = 900},
["Dewgong"] = {corpse = 6038, chance = 400, health = 5200, maxhealth = 5200},
["Diglett"] = {corpse = 6023, chance = 80, health = 470, maxhealth = 470},
["Ditto"] = {corpse = 2817, chance = 1300, health = 1500, maxhealth = 1500},
["Dodrio"] = {corpse = 6047, chance = 400, health = 2650, maxhealth = 2650},
["Doduo"] = {corpse = 2842, chance = 100, health = 600, maxhealth = 600},
["Dragonair"] = {corpse = 6002, chance = 4000, health = 3000, maxhealth = 3000},
["Dragonite"] = {corpse = 4295, chance = 4000, health = 4000, maxhealth = 4000},
["Dratini"] = {corpse = 2879, chance = 3000, health = 800, maxhealth = 800},
["Drowzee"] = {corpse = 6026, chance = 100, health = 1150, maxhealth = 1150},
["Dugtrio"] = {corpse = 6024, chance = 300, health = 2400, maxhealth = 2400},
["Eevee"] = {corpse = 6364, chance = 800, health = 1500, maxhealth = 1500},
["Ekans"] = {corpse = 5979, chance = 90, health = 600, maxhealth = 600},
["Elder Charizard"] = {corpse = 2954, chance = 5500, health = 3000, maxhealth = 3000},
["Electabuzz"] = {corpse = 6065, chance = 2500, health = 4000, maxhealth = 4000},
["Electrode"] = {corpse = 6051, chance = 270, health = 2000, maxhealth = 2000},
["Exeggcute"] = {corpse = 2982, chance = 90, health = 800, maxhealth = 800},
["Exeggutor"] = {corpse = 3005, chance = 300, health = 2300, maxhealth = 2300},
["Farfetchd"] = {corpse = 2836, chance = 290, health = 3000, maxhealth = 3000},
["Fearow"] = {corpse = 5992, chance = 500, health = 3300, maxhealth = 3300},
["Flareon"] = {corpse = 6059, chance = 500, health = 3500, maxhealth = 3500},
["Gastly"] = {corpse = 5993, chance = 120, health = 850, maxhealth = 850},
["Gengar"] = {corpse = 6336, chance = 1500, health = 7000, maxhealth = 7000},
["Geodude"] = {corpse = 6071, chance = 90, health = 700, maxhealth = 700},
["Gloom"] = {corpse = 6017, chance = 130, health = 1400, maxhealth = 1400},
["Golbat"] = {corpse = 6053, chance = 130, health = 1900, maxhealth = 1900},
["Goldeen"] = {corpse = 2970, chance = 80, health = 800, maxhealth = 800},
["Golduck"] = {corpse = 6028, chance = 500, health = 3880, maxhealth = 3880},
["Golem"] = {corpse = 6043, chance = 600, health = 6500, maxhealth = 6500},
["Graveler"] = {corpse = 6516, chance = 350, health = 3000, maxhealth = 3000},
["Grimer"] = {corpse = 6055, chance = 80, health = 600, maxhealth = 600},
["Growlithe"] = {corpse = 6036, chance = 120, health = 1000, maxhealth = 1000},
["Gyarados"] = {corpse = 6331, chance = 1500, health = 3000, maxhealth = 3000},
["Haunter"] = {corpse = 6004, chance = 290, health = 2500, maxhealth = 2500},
["Hitmonchan"] = {corpse = 5977, chance = 1500, health = 4000, maxhealth = 4000},
["Hitmonlee"] = {corpse = 6067, chance = 1500, health = 5000, maxhealth = 5000},
["Horsea"] = {corpse = 2973, chance = 80, health = 300, maxhealth = 300},
["Hypno"] = {corpse = 6046, chance = 290, health = 1500, maxhealth = 1500},
["Ivysaur"] = {corpse = 5982, chance = 290, health = 3000, maxhealth = 3000},
["Jigglypuff"] = {corpse = 6011, chance = 110, health = 500, maxhealth = 500},
["Jolteon"] = {corpse = 6044, chance = 420, health = 3500, maxhealth = 3500},
["Jynx"] = {corpse = 5765, chance = 400, health = 4500, maxhealth = 4500},
["Kabuto"] = {corpse = 5972, chance = 300, health = 1300, maxhealth = 1300},
["Kabutops"] = {corpse = 6345, chance = 1500, health = 5000, maxhealth = 5000},
["Kadabra"] = {corpse = 6060, chance = 240, health = 2500, maxhealth = 2500},
["Kakuna"] = {corpse = 6000, chance = 100, health = 900, maxhealth = 900},
["Kangaskhan"] = {corpse = 6073, chance = 1500, health = 5000, maxhealth = 5000},
["Kingler"] = {corpse = 6340, chance = 700, health = 2750, maxhealth = 2750},
["Koffing"] = {corpse = 2936, chance = 100, health = 700, maxhealth = 700},
["Krabby"] = {corpse = 6039, chance = 70, health = 500, maxhealth = 500},
["Lapras"] = {corpse = 6018, chance = 1400, health = 5000, maxhealth = 5000},
["Lickitung"] = {corpse = 2953, chance = 500, health = 3000, maxhealth = 3000},
["Machamp"] = {corpse = 6048, chance = 1200, health = 6100, maxhealth = 6100},
["Machoke"] = {corpse = 4251, chance = 800, health = 2850, maxhealth = 2850},
["Machop"] = {corpse = 6045, chance = 100, health = 1100, maxhealth = 1100},
["Magikarp"] = {corpse = 2818, chance = 10, health = 120, maxhealth = 120},
["Magmar"] = {corpse = 7283, chance = 1500, health = 4000, maxhealth = 4000},
["Magnemite"] = {corpse = 6056, chance = 80, health = 450, maxhealth = 450},
["Magneton"] = {corpse = 6076, chance = 500, health = 1750, maxhealth = 1750},
["Mankey"] = {corpse = 6035, chance = 100, health = 1050, maxhealth = 1050},
["Marowak"] = {corpse = 6072, chance = 300, health = 1400, maxhealth = 1400},
["Meowth"] = {corpse = 6034, chance = 100, health = 4000, maxhealth = 4000},
["Metapod"] = {corpse = 5970, chance = 40, health = 405, maxhealth = 405},
["Mew"] = {corpse = 2939, chance = 3000, health = 7200, maxhealth = 7200},
["Mewtwo"] = {corpse = 5973, chance = 3000, health = 18000, maxhealth = 18000},
["Moltres"] = {corpse = 7330, chance = 3000, health = 11000, maxhealth = 11000},
["Mr Mime"] = {corpse = 6069, chance = 1100, health = 3500, maxhealth = 3500},
["Muk"] = {corpse = 2845, chance = 280, health = 2400, maxhealth = 2400},
["Nidoking"] = {corpse = 2916, chance = 300, health = 4200, maxhealth = 4200},
["Nidoqueen"] = {corpse = 3004, chance = 300, health = 6445, maxhealth = 6445},
["Nidoran Female"] = {corpse = 6013, chance = 100, health = 600, maxhealth = 600},
["Nidoran Male"] = {corpse = 6015, chance = 100, health = 250, maxhealth = 250},
["Nidorina"] = {corpse = 6014, chance = 130, health = 2135, maxhealth = 2135},
["Nidorino"] = {corpse = 6019, chance = 130, health = 2125, maxhealth = 2125},
["Ninetales"] = {corpse = 6040, chance = 1000, health = 3400, maxhealth = 3400},
["Oddish"] = {corpse = 3008, chance = 70, health = 450, maxhealth = 450},
["Omanyte"] = {corpse = 5998, chance = 800, health = 1000, maxhealth = 1000},
["Omastar"] = {corpse = 5994, chance = 1800, health = 3000, maxhealth = 3000},
["Onix"] = {corpse = 2990, chance = 800, health = 3000, maxhealth = 3000},
["Paras"] = {corpse = 3007, chance = 60, health = 400, maxhealth = 400},
["Parasect"] = {corpse = 6027, chance = 290, health = 2500, maxhealth = 2500},
["Persian"] = {corpse = 6009, chance = 290, health = 1000, maxhealth = 1000},
["Pidgeot"] = {corpse = 6020, chance = 1000, health = 3800, maxhealth = 3800},
["Pidgeotto"] = {corpse = 5966, chance = 200, health = 1400, maxhealth = 1400},
["Pidgey"] = {corpse = 5961, chance = 70, health = 380, maxhealth = 380},
["Pikachu"] = {corpse = 6001, chance = 140, health = 1250, maxhealth = 1250},
["Pinsir"] = {corpse = 7282, chance = 290, health = 2000, maxhealth = 2000},
["Poliwag"] = {corpse = 6042, chance = 60, health = 200, maxhealth = 200},
["Poliwhirl"] = {corpse = 6054, chance = 900, health = 1200, maxhealth = 1200},
["Poliwrath"] = {corpse = 6033, chance = 1200, health = 4400, maxhealth = 4400},
["Ponyta"] = {corpse = 5975, chance = 100, health = 1000, maxhealth = 1000},
["Porygon"] = {corpse = 5963, chance = 800, health = 2000, maxhealth = 2000},
["Primeape"] = {corpse = 6032, chance = 390, health = 3000, maxhealth = 3000},
["Psyduck"] = {corpse = 6029, chance = 200, health = 800, maxhealth = 800},
["Raichu"] = {corpse = 5996, chance = 1000, health = 3500, maxhealth = 3500},
["Rapidash"] = {corpse = 4323, chance = 300, health = 3000, maxhealth = 3000},
["Raticate"] = {corpse = 6007, chance = 140, health = 900, maxhealth = 900},
["Rattata"] = {corpse = 5974, chance = 10, health = 350, maxhealth = 350},
["Rhydon"] = {corpse = 2858, chance = 330, health = 4200, maxhealth = 4200},
["Rhyhorn"] = {corpse = 3035, chance = 130, health = 2900, maxhealth = 2900},
["Sandshrew"] = {corpse = 5988, chance = 100, health = 700, maxhealth = 700},
["Sandslash"] = {corpse = 6041, chance = 900, health = 3400, maxhealth = 3400},
["Scyther"] = {corpse = 3002, chance = 3000, health = 2500, maxhealth = 2500},
["Seadra"] = {corpse = 2872, chance = 300, health = 2000, maxhealth = 2000},
["Seaking"] = {corpse = 3038, chance = 260, health = 1300, maxhealth = 1300},
["Seel"] = {corpse = 6030, chance = 110, health = 750, maxhealth = 750},
["Shellder"] = {corpse = 2837, chance = 90, health = 800, maxhealth = 800},
["Slowbro"] = {corpse = 5986, chance = 290, health = 1500, maxhealth = 1500},
["Slowpoke"] = {corpse = 2827, chance = 100, health = 600, maxhealth = 600},
["Snorlax"] = {corpse = 6016, chance = 2000, health = 4000, maxhealth = 4000},
["Spearow"] = {corpse = 5968, chance = 70, health = 350, maxhealth = 350},
["Squirtle"] = {corpse = 6008, chance = 120, health = 650, maxhealth = 650},
["Starmie"] = {corpse = 7320, chance = 280, health = 2000, maxhealth = 2000},
["Staryu"] = {corpse = 5987, chance = 100, health = 1050, maxhealth = 1050},
["Tangela"] = {corpse = 5976, chance = 290, health = 800, maxhealth = 800},
["Tauros"] = {corpse = 6302, chance = 280, health = 2400, maxhealth = 2400},
["Tentacool"] = {corpse = 2961, chance = 100, health = 725, maxhealth = 725},
["Tentacruel"] = {corpse = 6037, chance = 800, health = 7050, maxhealth = 7050},
["Vaporeon"] = {corpse = 5960, chance = 700, health = 3500, maxhealth = 3500},
["Venomoth"] = {corpse = 2925, chance = 280, health = 3000, maxhealth = 3000},
["Venonat"] = {corpse = 5997, chance = 100, health = 1350, maxhealth = 1350},
["Venusaur"] = {corpse = 5962, chance = 1500, health = 5200, maxhealth = 5200},
["Victreebel"] = {corpse = 6332, chance = 310, health = 4000, maxhealth = 4000},
["Vileplume"] = {corpse = 6025, chance = 310, health = 3300, maxhealth = 3300},
["Voltorb"] = {corpse = 6049, chance = 80, health = 620, maxhealth = 620},
["Vulpix"] = {corpse = 6003, chance = 80, health = 400, maxhealth = 400,},
["Wartortle"] = {corpse = 5978, chance = 260, health = 2300, maxhealth = 2300},
["Weedle"] = {corpse = 5964, chance = 10, health = 325, maxhealth = 325},
["Weepinbell"] = {corpse = 2928, chance = 310, health = 1100, maxhealth = 1100},
["Weezing"] = {corpse = 6306, chance = 400, health = 1250, maxhealth = 1250},
["Wigglytuff"] = {corpse = 6012, chance = 300, health = 5900, maxhealth = 2900},
["Zapdos"] = {corpse = 6074, chance = 3000, health = 11000, maxhealth = 11000},
["Zubat"] = {corpse = 5989, chance = 30, health = 450, maxhealth = 450},
["Crystal Onix"] = {chance = 1800, corpse = 6320, health = 18000, maxhealth = 18000},
["Elder Charizard"] = {chance = 1800, corpse = 2954, health = 15000, maxhealth = 15000},
["Shiny Arcanine"] = {chance = 1200, corpse =8746, health = 13000, maxhealth = 13000},
["Shiny Abra"] = {chance = 1200, corpse = 11423, health = 10000, maxhealth = 10000},
["Shiny Alakazam"] = {chance = 2600, corpse = 11435, health = 12000, maxhealth = 12000},
["Shiny Blastoise"] = {chance = 9000, corpse =8763, health = 15000, maxhealth = 15000},
["Shiny Butterfree"] = {chance = 120, corpse =8762, health = 5000, maxhealth = 5000},
["Shiny Beedrill"] = {chance = 150, corpse =8767, health = 5000, maxhealth = 5000},
["Shiny Cubone"] = {chance = 240, corpse = 11433, health = 2500, maxhealth = 2500},
["Shiny Dratini"] = {chance = 560, corpse = 8744, health = 2900, maxhealth = 2900},
["Shiny Dragonair"] = {chance = 1200, corpse = 8775, health = 15000, maxhealth= 15000},
["Shiny Electabuzz"] = {chance = 1200, corpse =8773, health = 10000, maxhealth = 10000},
["Shiny Electrode"] = {chance = 160, corpse =8753, health = 5000, maxhealth = 5000},
["Shiny Farfetchd"] = {chance = 300, corpse = 8745, health = 10000, maxhealth = 10000},
["Shiny Gengar"] = {chance = 1200, corpse = 8782, health = 13000, maxhealth= 13000},
["Shiny Golbat"] = {chance = 300, corpse = 8781, health = 10000, maxhealth= 10000},
["Shiny Growlithe"] = {chance = 120, corpse =8742, health = 8000, maxhealth = 8000},
["Shiny Gyarados"] = {chance = 1200, corpse = 8774, health = 16000, maxhealth = 16000},
["Shiny Grimer"] = {chance = 100, corpse =8752, health = 5000, maxhealth = 5000},
["Shiny Horsea"] = {chance = 40, corpse = 8768, health = 1000, maxhealth = 1000},
["Shiny Jynx"] = {chance = 1200, corpse = 8758, health = 12000, maxhealth= 12000},
["Shiny Krabby"] = {chance = 60, corpse =8755, health =1000, maxhealth =1000},
["Shiny Kingler"] = {chance = 60, corpse =8769, health = 6000, maxhealth = 6000},
["Shiny Magikarp"] = {chance = 10, corpse = 8766, health = 1000, maxhealth = 1000},
["Shiny Muk"] = {chance = 300, corpse =8747, health = 8000, maxhealth = 8000},
["Shiny Marowak"] = {chance = 500, corpse = 8779, health = 9000, maxhealth= 9000},
["Shiny Oddish"] = {chance = 150,corpse =8749, health = 1200, maxhealth = 1200},
["Shiny Paras"] = {chance = 15, corpse =8743, health = 800, maxhealth = 800},
["Shiny Parasect"] = {chance = 110, corpse =8756, health = 5000, maxhealth = 5000},
["Shiny Pidgeot"] = {chance = 1000, corpse = 8783, health = 9000, maxhealth= 9000},
["Shiny Pinsir"] = {chance = 300, corpse = 8780, health = 7000, maxhealth= 7000},
["Shiny Raichu"] = {chance = 800,corpse =8770, health = 9000, maxhealth = 9000},
["Shiny Rattata"] = {chance = 10, corpse =8751, health = 800, maxhealth = 800},
["Shiny Raticate"] = {chance = 120, corpse =8765, health = 5000, maxhealth = 5000},
["Shiny Scyther"] = {chance = 2400, corpse =8772, health = 10000, maxhealth = 10000},
["Shiny Seadra"] = {chance = 460, corpse = 8760, health =8000, maxhealth =8000},
["Shiny Snorlax"] = {chance = 2000, corpse = 8776, health = 25000, maxhealth= 25000},
["Shiny Tentacool"] = {chance = 100, corpse = 8748, health = 2000, maxhealth = 2000},
["Shiny Tentacruel"] = {chance = 1800, corpse = 8757, health = 11000, maxhealth = 11000},
["Shiny Tangela"] = {chance = 500, corpse = 8785, health = 8000, maxhealth= 8000},
["Shiny Voltorb"] = {chance = 30, corpse =8754, health = 2000, maxhealth = 2000},
["Shiny Venomoth"] = {chance = 300, corpse = 8761, health = 6500, maxhealth= 6500},
["Shiny Venonat"] = {chance = 50, corpse = 8759, health = 3000, maxhealth= 3000},
["Shiny Venusaur"] = {chance = 1800, corpse = 8764, health = 15000, maxhealth = 15000},
["Shiny Zubat"] = {chance = 30, corpse =8750, health = 2000, maxhealth = 2000}
}

local description = "Contains a %pokename."

function onUse(cid, item, frompos, item2, topos)
local name = getItemNameById(item2.itemid)
if item.itemid == 2147 then
catchrate = 5
oncatch = 24
onfail = 23
bolabola = 2222
elseif item.itemid == 2143 then
catchrate = 5
oncatch = 24
onfail = 23
bolabola = 2222
elseif item.itemid == 2149 then
catchrate = 7
oncatch = 198
onfail = 197
bolabola = 2239
elseif item.itemid == 2151 then
catchrate = 8
oncatch = 224
onfail = 225
bolabola = 2242
elseif item.itemid == 2159 then
catchrate = 100000
oncatch = 221
onfail = 222
bolabola = 2192
elseif item.itemid == 2150 then
catchrate = 8
oncatch = 202
onfail = 201
bolabola = 2234
elseif item.itemid == 2146 then
catchrate = 9
oncatch = 200
onfail = 199
bolabola = 2220
elseif item.itemid == 2644 then
catchrate = 5
oncatch = 204
onfail = 203
bolabola = 2655
end
local rate = (catchrate)
local catch = oncatch
local fail = onfail
local newid = bolabola
for i,x in pairs(pokes) do
if getItemNameById(item2.itemid):find(i:lower()) then
if getItemIdByName(name) == pokes.corpse then
if cid ~= getItemAttribute(item2.uid, "corpseowner") and isInArray({1,8}, getPlayerGroupId(cid)) then
doPlayerSendCancel(cid, "You are not allowed to catch this pokemon.")
return true
end
doRemoveItem(item.uid, 1)
doRemoveItem(item2.uid, 1)
local pegar = math.random(1, x.chance)
if pegar <= 1*(rate) then
doSendMagicEffect(topos, catch)

local nas = {
["%%pokename"] = i
}
for i,x in pairs(nas) do
if description:find(i) then
description = description:gsub(i, x)
end
end

local function capturou(params)
if not isCreature(params.cid) then
return true
end
if not string.find(getPlayerStorageValue(cid, 54842), ""..i..",") then
doPlayerAddSoul(cid, 1)
setPlayerStorageValue(cid, 54842, getPlayerStorageValue(cid, 54842)..""..i..", ")
end
if getPlayerFreeCap(cid) <= 0.99 then
item = doCreateItemEx(newid-1)
doItemSetAttribute(item, "poke", params.poke)
doItemSetAttribute(item, "nome", params.nome)
doItemSetAttribute(item, "description", params.description)
doPlayerSendMailByName(getCreatureName(params.cid), item, 1)
doPlayerSendTextMessage(cid, 27, "Congratulations, you caught a "..i.."!")
doPlayerSendTextMessage(cid, 27, "Since you are already holding six pokemons, this pokeball has been sent to your depot.")
else
item = doCreateItemEx(params.ball)
doItemSetAttribute(item, "poke", params.poke)
doItemSetAttribute(item, "nome", params.nome)
doItemSetAttribute(item, "description", params.description)
doPlayerAddItemEx(params.cid, item, true)
doTransformItem(item, newid)
doPlayerSendTextMessage(cid, 27, "Congratulations, you caught a "..i.."!")
end
if #getCreatureSummons(cid) >= 1 then
doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 178)
else
doSendMagicEffect(getThingPos(cid), 178)
end
end

local description = "Contains a "..i.."."
local poke1 = "This is "..i.."'s pokeball. HP = ["..x.health.."/"..x.maxhealth.."]"
addEvent(capturou, 4000, {cid = cid, poke = poke1, nome = i, description = description, ball = 2219, letter = 2597})
else
function ruim(params)
if not isCreature(params.cid) then
return true
end
doPlayerSendTextMessage(params.cid, 27, "Sorry, you didn\'t catch that pokemon.")
if #getCreatureSummons(params.cid) >= 1 then
doSendMagicEffect(getThingPos(getCreatureSummons(params.cid)[1]), 166)
else
doSendMagicEffect(getThingPos(params.cid), 166)
end
end
addEvent(ruim, 4000, {cid = cid})
doSendMagicEffect(topos, fail)
end
end
end
end
return TRUE
end

 

*XML

<action itemid="ID BALL","ID BALL", "ID BALL", event="script" value="catch.lua" />

 

 

- Depois vai em Evolve.lua:

 

!!!! Atençao!!!
- Nesse Script a Evoluçao e E usada por Icone e nao por Stones

local fotos = {
["Bulbasaur"] = {fotopoke = 2377},

local pokes = {
["Bulbasaur"] = {evolution = "Ivysaur", maxh = 2600, count = 1, stoneid = 2580, stoneid2 = 0}, --- 2580 e o ID do Icone que Vai Evoluir o Pokemon
}

local types = {
["Evolve"] = {itemid = 2580, "Bulbasaur", "Ivysaur", "Oddish", "Gloom", "Bellsprout", "Weepinbell", "Exeggcute"},
}

function onUse(cid, item, frompos, item2, topos)
if not isMonster(item2.uid) then
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
for i,x in pairs(types) do
if getPlayerSlotItem(cid, 7).itemid ~= fotos[getCreatureName(item2.uid)].fotopoke then
return doPlayerSendCancel(cid, "Plase, keep your pokemon's ball at the right place during evolution!")
end
if item.itemid == x.itemid then
if isPlayerSummon(cid, item2.uid) then
if table.find(x, getCreatureName(item2.uid)) then
if getItemAttribute(item.uid, "level") == 2 then

local count = pokes[getCreatureName(item2.uid)].count
local stnid = pokes[getCreatureName(item2.uid)].stoneid
local stnid2 = pokes[getCreatureName(item2.uid)].stoneid2
local evo = pokes[getCreatureName(item2.uid)].evolution
local levell = pokes[getCreatureName(item2.uid)].level
if stnid2 > 1 and getPlayerItemCount(cid, stnid2) < count then
return doPlayerSendCancel(cid, "You need at least one "..getItemNameById(stnid).." and one "..getItemNameById(stnid2).." to evolve this pokemon!")
end
if stnid2 > 1 and getPlayerItemCount(cid, stnid) < count then
return doPlayerSendCancel(cid, "You need at least one "..getItemNameById(stnid).." and one "..getItemNameById(stnid2).." to evolve this pokemon!")
end
if getPlayerItemCount(cid, stnid) < count then
return doPlayerSendCancel(cid, "You need at least "..count.." "..getItemNameById(stnid).."s to evolve this pokemon!")
end
if getPlayerLevel(cid) < pokes[getCreatureName(item2.uid)].level then
return doPlayerSendCancel(cid, "Sorry, you don't have the required level to evolve this pokemon ("..levell..").")
end
local owner = getCreatureMaster(item2.uid)
local pokeball = getPlayerSlotItem(cid, 8)
local description = "Contains a "..evo.."."

local nas = {
["%%pokename"] = pokes[getCreatureName(item2.uid)].evolution
}
for i,x in pairs(nas) do
if description:find(i) then
description = description:gsub(i, x)
end
end
local slo = pokes[getCreatureName(item2.uid)].maxh
local sle = pokes[getCreatureName(item2.uid)].evolution

doItemSetAttribute(pokeball.uid, "poke", "This is "..evo.."'s pokeball. HP = ["..pokes[getCreatureName(item2.uid)].maxh.."/"..pokes[getCreatureName(item2.uid)].maxh.."]")
doItemSetAttribute(pokeball.uid, "description", description)
doPlayerSendTextMessage(cid, 27, "Congratulations! Your "..getCreatureName(item2.uid).." evolved into a "..evo.."!")
doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos[sle].fotopoke)
doSendMagicEffect(getThingPos(cid), 173)
local oldpos = getThingPos(item2.uid)
doRemoveCreature(item2.uid)
doSummonMonster(cid, sle)
local pk = getCreatureSummons(cid)[1]
registerCreatureEvent(pk, "DiePoke")
registerCreatureEvent(pk, "Exp")
doTeleportThing(pk, oldpos, false)
doCreatureSetLookDir(pk, 2)
setCreatureMaxHealth(pk, slo)
doCreatureAddHealth(pk, slo)
doCreatureAddHealth(pk, getCreatureMaxHealth(pk))
setPlayerStorageValue(cid, 2, 0)
local i = getCreatureName(getCreatureSummons(cid)[1])
if not string.find(getPlayerStorageValue(cid, 54842), ""..i..",") then
doPlayerAddSoul(cid, 1)
setPlayerStorageValue(cid, 54842, getPlayerStorageValue(cid, 54842)..""..i..", ")
end
break
else
return doPlayerSendCancel(cid, "Sorry, this is not the required stone to evolve this pokemon!")
end
end
end
end
end
return TRUE
end

 

*XML

<action itemid="ID DO ICONE EVOLVE" event="script" value="evolve.lua" allowfaruse="1"/>

 

 

- Se Quiser o Rare Candy Tambem Rarecandy.lua:

 

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

local pk = getCreatureSummons(cid)[1]
local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)
local chckc = getItemAttribute(feet.uid, "level")
if #getCreatureSummons(cid) == 0 then
return doPlayerSendCancel(cid, "Put your pokemon out of the pokeball.")
end
if getItemAttribute(feet.uid, "level") <= 29 then
doItemSetAttribute(feet.uid, "level", chckc +1)
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+100)
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "You used a rare candy and you pokemon has advanced of level. Now you pokemon is level [".. getItemAttribute(feet.uid, "level") .."]!")
doRemoveItem(item.uid, 1)
else
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon has already reached the maximum level [30].")
return TRUE

end
end

 

*XML

<action itemid="ID DA BALINHA RARE CANDY" event="script" value="Rarecandy.lua" allowfaruse="1"/>

Editado Março 18, 2014 por Nextbr

[willian12345 8]

- Eu Tenhu um Sistema Parecido de Pokelevel !

- No Pokemonbr o Pokemon so Ganha HP a Cada LVL e nao Aumenta na Força Bosta nenhuma e o Sistema de Sexo e so De Infeite Tambem!

- A Diferença e que nao vai aparece do Lado do nome do Poke Ex: Charmander [10] é so No Look

- NAO DAREI SUPORTE NO SCRIPT POIS NAO FUI EU QUE FIZ!

- Obs: Limite de Pokelevel: [30]

- Se Quiser aumentar o Limite de LvL Pokemon e so Seguir de Acordo com o Script

- Vai em Creaturescripts e Cria um Arquivo Chamado Pokelevel.lua:

 

local kkkkk = {

["Abra"] = {exp = 100},

["Aerodactyl"] = {exp = 600},

["Alakazam"] = {exp = 480},

["Arbok"] = {exp = 170},

["Arcanine"] = {exp = 240},

["Articuno"] = {exp = 800},

["Beedrill"] = {exp = 200},

["Bellsprout"] = {exp = 1000},

["Blastoise"] = {exp = 370},

["Bulbasaur"] = {exp = 180},

["Butterfree"] = {exp = 140},

["Caterpie"] = {exp = 70},

["Chansey"] = {exp = 280},

["Charmander"] = {exp = 270},

["Charmeleon"] = {exp = 340},

["Charizard"] = {exp = 670},

["Clefable"] = {exp = 280},

["Clefairy"] = {exp = 170},

["Cloyster"] = {exp = 270},

["Crystal Onix"] = {exp = 700},

["Cubone"] = {exp = 70},

["Dewgong"] = {exp = 170},

["Diglett"] = {exp = 70},

["Ditto"] = {exp = 480},

["Dodrio"] = {exp = 270},

["Doduo"] = {exp = 170},

["Dragonair"] = {exp = 270},

["Dragonite"] = {exp = 570},

["Dratini"] = {exp = 170},

["Drowzee"] = {exp = 170},

["Dugtrio"] = {exp = 270},

["Eevee"] = {exp = 470},

["Ekans"] = {exp = 4000},

["Elder Charizard"] = {exp = 870},

["Electabuzz"] = {exp = 670},

["Electrode"] = {exp = 470},

["Exeggcute"] = {exp = 370},

["Exeggutor"] = {exp = 570},

["Farfetchd"] = {exp = 470},

["Fearow"] = {exp = 270},

["Flareon"] = {exp = 470},

["Gastly"] = {exp = 170},

["Gengar"] = {exp = 470},

["Geodude"] = {exp = 70},

["Gloom"] = {exp = 170},

["Golbat"] = {exp = 270},

["Goldeen"] = {exp = 70},

["Golduck"] = {exp = 170},

["Golem"] = {exp = 470},

["Graveler"] = {exp = 170},

["Grimer"] = {exp = 70},

["Growlithe"] = {exp = 170},

["Gyarados"] = {exp = 770},

["Haunter"] = {exp = 370},

["Hitmonchan"] = {exp = 570},

["Hitmonlee"] = {exp = 670},

["Horsea"] = {exp = 70},

["Hypno"] = {exp = 470},

["Ivysaur"] = {exp = 270},

["Jigglypuff"] = {exp = 270},

["Jolteon"] = {exp = 370},

["Jynx"] = {exp = 470},

["Kabuto"] = {exp = 370},

["Kabutops"] = {exp = 570},

["Kadabra"] = {exp = 470},

["Kakuna"] = {exp = 70},

["Kangaskhan"] = {exp = 870},

["Kingler"] = {exp = 170},

["Koffing"] = {exp = 170},

["Krabby"] = {exp = 70},

["Lapras"] = {exp = 470},

["Lickitung"] = {exp = 270},

["Machamp"] = {exp = 470},

["Machoke"] = {exp = 270},

["Machop"] = {exp = 70},

["Magikarp"] = {exp = 17},

["Magmar"] = {exp = 570},

["Magnemite"] = {exp = 70},

["Magneton"] = {exp = 270},

["Mankey"] = {exp = 70},

["Marowak"] = {exp = 170},

["Meowth"] = {exp = 70},

["Metapod"] = {exp = 70},

["Mew"] = {exp = 870},

["Mewtwo"] = {exp = 970},

["Moltres"] = {exp = 870},

["Mr Mime"] = {exp = 570},

["Muk"] = {exp = 270},

["Nidoking"] = {exp = 670},

["Nidoqueen"] = {exp = 470},

["Nidoran Female"] = {exp = 70},

["Nidoran Male"] = {exp = 70},

["Nidorina"] = {exp = 70},

["Nidorino"] = {exp = 70},

["Ninetales"] = {exp = 570},

["Oddish"] = {exp = 70},

["Omanyte"] = {exp = 270},

["Omastar"] = {exp = 170},

["Onix"] = {exp = 470},

["Paras"] = {exp = 70},

["Parasect"] = {exp = 270},

["Persian"] = {exp = 170},

["Pidgeot"] = {exp = 370},

["Pidgeotto"] = {exp = 170},

["Pidgey"] = {exp = 70},

["Pikachu"] = {exp = 270},

["Pinsir"] = {exp = 370},

["Poliwag"] = {exp = 70},

["Poliwhirl"] = {exp = 270},

["Poliwrath"] = {exp = 470},

["Ponyta"] = {exp = 170},

["Porygon"] = {exp = 670},

["Primeape"] = {exp = 370},

["Psyduck"] = {exp = 170},

["Raichu"] = {exp = 370},

["Rapidash"] = {exp = 470},

["Raticate"] = {exp = 270},

["Rattata"] = {exp = 70},

["Rhydon"] = {exp = 570},

["Rhyhorn"] = {exp = 370},

["Sandshrew"] = {exp = 70},

["Sandslash"] = {exp = 470},

["Scyther"] = {exp = 870},

["Seadra"] = {exp = 370},

["Seaking"] = {exp = 170},

["Seel"] = {exp = 70},

["Shellder"] = {exp = 70},

["Slowbro"] = {exp = 170},

["Slowpoke"] = {exp = 70},

["Snorlax"] = {exp = 870},

["Spearow"] = {exp = 70},

["Squirtle"] = {exp = 170},

["Starmie"] = {exp = 370},

["Staryu"] = {exp = 70},

["Tangela"] = {exp = 270},

["Tauros"] = {exp = 170},

["Tentacool"] = {exp = 70},

["Tentacruel"] = {exp = 470},

["Vaporeon"] = {exp = 270},

["Venomoth"] = {exp = 170},

["Venonat"] = {exp = 70},

["Venusaur"] = {exp = 370},

["Victreebel"] = {exp = 570},

["Vileplume"] = {exp = 470},

["Voltorb"] = {exp = 70},

["Vulpix"] = {exp = 170},

["Wartortle"] = {exp = 170},

["Weedle"] = {exp = 70},

["Weepinbell"] = {exp = 270},

["Weezing"] = {exp = 370},

["Wigglytuff"] = {exp = 570},

["Zapdos"] = {exp = 870},

["Zubat"] = {exp = 70},

["Shiny Venusaur"] = {exp = 1700},

["Shiny Tentacool"] = {exp = 570},

["Shiny Tentacruel"] = {exp = 870},

["Shiny Abra"] = {exp = 470},

["Shiny Blastoise"] = {exp = 2500},

["Shiny Butterfree"] = {exp = 1500},

["Shiny Beedrill"] = {exp = 1000},

["Shiny Rattata"] = {exp = 125},

["Shiny Raticate"] = {exp = 163},

["Shiny Raichu"] = {exp = 600},

["Shiny Zubat"] = {exp = 162},

["Shiny Magikarp"] = {exp = 32},

["Shiny Paras"] = {exp = 200},

["Shiny Parasect"] = {exp = 800},

["Shiny Growlithe"] = {exp = 1500},

["Shiny Arcanine"] = {exp = 4000},

["Shiny Grimer"] = {exp = 1500},

["Shiny Hitmonchan"] = {exp = 4500},

["Shiny Hitmonlee"] = {exp = 4500},

["Shiny Muk"] = {exp = 1000},

["Shiny Krabby"] = {exp = 300},

["Shiny Kingler"] = {exp = 900},

["Shiny Voltorb"] = {exp = 1500},

["Shiny Electrode"] = {exp = 1200},

["Shiny Farfetchd"] = {exp = 3200},

["Shiny Horsea"] = {exp = 170},

["Shiny Oddish"] = {exp = 150},

["Shiny Seadra"] = {exp = 900},

["Shiny Scyther"] = {exp = 3000},

["Shiny Jynx"] = {exp = 3000},

["Shiny Electabuzz"] = {exp = 3000},

["Shiny Venomoth"] = {exp = 2000},

["Shiny Dratini"] = {exp = 2000}

}

 

function onKill(cid, target)

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

local chck = getItemAttribute(feet.uid, "levell")

local chckc = getItemAttribute(feet.uid, "level")

if isPlayer(cid) == TRUE and isSummon(target) == true then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your Pokemon dont gain experience in Duel")

return TRUE

end

------------------------------------- level 1 ----------------------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == False then

return true

end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 1 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 1999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/2000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 1999 and getItemAttribute(feet.uid, "level") == 1 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 1 to Level 2!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

 

--------------------------------------- level 2 ---------------------------------------------------------

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 2 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 3999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/4000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 3999 and getItemAttribute(feet.uid, "level") == 2 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 2 to Level 3!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

-------------------------------------- level 3 ------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 3 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 7999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/8000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 7999 and getItemAttribute(feet.uid, "level") == 3 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 3 to Level 4!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 4 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 4 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 11999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/12000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 11999 and getItemAttribute(feet.uid, "level") == 4 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 4 to Level 5!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 5 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 5 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 14999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/15000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 14999 and getItemAttribute(feet.uid, "level") == 5 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 5 to Level 6!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 6 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 6 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 18999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/19000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 18999 and getItemAttribute(feet.uid, "level") == 6 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 6 to Level 7!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

-------------------------------------- level 7 ------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 7 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 24999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/25000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 24999 and getItemAttribute(feet.uid, "level") == 7 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 7 to Level 8!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 8 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 8 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 29999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/30000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 29999 and getItemAttribute(feet.uid, "level") == 8 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 8 to Level 9!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 9 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 9 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 35999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/36000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 35999 and getItemAttribute(feet.uid, "level") == 9 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 9 to Level 10!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 10 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 10 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 41999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/42000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 41999 and getItemAttribute(feet.uid, "level") == 10 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 10 to Level 11!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

------------------------------------- level 11 ----------------------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 11 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 46999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/47000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 46999 and getItemAttribute(feet.uid, "level") == 11 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 11 to Level 12!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

-------------------------------------- level 12 ------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 12 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 52999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/53000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 52999 and getItemAttribute(feet.uid, "level") == 12 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 12 to Level 13!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 13 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 13 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 57999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/58000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 57999 and getItemAttribute(feet.uid, "level") == 13 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 13 to Level 14!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 14 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 14 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 62999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/63000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 62999 and getItemAttribute(feet.uid, "level") == 14 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 14 to Level 15!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 15 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 15 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 68999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/69000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 68999 and getItemAttribute(feet.uid, "level") == 15 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 15 to Level 16!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

-------------------------------------- level 16 ------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 16 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 74999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/75000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 74999 and getItemAttribute(feet.uid, "level") == 16 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 16 to Level 17!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 17 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 17 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 78999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/79000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 78999 and getItemAttribute(feet.uid, "level") == 17 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 17 to Level 18!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 18 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 18 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 85999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/86000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 85999 and getItemAttribute(feet.uid, "level") == 18 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 18 to Level 19!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 19 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 19 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 94999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/95000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 94999 and getItemAttribute(feet.uid, "level") == 19 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 19 to Level 20!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

------------------------------------- level 20 ----------------------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 20 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 98999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/99000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 98999 and getItemAttribute(feet.uid, "level") == 20 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 20 to Level 21!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

-------------------------------------- level 21 ------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 21 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 104999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/105000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 104999 and getItemAttribute(feet.uid, "level") == 21 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 21 to Level 22!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 22 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 22 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 109999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/110000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 109999 and getItemAttribute(feet.uid, "level") == 22 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 22 to Level 23!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 24 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 23 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 117999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/118000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 117999 and getItemAttribute(feet.uid, "level") == 23 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 23 to Level 24!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 23 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 24 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 126999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/127000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 126999 and getItemAttribute(feet.uid, "level") == 24 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 24 to Level 25!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

-------------------------------------- level 24 ------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 25 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 135999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/136000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 135999 and getItemAttribute(feet.uid, "level") == 25 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 25 to Level 26!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 25 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 26 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 142999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/143000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 142999 and getItemAttribute(feet.uid, "level") == 26 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 26 to Level 27!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 26 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 27 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 148999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/149000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 148999 and getItemAttribute(feet.uid, "level") == 27 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 27 to Level 28!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

 

return true

end

end

--------------------------------------- level 27 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 28 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 156999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/157000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 156999 and getItemAttribute(feet.uid, "level") == 28 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 28 to Level 29!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

return true

end

end

--------------------------------------- level 28 -----------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 29 and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 199999 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu pokemon Ganhou "..tab.exp.." de experiencia "..chck +tab.exp.."/200000")

doItemSetAttribute(feet.uid, "levell", chck +tab.exp)

return true

end

end

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "levell") >= 199999 and getItemAttribute(feet.uid, "level") == 29 then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level 29 to Level 30!")

doItemSetAttribute(feet.uid, "level", chckc +1)

doItemSetAttribute(feet.uid, "levell", 1)

return true

end

end

-------------------------------------- level 29 ---------------------------------------------------

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 30 then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Limite de Level")

return true

end

end

 

*XML

<event type="kill" name="kill" event="script" value="pokelevel.lua"/>

registerCreatureEvent(cid, "kill")

 

 

- Depois vai no Look.lua :

 

function onLook(cid, item2, skill)

tabela2 = {

[1] = {"He"},

[0] = {"She"},

}

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if item2.uid == cid then

doPlayerSendTextMessage(cid, 25, "You see yourself.")

return FALSE

end

if isPlayer(item2.uid) == TRUE and isSummon(item2.uid) == FALSE then

local cidade = getTownName(getPlayerTown(item2.uid))

table2 = tabela2[getPlayerSex(item2.uid)]

doPlayerSendTextMessage(cid, 25, "You see a ".. getCreatureName(item2.uid) ..". ".. table2[1] .." is ".. getPlayerVocationName(item2.uid) .." from ".. cidade ..".\n ".. table2[1] .." have ".. getPlayerPremiumDays(item2.uid) .." Premium Days.")

return FALSE

end

if isSummon(item2.uid) == TRUE and isPlayer(item2.uid) == FALSE and getItemAttribute(feet.uid, "level") == False and isPlayer(getCreatureMaster(item2.uid)) == TRUE then

doPlayerSendTextMessage(cid, 25, "You see a ".. getCreatureName(item2.uid) ..". It is belongs to ".. getCreatureName(getCreatureMaster(item2.uid)) ..".\nHit points: "..getCreatureHealth(item2.uid).."/"..getCreatureMaxHealth(item2.uid).."")

else

if isSummon(item2.uid) == TRUE and isPlayer(item2.uid) == FALSE and isPlayer(getCreatureMaster(item2.uid)) == TRUE then

doPlayerSendTextMessage(cid, 25, "You see a ".. getCreatureName(item2.uid) ..". It is belongs to ".. getCreatureName(getCreatureMaster(item2.uid)) ..".\nHit points: "..getCreatureHealth(item2.uid).."/"..getCreatureMaxHealth(item2.uid)..". Level [".. getItemAttribute(feet.uid, "level") .."]")

elseif isSummon(item2.uid) == TRUE and isPlayer(item2.uid) == FALSE and isPlayer(getCreatureMaster(item2.uid)) == FALSE then

else

return TRUE

end

end

end

 

 

*XML

<event type="look" name="Alook" event="script" value="look.lua"/>

registerCreatureEvent(cid, "Alook")

 

- Depois data/actions/Goback.lua:

 

local pokes = {

["Bulbasaur"] = {level = 20, cons = 7, vida = 700},

["Ivysaur"] = {level = 40, cons = 10, vida = 3000},

["Venusaur"] = {level = 85, cons = 15, vida = 5200},

["Charmander"] = {level = 20, cons = 7, vida = 970},

["Charmeleon"] = {level = 40, cons = 10, vida = 2900},

["Charizard"] = {level = 85, cons = 15, vida = 5200},

["Squirtle"] = {level = 20, cons = 7, vida = 650},

["Wartortle"] = {level = 40, cons = 10, vida = 2300},

["Blastoise"] = {level = 85, cons = 15, vida = 5200},

["Caterpie"] = {level = 1, cons = 5, vida = 200},

["Metapod"] = {level = 10, cons = 10, vida = 405},

["Butterfree"] = {level = 30, cons = 15, vida = 2500},

["Weedle"] = {level = 1, cons = 5, vida = 325},

["Kakuna"] = {level = 10, cons = 10, vida = 900},

["Beedrill"] = {level = 30, cons = 15, vida = 1900},

["Pidgey"] = {level = 1, cons = 6, vida = 380},

["Pidgeotto"] = {level = 20, cons = 10, vida = 1400},

["Pidgeot"] = {level = 65, cons = 15, vida = 3800},

["Rattata"] = {level = 1, cons = 5, vida = 350},

["Raticate"] = {level = 20, cons = 10, vida = 900},

["Spearow"] = {level = 5, cons = 10, vida = 350},

["Fearow"] = {level = 50, cons = 15, vida = 3300},

["Ekans"] = {level = 12, cons = 10, vida = 600},

["Arbok"] = {level = 30, cons = 15, vida = 2300},

["Pikachu"] = {level = 20, cons = 10, vida = 1250},

["Raichu"] = {level = 50, cons = 15, vida = 3500},

["Sandshrew"] = {level = 18, cons = 10, vida = 700},

["Sandslash"] = {level = 55, cons = 15, vida = 3400},

["Nidoran Female"] = {level = 10, cons = 8, vida = 600},

["Nidorina"] = {level = 25, cons = 12, vida = 2135},

["Nidoqueen"] = {level = 65, cons = 15, vida = 6445},

["Nidoran Male"] = {level = 10, cons = 8, vida = 620},

["Nidorino"] = {level = 25, cons = 12, vida = 2125},

["Nidoking"] = {level = 65, cons = 15, vida = 4200},

["Clefairy"] = {level = 10, cons = 10, vida = 1400},

["Clefable"] = {level = 35, cons = 15, vida = 2400},

["Vulpix"] = {level = 20, cons = 7, vida = 400},

["Ninetales"] = {level = 65, cons = 15, vida = 3400},

["Jigglypuff"] = {level = 10, cons = 10, vida = 500},

["Wigglytuff"] = {level = 42, cons = 15, vida = 2900},

["Zubat"] = {level = 5, cons = 8, vida = 450},

["Golbat"] = {level = 30, cons = 10, vida = 1900},

["Oddish"] = {level = 5, cons = 6, vida = 450},

["Gloom"] = {level = 18, cons = 10, vida = 1400},

["Vileplume"] = {level = 50, cons = 15, vida = 3300},

["Paras"] = {level = 1, cons = 5, vida = 400},

["Parasect"] = {level = 50, cons = 10, vida = 2500},

["Venonat"] = {level = 18, cons = 10, vida = 1350},

["Venomoth"] = {level = 50, cons = 15, vida = 3000},

["Diglett"] = {level = 5, cons = 7, vida = 470},

["Dugtrio"] = {level = 35, cons = 10, vida = 2400},

["Meowth"] = {level = 12, cons = 10, vida = 4000},

["Persian"] = {level = 30, cons = 12, vida = 1000},

["Psyduck"] = {level = 12, cons = 10, vida = 800},

["Golduck"] = {level = 55, cons = 12, vida = 3880},

["Mankey"] = {level = 10, cons = 8, vida = 1050},

["Primeape"] = {level = 45, cons = 10, vida = 3000},

["Growlithe"] = {level = 20, cons = 10, vida = 1000},

["Arcanine"] = {level = 80, cons = 15, vida = 6000},

["Poliwag"] = {level = 5, cons = 5, vida = 200},

["Poliwhirl"] = {level = 20, cons = 10, vida = 1200},

["Poliwrath"] = {level = 65, cons = 15, vida = 4400},

["Abra"] = {level = 15, cons = 8, vida = 620},

["Kadabra"] = {level = 50, cons = 10, vida = 2500},

["Alakazam"] = {level = 80, cons = 15, vida = 4000},

["Machop"] = {level = 18, cons = 8, vida = 1100},

["Machoke"] = {level = 40, cons = 10, vida = 2850},

["Machamp"] = {level = 70, cons = 15, vida = 6100},

["Bellsprout"] = {level = 1, cons = 6, vida = 420},

["Weepinbell"] = {level = 18, cons = 10, vida = 1100},

["Victreebel"] = {level = 50, cons = 15, vida = 4000},

["Tentacool"] = {level = 12, cons = 8, vida = 725},

["Tentacruel"] = {level = 80, cons = 15, vida = 7050},

["Geodude"] = {level = 1, cons = 10, vida = 700},

["Graveler"] = {level = 40, cons = 12, vida = 3000},

["Golem"] = {level = 70, cons = 15, vida = 6500},

["Ponyta"] = {level = 20, cons = 10, vida = 1000},

["Rapidash"] = {level = 60, cons = 15, vida = 3000},

["Slowpoke"] = {level = 12, cons = 10, vida = 600},

["Slowbro"] = {level = 45, cons = 15, vida = 1500},

["Magnemite"] = {level = 15, cons = 10, vida = 450},

["Magneton"] = {level = 40, cons = 15, vida = 1750},

["Farfetchd"] = {level = 40, cons = 15, vida = 3000},

["Doduo"] = {level = 12, cons = 10, vida = 600},

["Dodrio"] = {level = 45, cons = 15, vida = 2650},

["Seel"] = {level = 20, cons = 10, vida = 750},

["Dewgong"] = {level = 65, cons = 15, vida = 5200},

["Grimer"] = {level = 12, cons = 10, vida = 600},

["Muk"] = {level = 30, cons = 15, vida = 2400},

["Shellder"] = {level = 5, cons = 10, vida = 800},

["Cloyster"] = {level = 65, cons = 15, vida = 4000},

["Gastly"] = {level = 18, cons = 10, vida = 850},

["Haunter"] = {level = 45, cons = 12, vida = 2500},

["Gengar"] = {level = 80, cons = 15, vida = 7000},

["Onix"] = {level = 50, cons = 15, vida = 3000},

["Crystal Onix"] = {level = 50, cons = 20, vida = 8300},

["Drowzee"] = {level = 22, cons = 10, vida = 1150},

["Hypno"] = {level = 50, cons = 15, vida = 1500},

["Krabby"] = {level = 5, cons = 45, vida = 500},

["Kingler"] = {level = 35, cons = 15, vida = 2750},

["Voltorb"] = {level = 1, cons = 10, vida = 620},

["Electrode"] = {level = 38, cons = 15, vida = 2000},

["Exeggcute"] = {level = 8, cons = 10, vida = 800},

["Exeggutor"] = {level = 48, cons = 15, vida = 2300},

["Cubone"] = {level = 18, cons = 10, vida = 900},

["Marowak"] = {level = 45, cons = 15, vida = 1400},

["Hitmonlee"] = {level = 60, cons = 15, vida = 5000},

["Hitmonchan"] = {level = 60, cons = 20, vida = 4000},

["Lickitung"] = {level = 45, cons = 10, vida = 3000},

["Koffing"] = {level = 15, cons = 10, vida = 700},

["Weezing"] = {level = 30, cons = 15, vida = 1250},

["Rhyhorn"] = {level = 35, cons = 10, vida = 2900},

["Rhydon"] = {level = 65, cons = 15, vida = 4200},

["Chansey"] = {level = 60, cons = 10, vida = 2500},

["Tangela"] = {level = 40, cons = 8, vida = 800},

["Kangaskhan"] = {level = 60, cons = 12, vida = 5000},

["Horsea"] = {level = 5, cons = 10, vida = 300},

["Seadra"] = {level = 45, cons = 10, vida = 2000},

["Goldeen"] = {level = 10, cons = 10, vida = 800},

["Seaking"] = {level = 25, cons = 12, vida = 1300},

["Staryu"] = {level = 15, cons = 10, vida = 1050},

["Starmie"] = {level = 45, cons = 15, vida = 2000},

["Mr Mime"] = {level = 60, cons = 15, vida = 3500},

["Scyther"] = {level = 70, cons = 15, vida = 5000},

["Jynx"] = {level = 65, cons = 15, vida = 4500},

["Elekid"] = {level = 30, cons = 15, vida = 1500},

["Electabuzz"] = {level = 70, cons = 15, vida = 4000},

["Magmar"] = {level = 70, cons = 15, vida = 4000},

["Pinsir"] = {level = 42, cons = 15, vida = 2000},

["Tauros"] = {level = 40, cons = 10, vida = 2400},

["Magikarp"] = {level = 1, cons = 5, vida = 120},

["Gyarados"] = {level = 75, cons = 15, vida = 3000},

["Lapras"] = {level = 70, cons = 15, vida = 5000},

["Ditto"] = {level = 40, cons = 10, vida = 1500},

["Eevee"] = {level = 20, cons = 15, vida = 1500},

["Vaporeon"] = {level = 55, cons = 15, vida = 3500},

["Jolteon"] = {level = 55, cons = 15, vida = 3500},

["Flareon"] = {level = 55, cons = 15, vida = 3500},

["Porygon"] = {level = 45, cons = 15, vida = 2000},

["Omanyte"] = {level = 20, cons = 15, vida = 1000},

["Omastar"] = {level = 70, cons = 15, vida = 3000},

["Kabuto"] = {level = 20, cons = 10, vida = 1300},

["Kabutops"] = {level = 70, cons = 15, vida = 5000},

["Aerodactyl"] = {level = 100, cons = 15, vida = 5000},

["Snorlax"] = {level = 85, cons = 15, vida = 4000},

["Articuno"] = {level = 120, cons = 15, vida = 11000},

["Zapdos"] = {level = 120, cons = 15, vida = 11000},

["Moltres"] = {level = 120, cons = 15, vida = 11000},

["Dratini"] = {level = 10, cons = 15, vida = 800},

["Dragonair"] = {level = 70, cons = 15, vida = 3000},

["Dragonite"] = {level = 100, cons = 15, vida = 4000},

["Mewtwo"] = {level = 100, cons = 15, vida = 18000},

["Mew"] = {level = 100, cons = 15, vida = 7200},

["Elder Charizard"] = {level = 10, cons = 15, vida = 3000},

["Shiny Abra"] = {level = 14, cons = 15, vida = 1000},

["Shiny Arcanine"] = {level = 70, cons = 15, vida = 10000},

["Shiny Beedrill"] = {level = 24, cons = 15, vida = 3000},

["Shiny Blastoise"] = {level = 70, cons = 15, vida = 8000},

["Shiny Butterfree"] = {level = 34, cons = 15, vida = 485},

["Shiny Dratini"] = {level = 30, cons = 15, vida = 2000},

["Shiny Electabuzz"] = {level = 90, cons = 15, vida = 4200},

["Shiny Electrode"] = {level = 48, cons = 15, vida = 4000},

["Shiny Farfetchd"] = {level = 38, cons = 15, vida = 5000},

["Shiny Grimer"] = {level = 16, cons = 15, vida = 2000},

["Shiny Hitmonchan"] = {level = 70, cons = 15, vida = 8000},

["Shiny Hitmonlee"] = {level = 120, cons = 15, vida = 8000},

["Shiny Horsea"] = {level = 14, cons = 15, vida = 1080},

["Shiny Jynx"] = {level = 70, cons = 15, vida = 5000},

["Shiny Kingler"] = {level = 24, cons = 15, vida = 4000},

["Shiny Krabby"] = {level = 70, cons = 15, vida = 700},

["Shiny Magikarp"] = {level = 34, cons = 15, vida = 180},

["Shiny Muk"] = {level = 30, cons = 15, vida = 3500},

["Shiny Oddish"] = {level = 90, cons = 15, vida = 700},

["Shiny Paras"] = {level = 48, cons = 15, vida = 600},

["Shiny Parasect"] = {level = 38, cons = 15, vida = 3500},

["Shiny Raichu"] = {level = 16, cons = 15, vida = 4500},

["Shiny Rattata"] = {level = 70, cons = 15, vida = 600},

["Shiny Raticate"] = {level = 38, cons = 15, vida = 1200},

["Shiny Scyther"] = {level = 16, cons = 15, vida = 7000},

["Shiny Seadra"] = {level = 70, cons = 15, vida = 2500},

["Shiny Tentacool"] = {level = 120, cons = 15, vida = 1000},

["Shiny Tentacruel"] = {level = 14, cons = 15, vida = 9000},

["Shiny Venomoth"] = {level = 70, cons = 15, vida = 4500},

["Shiny Venusaur"] = {level = 24, cons = 15, vida = 6000},

["Shiny Voltorb"] = {level = 70, cons = 15, vida = 1000},

["Shiny Zubat"] = {level = 34, cons = 15, vida = 990},

}

 

 

local msgunica = true

local msgunicago1, msgunicaback1 = "Go, doka!", "Come back, doka!"

local msgunicago2, msgunicaback2 = "Let's do it, doka!", "Thanks for helping, doka!"

local msgunicago3, msgunicaback3 = "I choose you, doka!", "That's enough, come back!"

local msgunicago4, msgunicaback4 = "I need your help, doka!", "You were great, doka!"

local msgunicago5, msgunicaback5 = "Let's fight, doka!", "Excellent work, doka!"

local msgunicago6, msgunicaback6 = "It's battle time, doka!", "Well done, doka!"

 

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

if #getCreatureSummons(cid) >= 1 and getPlayerStorageValue(getCreatureSummons(cid)[1], 33) >= 1 then

return true

end

local random2 = math.random(1,6)

if random2 == 1 then

msgunicaback = msgunicaback1

elseif random2 == 2 then

msgunicaback = msgunicaback2

elseif random2 == 3 then

msgunicaback = msgunicaback3

elseif random2 == 4 then

msgunicaback = msgunicaback4

elseif random2 == 5 then

msgunicaback = msgunicaback5

elseif random2 == 6 then

msgunicaback = msgunicaback6

end

local random = math.random(1,6)

if random == 1 then

msgunicago = msgunicago1

elseif random == 2 then

msgunicago = msgunicago2

elseif random == 3 then

msgunicago = msgunicago3

elseif random == 4 then

msgunicago = msgunicago4

elseif random == 5 then

msgunicago = msgunicago5

elseif random == 6 then

msgunicago = msgunicago6

end

 

if item.itemid == 2222 or item.itemid == 2223 then

gobackeff = 10

elseif item.itemid == 2239 or item.itemid == 2240 then

gobackeff = 189

elseif item.itemid == 2234 or item.itemid == 2235 then

gobackeff = 190

elseif item.itemid == 2220 or item.itemid == 2221 then

gobackeff = 191

elseif item.itemid == 2242 or item.itemid == 2243 then

gobackeff = 226

elseif item.itemid == 2192 or item.itemid == 2193 then

gobackeff = 223

elseif item.itemid == 2660 or item.itemid == 2661 then

gobackeff = 194

elseif item.itemid == 2663 or item.itemid == 2664 then

gobackeff = 193

elseif item.itemid == 2655 or item.itemid == 2656 then

gobackeff = 195

end

local effect = gobackeff

 

if item.itemid == 2223 or item.itemid == 2240 or item.itemid == 2235 or item.itemid == 2221 or item.itemid == 2243 or item.itemid == 2193 or item.itemid == 2661 or item.itemid == 2664 or item.itemid == 2656 then

for a, b in pairs(ginasios) do

if getPlayerStorageValue(cid, b.storage) == 1 then -- GYM

doPlayerSendCancel(cid, "You can't return your pokemon during gym battles.")

return true

end

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if #getCreatureSummons(cid) >= 1 then

if getPlayerStorageValue(cid, 6547) >= 4 then

return true

end

if getPlayerStorageValue(cid, 4897) >= 7 then

return true

end

local z = getCreatureSummons(cid)[1]

local pokename = getCreatureName(z)

local mbk = msgunicaback:gsub("doka", pokename)

if getItemAttribute(item.uid, "poke"):find(getCreatureName(z)) then

doTransformItem(item.uid, item.itemid-1)

doCreatureSay(cid, mbk, TALKTYPE_SAY)

local summom = getCreatureSummons(cid)

local maxh = pokes[getCreatureName(summom[1])].vida

local pct2 = ((getCreatureHealth(summom[1])) / (getCreatureMaxHealth(summom[1])))

local vids = ((getCreatureHealth(summom[1])) - 2)

doCreatureAddHealth(summom[1], -vids)

setCreatureMaxHealth(summom[1], maxh)

doCreatureAddHealth(summom[1], ((maxh) * (pct2)))

doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")) .. " HP = ["..getCreatureHealth(z).."/"..getCreatureMaxHealth(z).."]")

setPlayerStorageValue(cid, 61204, 0)

setPlayerStorageValue(cid, 2, 0)

doSendMagicEffect(getCreaturePosition(z), effect)

doRemoveCreature(z)

if getPlayerGroupId(cid) == 8 then

setPlayerGroupId(cid, 1)

return true

end

end

end

 

if getPlayerGroupId(cid) == 8 then

setPlayerGroupId(cid, 1)

return true

end

 

elseif item.itemid == 2222 or item.itemid == 2239 or item.itemid == 2234 or item.itemid == 2220 or item.itemid == 2242 or item.itemid == 2192 or item.itemid == 2660 or item.itemid == 2663 or item.itemid == 2655 then

 

if item.uid ~= getPlayerSlotItem(cid, CONST_SLOT_FEET).uid then

doPlayerSendCancel(cid, "You must put your pokeball in the correct place!")

return TRUE

end

 

 

if not canSummon(cid) then

return doPlayerSendDefaultCancel(cid, RETURNVALUE_NOTENOUGHROOM)

end

 

if getPlayerStorageValue(cid, 63215) >= 1 then

return doPlayerSendCancel(cid, "You can't use pokeball while surfing.")

end

 

if getPlayerStorageValue(cid, 62314) >= 1 then

return doPlayerSendCancel(cid, "You can't use pokeball while flying.")

end

 

if #getCreatureSummons(cid) >= 1 then

return doPlayerSendCancel(cid, "You have already summoned a pokemon.")

end

 

for i,x in pairs(pokes) do

if i == getItemAttribute(item.uid, "poke"):sub(9, findLetter(getItemAttribute(item.uid, "poke"), "'")-1) then

 

if getPlayerLevel(cid) < x.level then

doPlayerSendCancel(cid, "You need level "..x.level.." or higher to use this pokemon.")

return true

end

local removed = doCreateItem(1285, 1, getThingPos(cid))

if getItemAttribute(item.uid, "level") == False then

doItemSetAttribute(item.uid, "level", 1)

else

doItemSetAttribute(item.uid, "description", " Contains a "..getItemAttribute(item.uid, "poke"):sub(9, findLetter(getItemAttribute(item.uid, "poke"), "'")-1).." Level : "..getItemAttribute(item.uid, "level").."")

end

doSummonMonster(cid, i)

local pk = getCreatureSummons(cid)[1]

doTeleportThing(pk, getClosestFreeTile(pk, getThingPos(cid)), false)

doRemoveItem(removed, 1)

doCreatureSetLookDir(pk, 2)

local maxh = pokes[getCreatureName(pk)].vida

local levellife = ((getPlayerLevel(cid)) * (pokes[getCreatureName(pk)].cons))

local health = tonumber(getItemAttribute(item.uid, "poke"):match("%[(.-)/"))

doConvinceCreature(cid, pk)

doCreatureAddHealth(pk, health-maxh)

local pct = ((getCreatureHealth(pk)) / (getCreatureMaxHealth(pk)))

local vidis = (getCreatureHealth(pk))

setCreatureMaxHealth(pk, ((maxh) + (levellife)))

doCreatureAddHealth(pk, 2)

doCreatureAddHealth(pk, -vidis)

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 2 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+100)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 3 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+200)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 4 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+300)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 5 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+400)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 6 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+500)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 7 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+600)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 8 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+700)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 9 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+800)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 10 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+900)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 11 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1000)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 12 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1100)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 13 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1200)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 14 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1300)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 15 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1400)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 16 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1500)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 17 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1600)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 18 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1700)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 19 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1800)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 20 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+1900)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 21 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2000)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 22 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2100)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 23 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2200)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 24 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2300)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 25 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2400)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 26 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2500)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 27 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2600)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 28 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2700)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 29 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+2800)

end

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

if getItemAttribute(feet.uid, "level") == 30 then

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+3000)

end

if getItemText(item.uid) == 2 then

doCreatureSetSkullType(pk, 3)

else

doCreatureSetSkullType(pk, getItemText(item.uid))

end

doCreatureAddHealth(pk, ((getCreatureMaxHealth(pk)) * (pct)) - 2)

doTransformItem(item.uid, item.itemid+1)

if getPlayerGroupId(cid) == 1 then

setPlayerGroupId(cid, 8)

end

local pokename = getCreatureName(getCreatureSummons(cid)[1])

local mgo = msgunicago:gsub("doka", pokename)

doCreatureSay(cid, mgo, TALKTYPE_SAY)

doItemSetAttribute(item.uid, "poke", getItemAttribute(item.uid, "poke"):sub(1, findLetter(getItemAttribute(item.uid, "poke"), ".")))

doSendMagicEffect(getCreaturePosition(pk), effect)

setPlayerStorageValue(cid, 61204, 1)

registerCreatureEvent(pk, "DiePoke")

registerCreatureEvent(pk, "Exp")

if getItemAttribute(item.uid, "levell") == False then

doItemSetAttribute(item.uid, "levell", 0)

break

end

end

end

end

return TRUE

end

 

*XML

<action itemid="ID BALL","ID BALL","ID BALL" event="script" value="goback.lua" />

 

- Depois Catch.lua:

 

local pokes = {

["Abra"] = {corpse = 2905, chance = 100, health = 620, maxhealth = 620},

["Aerodactyl"] = {corpse = 6338, chance = 2300, health = 5000, maxhealth = 5000},

["Alakazam"] = {corpse = 6057, chance = 1100, health = 4000, maxhealth = 4000},

["Arbok"] = {corpse = 5984, chance = 200, health = 2300, maxhealth = 2300},

["Arcanine"] = {corpse = 6031, chance = 1500, health = 6000, maxhealth = 6000},

["Articuno"] = {corpse = 7256, chance = 4000, health = 11000, maxhealth = 11000},

["Beedrill"] = {corpse = 5990, chance = 230, health = 1900, maxhealth = 1900},

["Bellsprout"] = {corpse = 2806, chance = 60, health = 420, maxhealth = 420},

["Blastoise"] = {corpse = 5999, chance = 1500, health = 5200, maxhealth = 5200},

["Bulbasaur"] = {corpse = 5969, chance = 120, health = 700, maxhealth = 700},

["Butterfree"] = {corpse = 5985, chance = 200, health = 2500, maxhealth = 2500},

["Caterpie"] = {corpse = 5971, chance = 20, health = 200, maxhealth = 200},

["Chansey"] = {corpse = 6010, chance = 1300, health = 2500, maxhealth = 2500},

["Charmander"] = {corpse = 5983, chance = 120, health = 970, maxhealth = 970},

["Charmeleon"] = {corpse = 5981, chance = 260, health = 2900, maxhealth = 2900},

["Charizard"] = {corpse = 6005, chance = 1500, health = 5200, maxhealth = 5200},

["Clefable"] = {corpse = 6006, chance = 400, health = 2400, maxhealth = 2400},

["Clefairy"] = {corpse = 2968, chance = 200, health = 1400, maxhealth = 1400},

["Cloyster"] = {corpse = 2932, chance = 450, health = 4000, maxhealth = 4000},

["Crystal Onix"] = {corpse = 6320, chance = 5000, health = 8300, maxhealth = 8300},

["Cubone"] = {corpse = 6050, chance = 90, health = 900, maxhealth = 900},

["Dewgong"] = {corpse = 6038, chance = 400, health = 5200, maxhealth = 5200},

["Diglett"] = {corpse = 6023, chance = 80, health = 470, maxhealth = 470},

["Ditto"] = {corpse = 2817, chance = 1300, health = 1500, maxhealth = 1500},

["Dodrio"] = {corpse = 6047, chance = 400, health = 2650, maxhealth = 2650},

["Doduo"] = {corpse = 2842, chance = 100, health = 600, maxhealth = 600},

["Dragonair"] = {corpse = 6002, chance = 4000, health = 3000, maxhealth = 3000},

["Dragonite"] = {corpse = 4295, chance = 4000, health = 4000, maxhealth = 4000},

["Dratini"] = {corpse = 2879, chance = 3000, health = 800, maxhealth = 800},

["Drowzee"] = {corpse = 6026, chance = 100, health = 1150, maxhealth = 1150},

["Dugtrio"] = {corpse = 6024, chance = 300, health = 2400, maxhealth = 2400},

["Eevee"] = {corpse = 6364, chance = 800, health = 1500, maxhealth = 1500},

["Ekans"] = {corpse = 5979, chance = 90, health = 600, maxhealth = 600},

["Elder Charizard"] = {corpse = 2954, chance = 5500, health = 3000, maxhealth = 3000},

["Electabuzz"] = {corpse = 6065, chance = 2500, health = 4000, maxhealth = 4000},

["Electrode"] = {corpse = 6051, chance = 270, health = 2000, maxhealth = 2000},

["Exeggcute"] = {corpse = 2982, chance = 90, health = 800, maxhealth = 800},

["Exeggutor"] = {corpse = 3005, chance = 300, health = 2300, maxhealth = 2300},

["Farfetchd"] = {corpse = 2836, chance = 290, health = 3000, maxhealth = 3000},

["Fearow"] = {corpse = 5992, chance = 500, health = 3300, maxhealth = 3300},

["Flareon"] = {corpse = 6059, chance = 500, health = 3500, maxhealth = 3500},

["Gastly"] = {corpse = 5993, chance = 120, health = 850, maxhealth = 850},

["Gengar"] = {corpse = 6336, chance = 1500, health = 7000, maxhealth = 7000},

["Geodude"] = {corpse = 6071, chance = 90, health = 700, maxhealth = 700},

["Gloom"] = {corpse = 6017, chance = 130, health = 1400, maxhealth = 1400},

["Golbat"] = {corpse = 6053, chance = 130, health = 1900, maxhealth = 1900},

["Goldeen"] = {corpse = 2970, chance = 80, health = 800, maxhealth = 800},

["Golduck"] = {corpse = 6028, chance = 500, health = 3880, maxhealth = 3880},

["Golem"] = {corpse = 6043, chance = 600, health = 6500, maxhealth = 6500},

["Graveler"] = {corpse = 6516, chance = 350, health = 3000, maxhealth = 3000},

["Grimer"] = {corpse = 6055, chance = 80, health = 600, maxhealth = 600},

["Growlithe"] = {corpse = 6036, chance = 120, health = 1000, maxhealth = 1000},

["Gyarados"] = {corpse = 6331, chance = 1500, health = 3000, maxhealth = 3000},

["Haunter"] = {corpse = 6004, chance = 290, health = 2500, maxhealth = 2500},

["Hitmonchan"] = {corpse = 5977, chance = 1500, health = 4000, maxhealth = 4000},

["Hitmonlee"] = {corpse = 6067, chance = 1500, health = 5000, maxhealth = 5000},

["Horsea"] = {corpse = 2973, chance = 80, health = 300, maxhealth = 300},

["Hypno"] = {corpse = 6046, chance = 290, health = 1500, maxhealth = 1500},

["Ivysaur"] = {corpse = 5982, chance = 290, health = 3000, maxhealth = 3000},

["Jigglypuff"] = {corpse = 6011, chance = 110, health = 500, maxhealth = 500},

["Jolteon"] = {corpse = 6044, chance = 420, health = 3500, maxhealth = 3500},

["Jynx"] = {corpse = 5765, chance = 400, health = 4500, maxhealth = 4500},

["Kabuto"] = {corpse = 5972, chance = 300, health = 1300, maxhealth = 1300},

["Kabutops"] = {corpse = 6345, chance = 1500, health = 5000, maxhealth = 5000},

["Kadabra"] = {corpse = 6060, chance = 240, health = 2500, maxhealth = 2500},

["Kakuna"] = {corpse = 6000, chance = 100, health = 900, maxhealth = 900},

["Kangaskhan"] = {corpse = 6073, chance = 1500, health = 5000, maxhealth = 5000},

["Kingler"] = {corpse = 6340, chance = 700, health = 2750, maxhealth = 2750},

["Koffing"] = {corpse = 2936, chance = 100, health = 700, maxhealth = 700},

["Krabby"] = {corpse = 6039, chance = 70, health = 500, maxhealth = 500},

["Lapras"] = {corpse = 6018, chance = 1400, health = 5000, maxhealth = 5000},

["Lickitung"] = {corpse = 2953, chance = 500, health = 3000, maxhealth = 3000},

["Machamp"] = {corpse = 6048, chance = 1200, health = 6100, maxhealth = 6100},

["Machoke"] = {corpse = 4251, chance = 800, health = 2850, maxhealth = 2850},

["Machop"] = {corpse = 6045, chance = 100, health = 1100, maxhealth = 1100},

["Magikarp"] = {corpse = 2818, chance = 10, health = 120, maxhealth = 120},

["Magmar"] = {corpse = 7283, chance = 1500, health = 4000, maxhealth = 4000},

["Magnemite"] = {corpse = 6056, chance = 80, health = 450, maxhealth = 450},

["Magneton"] = {corpse = 6076, chance = 500, health = 1750, maxhealth = 1750},

["Mankey"] = {corpse = 6035, chance = 100, health = 1050, maxhealth = 1050},

["Marowak"] = {corpse = 6072, chance = 300, health = 1400, maxhealth = 1400},

["Meowth"] = {corpse = 6034, chance = 100, health = 4000, maxhealth = 4000},

["Metapod"] = {corpse = 5970, chance = 40, health = 405, maxhealth = 405},

["Mew"] = {corpse = 2939, chance = 3000, health = 7200, maxhealth = 7200},

["Mewtwo"] = {corpse = 5973, chance = 3000, health = 18000, maxhealth = 18000},

["Moltres"] = {corpse = 7330, chance = 3000, health = 11000, maxhealth = 11000},

["Mr Mime"] = {corpse = 6069, chance = 1100, health = 3500, maxhealth = 3500},

["Muk"] = {corpse = 2845, chance = 280, health = 2400, maxhealth = 2400},

["Nidoking"] = {corpse = 2916, chance = 300, health = 4200, maxhealth = 4200},

["Nidoqueen"] = {corpse = 3004, chance = 300, health = 6445, maxhealth = 6445},

["Nidoran Female"] = {corpse = 6013, chance = 100, health = 600, maxhealth = 600},

["Nidoran Male"] = {corpse = 6015, chance = 100, health = 250, maxhealth = 250},

["Nidorina"] = {corpse = 6014, chance = 130, health = 2135, maxhealth = 2135},

["Nidorino"] = {corpse = 6019, chance = 130, health = 2125, maxhealth = 2125},

["Ninetales"] = {corpse = 6040, chance = 1000, health = 3400, maxhealth = 3400},

["Oddish"] = {corpse = 3008, chance = 70, health = 450, maxhealth = 450},

["Omanyte"] = {corpse = 5998, chance = 800, health = 1000, maxhealth = 1000},

["Omastar"] = {corpse = 5994, chance = 1800, health = 3000, maxhealth = 3000},

["Onix"] = {corpse = 2990, chance = 800, health = 3000, maxhealth = 3000},

["Paras"] = {corpse = 3007, chance = 60, health = 400, maxhealth = 400},

["Parasect"] = {corpse = 6027, chance = 290, health = 2500, maxhealth = 2500},

["Persian"] = {corpse = 6009, chance = 290, health = 1000, maxhealth = 1000},

["Pidgeot"] = {corpse = 6020, chance = 1000, health = 3800, maxhealth = 3800},

["Pidgeotto"] = {corpse = 5966, chance = 200, health = 1400, maxhealth = 1400},

["Pidgey"] = {corpse = 5961, chance = 70, health = 380, maxhealth = 380},

["Pikachu"] = {corpse = 6001, chance = 140, health = 1250, maxhealth = 1250},

["Pinsir"] = {corpse = 7282, chance = 290, health = 2000, maxhealth = 2000},

["Poliwag"] = {corpse = 6042, chance = 60, health = 200, maxhealth = 200},

["Poliwhirl"] = {corpse = 6054, chance = 900, health = 1200, maxhealth = 1200},

["Poliwrath"] = {corpse = 6033, chance = 1200, health = 4400, maxhealth = 4400},

["Ponyta"] = {corpse = 5975, chance = 100, health = 1000, maxhealth = 1000},

["Porygon"] = {corpse = 5963, chance = 800, health = 2000, maxhealth = 2000},

["Primeape"] = {corpse = 6032, chance = 390, health = 3000, maxhealth = 3000},

["Psyduck"] = {corpse = 6029, chance = 200, health = 800, maxhealth = 800},

["Raichu"] = {corpse = 5996, chance = 1000, health = 3500, maxhealth = 3500},

["Rapidash"] = {corpse = 4323, chance = 300, health = 3000, maxhealth = 3000},

["Raticate"] = {corpse = 6007, chance = 140, health = 900, maxhealth = 900},

["Rattata"] = {corpse = 5974, chance = 10, health = 350, maxhealth = 350},

["Rhydon"] = {corpse = 2858, chance = 330, health = 4200, maxhealth = 4200},

["Rhyhorn"] = {corpse = 3035, chance = 130, health = 2900, maxhealth = 2900},

["Sandshrew"] = {corpse = 5988, chance = 100, health = 700, maxhealth = 700},

["Sandslash"] = {corpse = 6041, chance = 900, health = 3400, maxhealth = 3400},

["Scyther"] = {corpse = 3002, chance = 3000, health = 2500, maxhealth = 2500},

["Seadra"] = {corpse = 2872, chance = 300, health = 2000, maxhealth = 2000},

["Seaking"] = {corpse = 3038, chance = 260, health = 1300, maxhealth = 1300},

["Seel"] = {corpse = 6030, chance = 110, health = 750, maxhealth = 750},

["Shellder"] = {corpse = 2837, chance = 90, health = 800, maxhealth = 800},

["Slowbro"] = {corpse = 5986, chance = 290, health = 1500, maxhealth = 1500},

["Slowpoke"] = {corpse = 2827, chance = 100, health = 600, maxhealth = 600},

["Snorlax"] = {corpse = 6016, chance = 2000, health = 4000, maxhealth = 4000},

["Spearow"] = {corpse = 5968, chance = 70, health = 350, maxhealth = 350},

["Squirtle"] = {corpse = 6008, chance = 120, health = 650, maxhealth = 650},

["Starmie"] = {corpse = 7320, chance = 280, health = 2000, maxhealth = 2000},

["Staryu"] = {corpse = 5987, chance = 100, health = 1050, maxhealth = 1050},

["Tangela"] = {corpse = 5976, chance = 290, health = 800, maxhealth = 800},

["Tauros"] = {corpse = 6302, chance = 280, health = 2400, maxhealth = 2400},

["Tentacool"] = {corpse = 2961, chance = 100, health = 725, maxhealth = 725},

["Tentacruel"] = {corpse = 6037, chance = 800, health = 7050, maxhealth = 7050},

["Vaporeon"] = {corpse = 5960, chance = 700, health = 3500, maxhealth = 3500},

["Venomoth"] = {corpse = 2925, chance = 280, health = 3000, maxhealth = 3000},

["Venonat"] = {corpse = 5997, chance = 100, health = 1350, maxhealth = 1350},

["Venusaur"] = {corpse = 5962, chance = 1500, health = 5200, maxhealth = 5200},

["Victreebel"] = {corpse = 6332, chance = 310, health = 4000, maxhealth = 4000},

["Vileplume"] = {corpse = 6025, chance = 310, health = 3300, maxhealth = 3300},

["Voltorb"] = {corpse = 6049, chance = 80, health = 620, maxhealth = 620},

["Vulpix"] = {corpse = 6003, chance = 80, health = 400, maxhealth = 400,},

["Wartortle"] = {corpse = 5978, chance = 260, health = 2300, maxhealth = 2300},

["Weedle"] = {corpse = 5964, chance = 10, health = 325, maxhealth = 325},

["Weepinbell"] = {corpse = 2928, chance = 310, health = 1100, maxhealth = 1100},

["Weezing"] = {corpse = 6306, chance = 400, health = 1250, maxhealth = 1250},

["Wigglytuff"] = {corpse = 6012, chance = 300, health = 5900, maxhealth = 2900},

["Zapdos"] = {corpse = 6074, chance = 3000, health = 11000, maxhealth = 11000},

["Zubat"] = {corpse = 5989, chance = 30, health = 450, maxhealth = 450},

["Crystal Onix"] = {chance = 1800, corpse = 6320, health = 18000, maxhealth = 18000},

["Elder Charizard"] = {chance = 1800, corpse = 2954, health = 15000, maxhealth = 15000},

["Shiny Arcanine"] = {chance = 1200, corpse =8746, health = 13000, maxhealth = 13000},

["Shiny Abra"] = {chance = 1200, corpse = 11423, health = 10000, maxhealth = 10000},

["Shiny Alakazam"] = {chance = 2600, corpse = 11435, health = 12000, maxhealth = 12000},

["Shiny Blastoise"] = {chance = 9000, corpse =8763, health = 15000, maxhealth = 15000},

["Shiny Butterfree"] = {chance = 120, corpse =8762, health = 5000, maxhealth = 5000},

["Shiny Beedrill"] = {chance = 150, corpse =8767, health = 5000, maxhealth = 5000},

["Shiny Cubone"] = {chance = 240, corpse = 11433, health = 2500, maxhealth = 2500},

["Shiny Dratini"] = {chance = 560, corpse = 8744, health = 2900, maxhealth = 2900},

["Shiny Dragonair"] = {chance = 1200, corpse = 8775, health = 15000, maxhealth= 15000},

["Shiny Electabuzz"] = {chance = 1200, corpse =8773, health = 10000, maxhealth = 10000},

["Shiny Electrode"] = {chance = 160, corpse =8753, health = 5000, maxhealth = 5000},

["Shiny Farfetchd"] = {chance = 300, corpse = 8745, health = 10000, maxhealth = 10000},

["Shiny Gengar"] = {chance = 1200, corpse = 8782, health = 13000, maxhealth= 13000},

["Shiny Golbat"] = {chance = 300, corpse = 8781, health = 10000, maxhealth= 10000},

["Shiny Growlithe"] = {chance = 120, corpse =8742, health = 8000, maxhealth = 8000},

["Shiny Gyarados"] = {chance = 1200, corpse = 8774, health = 16000, maxhealth = 16000},

["Shiny Grimer"] = {chance = 100, corpse =8752, health = 5000, maxhealth = 5000},

["Shiny Horsea"] = {chance = 40, corpse = 8768, health = 1000, maxhealth = 1000},

["Shiny Jynx"] = {chance = 1200, corpse = 8758, health = 12000, maxhealth= 12000},

["Shiny Krabby"] = {chance = 60, corpse =8755, health =1000, maxhealth =1000},

["Shiny Kingler"] = {chance = 60, corpse =8769, health = 6000, maxhealth = 6000},

["Shiny Magikarp"] = {chance = 10, corpse = 8766, health = 1000, maxhealth = 1000},

["Shiny Muk"] = {chance = 300, corpse =8747, health = 8000, maxhealth = 8000},

["Shiny Marowak"] = {chance = 500, corpse = 8779, health = 9000, maxhealth= 9000},

["Shiny Oddish"] = {chance = 150,corpse =8749, health = 1200, maxhealth = 1200},

["Shiny Paras"] = {chance = 15, corpse =8743, health = 800, maxhealth = 800},

["Shiny Parasect"] = {chance = 110, corpse =8756, health = 5000, maxhealth = 5000},

["Shiny Pidgeot"] = {chance = 1000, corpse = 8783, health = 9000, maxhealth= 9000},

["Shiny Pinsir"] = {chance = 300, corpse = 8780, health = 7000, maxhealth= 7000},

["Shiny Raichu"] = {chance = 800,corpse =8770, health = 9000, maxhealth = 9000},

["Shiny Rattata"] = {chance = 10, corpse =8751, health = 800, maxhealth = 800},

["Shiny Raticate"] = {chance = 120, corpse =8765, health = 5000, maxhealth = 5000},

["Shiny Scyther"] = {chance = 2400, corpse =8772, health = 10000, maxhealth = 10000},

["Shiny Seadra"] = {chance = 460, corpse = 8760, health =8000, maxhealth =8000},

["Shiny Snorlax"] = {chance = 2000, corpse = 8776, health = 25000, maxhealth= 25000},

["Shiny Tentacool"] = {chance = 100, corpse = 8748, health = 2000, maxhealth = 2000},

["Shiny Tentacruel"] = {chance = 1800, corpse = 8757, health = 11000, maxhealth = 11000},

["Shiny Tangela"] = {chance = 500, corpse = 8785, health = 8000, maxhealth= 8000},

["Shiny Voltorb"] = {chance = 30, corpse =8754, health = 2000, maxhealth = 2000},

["Shiny Venomoth"] = {chance = 300, corpse = 8761, health = 6500, maxhealth= 6500},

["Shiny Venonat"] = {chance = 50, corpse = 8759, health = 3000, maxhealth= 3000},

["Shiny Venusaur"] = {chance = 1800, corpse = 8764, health = 15000, maxhealth = 15000},

["Shiny Zubat"] = {chance = 30, corpse =8750, health = 2000, maxhealth = 2000}

}

 

local description = "Contains a %pokename."

 

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

local name = getItemNameById(item2.itemid)

if item.itemid == 2147 then

catchrate = 5

oncatch = 24

onfail = 23

bolabola = 2222

elseif item.itemid == 2143 then

catchrate = 5

oncatch = 24

onfail = 23

bolabola = 2222

elseif item.itemid == 2149 then

catchrate = 7

oncatch = 198

onfail = 197

bolabola = 2239

elseif item.itemid == 2151 then

catchrate = 8

oncatch = 224

onfail = 225

bolabola = 2242

elseif item.itemid == 2159 then

catchrate = 100000

oncatch = 221

onfail = 222

bolabola = 2192

elseif item.itemid == 2150 then

catchrate = 8

oncatch = 202

onfail = 201

bolabola = 2234

elseif item.itemid == 2146 then

catchrate = 9

oncatch = 200

onfail = 199

bolabola = 2220

elseif item.itemid == 2644 then

catchrate = 5

oncatch = 204

onfail = 203

bolabola = 2655

end

local rate = (catchrate)

local catch = oncatch

local fail = onfail

local newid = bolabola

for i,x in pairs(pokes) do

if getItemNameById(item2.itemid):find(i:lower()) then

if getItemIdByName(name) == pokes.corpse then

if cid ~= getItemAttribute(item2.uid, "corpseowner") and isInArray({1,8}, getPlayerGroupId(cid)) then

doPlayerSendCancel(cid, "You are not allowed to catch this pokemon.")

return true

end

doRemoveItem(item.uid, 1)

doRemoveItem(item2.uid, 1)

local pegar = math.random(1, x.chance)

if pegar <= 1*(rate) then

doSendMagicEffect(topos, catch)

 

local nas = {

["%%pokename"] = i

}

for i,x in pairs(nas) do

if description:find(i) then

description = description:gsub(i, x)

end

end

 

local function capturou(params)

if not isCreature(params.cid) then

return true

end

if not string.find(getPlayerStorageValue(cid, 54842), ""..i..",") then

doPlayerAddSoul(cid, 1)

setPlayerStorageValue(cid, 54842, getPlayerStorageValue(cid, 54842)..""..i..", ")

end

if getPlayerFreeCap(cid) <= 0.99 then

item = doCreateItemEx(newid-1)

doItemSetAttribute(item, "poke", params.poke)

doItemSetAttribute(item, "nome", params.nome)

doItemSetAttribute(item, "description", params.description)

doPlayerSendMailByName(getCreatureName(params.cid), item, 1)

doPlayerSendTextMessage(cid, 27, "Congratulations, you caught a "..i.."!")

doPlayerSendTextMessage(cid, 27, "Since you are already holding six pokemons, this pokeball has been sent to your depot.")

else

item = doCreateItemEx(params.ball)

doItemSetAttribute(item, "poke", params.poke)

doItemSetAttribute(item, "nome", params.nome)

doItemSetAttribute(item, "description", params.description)

doPlayerAddItemEx(params.cid, item, true)

doTransformItem(item, newid)

doPlayerSendTextMessage(cid, 27, "Congratulations, you caught a "..i.."!")

end

if #getCreatureSummons(cid) >= 1 then

doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 178)

else

doSendMagicEffect(getThingPos(cid), 178)

end

end

 

local description = "Contains a "..i.."."

local poke1 = "This is "..i.."'s pokeball. HP = ["..x.health.."/"..x.maxhealth.."]"

addEvent(capturou, 4000, {cid = cid, poke = poke1, nome = i, description = description, ball = 2219, letter = 2597})

else

function ruim(params)

if not isCreature(params.cid) then

return true

end

doPlayerSendTextMessage(params.cid, 27, "Sorry, you didn\'t catch that pokemon.")

if #getCreatureSummons(params.cid) >= 1 then

doSendMagicEffect(getThingPos(getCreatureSummons(params.cid)[1]), 166)

else

doSendMagicEffect(getThingPos(params.cid), 166)

end

end

addEvent(ruim, 4000, {cid = cid})

doSendMagicEffect(topos, fail)

end

end

end

end

return TRUE

end

 

*XML

<action itemid="ID BALL","ID BALL", "ID BALL", event="script" value="catch.lua" />

 

 

- Depois vai em Evolve.lua:

 

!!!! Atençao!!!

- Nesse Script a Evoluçao e E usada por Icone e nao por Stones

 

local fotos = {

["Bulbasaur"] = {fotopoke = 2377},

 

local pokes = {

["Bulbasaur"] = {evolution = "Ivysaur", maxh = 2600, count = 1, stoneid = 2580, stoneid2 = 0}, --- 2580 e o ID do Icone que Vai Evoluir o Pokemon

}

 

local types = {

["Evolve"] = {itemid = 2580, "Bulbasaur", "Ivysaur", "Oddish", "Gloom", "Bellsprout", "Weepinbell", "Exeggcute"},

}

 

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

if not isMonster(item2.uid) then

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

for i,x in pairs(types) do

if getPlayerSlotItem(cid, 7).itemid ~= fotos[getCreatureName(item2.uid)].fotopoke then

return doPlayerSendCancel(cid, "Plase, keep your pokemon's ball at the right place during evolution!")

end

if item.itemid == x.itemid then

if isPlayerSummon(cid, item2.uid) then

if table.find(x, getCreatureName(item2.uid)) then

if getItemAttribute(item.uid, "level") == 2 then

 

local count = pokes[getCreatureName(item2.uid)].count

local stnid = pokes[getCreatureName(item2.uid)].stoneid

local stnid2 = pokes[getCreatureName(item2.uid)].stoneid2

local evo = pokes[getCreatureName(item2.uid)].evolution

local levell = pokes[getCreatureName(item2.uid)].level

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

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

end

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

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

end

if getPlayerItemCount(cid, stnid) < count then

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

end

if getPlayerLevel(cid) < pokes[getCreatureName(item2.uid)].level then

return doPlayerSendCancel(cid, "Sorry, you don't have the required level to evolve this pokemon ("..levell..").")

end

local owner = getCreatureMaster(item2.uid)

local pokeball = getPlayerSlotItem(cid, 8)

local description = "Contains a "..evo.."."

 

local nas = {

["%%pokename"] = pokes[getCreatureName(item2.uid)].evolution

}

for i,x in pairs(nas) do

if description:find(i) then

description = description:gsub(i, x)

end

end

local slo = pokes[getCreatureName(item2.uid)].maxh

local sle = pokes[getCreatureName(item2.uid)].evolution

 

doItemSetAttribute(pokeball.uid, "poke", "This is "..evo.."'s pokeball. HP = ["..pokes[getCreatureName(item2.uid)].maxh.."/"..pokes[getCreatureName(item2.uid)].maxh.."]")

doItemSetAttribute(pokeball.uid, "description", description)

doPlayerSendTextMessage(cid, 27, "Congratulations! Your "..getCreatureName(item2.uid).." evolved into a "..evo.."!")

doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos[sle].fotopoke)

doSendMagicEffect(getThingPos(cid), 173)

local oldpos = getThingPos(item2.uid)

doRemoveCreature(item2.uid)

doSummonMonster(cid, sle)

local pk = getCreatureSummons(cid)[1]

registerCreatureEvent(pk, "DiePoke")

registerCreatureEvent(pk, "Exp")

doTeleportThing(pk, oldpos, false)

doCreatureSetLookDir(pk, 2)

setCreatureMaxHealth(pk, slo)

doCreatureAddHealth(pk, slo)

doCreatureAddHealth(pk, getCreatureMaxHealth(pk))

setPlayerStorageValue(cid, 2, 0)

local i = getCreatureName(getCreatureSummons(cid)[1])

if not string.find(getPlayerStorageValue(cid, 54842), ""..i..",") then

doPlayerAddSoul(cid, 1)

setPlayerStorageValue(cid, 54842, getPlayerStorageValue(cid, 54842)..""..i..", ")

end

break

else

return doPlayerSendCancel(cid, "Sorry, this is not the required stone to evolve this pokemon!")

end

end

end

end

end

return TRUE

end

 

*XML

<action itemid="ID DO ICONE EVOLVE" event="script" value="evolve.lua" allowfaruse="1"/>

 

 

- Se Quiser o Rare Candy Tambem Rarecandy.lua:

 

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

 

local pk = getCreatureSummons(cid)[1]

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

local chckc = getItemAttribute(feet.uid, "level")

if #getCreatureSummons(cid) == 0 then

return doPlayerSendCancel(cid, "Put your pokemon out of the pokeball.")

end

if getItemAttribute(feet.uid, "level") <= 29 then

doItemSetAttribute(feet.uid, "level", chckc +1)

setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+100)

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "You used a rare candy and you pokemon has advanced of level. Now you pokemon is level [".. getItemAttribute(feet.uid, "level") .."]!")

doRemoveItem(item.uid, 1)

else

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon has already reached the maximum level [30].")

return TRUE

 

end

end

 

*XML

<action itemid="ID DA BALINHA RARE CANDY" event="script" value="Rarecandy.lua" allowfaruse="1"/>

 

nao entendi muito bem esse system e o do br??

 

se for do br pode esquecer ele e mt ruim msm quero o do pokemon kpdo

[RodriigoRobson 110]

o do KPDO é feito pelas Sources Amigo como o Dalvorsn falou nimguem vai fazer De graça e Boa Sorte!

[zipter98 1101]

Área incorreta, tópico movido. Mais cuidado da próxima vez.