Servidor Testado:

erondino,pokemon dash v6,tfs  0.3.6

 

Servidor Nao Testado:

Pokemon Dash Advanced

 

Precisa de: Noçoes basica de script pois so irei postar a parte principal dos script, pois eu nao sei oque voces editaram nos seus scripts !

 

Bom Dia Turma, Hoje Eu Vou Postar:

Sistema de Gender System "Sexos nos Pokemons":  O Sexo dos pokemons so vai ter em seus Pokemons capturados, Boxs,nao vai ter em pokes das hunts etc..

 

Sistema Completo de "PokeLevel":  Level nos Seus Pokemons "Porem" a cada Level o Pokemon so Ganha HP Baseado no Servidor: http://pokemonbr.com/ . Pois dar força ao Summon Somente adicionando funçoes na Sources. o Sistema completo do Pokelevel vem: Rare candy,Evolution,Pokelevel

 

Intao Vamos La =)

 

Gender System:

*Primeiro antes de tudo tem que ver se no seu client tem o icone dos Sexos dos Pokemons, fazendo o comando /attr skull "Numero 1 a  4"

 

*Eu So vo postar as funçoes eu nao vou mandar o script inteiro pois eu nao sei o que voces editaram no script do catch.lua mais mesmo assim e facil de editar intao Vamos la:

 

vai em actions/catch.lua :

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

local gender = math.random(3,4) --- aki ao dar o catch em algum Pokemon ele Randomiza (Male) e (Female) pelo comando /attr skull "Numero 1 a  4"


----- Aki é a funçao de capturar o pokemon ae do seu catch system, esse script e um exemplo para eu adicionar essa funçao "doSetItemText(item, gender)"

if getPlayerFreeCap(cid) <= 0.99 then
item = doCreateItemEx(newid-1)
doItemSetAttribute(item, "poke", params.poke)
doItemSetAttribute(item, "nome", params.nome)
doSetItemText(item, gender) ------ Aki o Pokemon Ganha o Sexo,Add aki se o Pokemon capturado for para o CP
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)
doSetItemText(item, gender) ----- Aki o Pokemon Ganha o Sexo,ADD aki se o Pokemon for para a Sua Bag
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

 

Vai em actions/goback.lua:

 

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

if getItemText(item.uid) == 3 then
doCreatureSetSkullType(pk, 4)
else
doCreatureSetSkullType(pk, getItemText(item.uid))
end
end

 

Vai em actions/box.lua

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

local box = {
[1] ={msg = "You Open a Box +1",np = "Contains a Rattata.",nm= 'Rattata'},
[2] ={msg = "You Open a Box +1",np = "Contains a Weedle.",nm= 'Weedle'},
[3] ={msg = "You Open a Box +1",np = 'Contains a Caterpie.',nm= 'Caterpie'}
}
local level = 1 -- level para usar
local e = box[math.random(1,3)]
local boxid = 2222 -- id da ball que vai ser dada ao jogador
local pk = "This is "..e.nm.."'s pokeball. HP = [1/1]"
local gender = math.random(1,3)

if getPlayerLevel(cid) >= level then

if getPlayerFreeCap(cid) <= 0.99 then

b = doCreateItemEx(cid, boxid-1, 1)
doItemSetAttribute(b, "poke", pk)
doItemSetAttribute(b, "nome", "e.nm")
doItemSetAttribute(b, "description", e.np)
doSetItemText(b, gender)
doPlayerSendMailByName(getCreatureName(cid), b,1)
doRemoveItem(item.uid, 1)
doPlayerSendTextMessage(cid,22,"You Open a Poke Box 1,Good Luck You pokeball has been sent to your depot")
else
doPlayerSendTextMessage(cid,22,"You Open a Poke Box 1,You Won a "..e.nm.."")
b = doPlayerAddItem(cid, boxid, 1)
doItemSetAttribute(b, "poke", pk)
doItemSetAttribute(b, "nome", "e.nm")
doItemSetAttribute(b, "description", e.np)
doSetItemText(b, gender)
doRemoveItem(item.uid, 1)


end
else
doPlayerSendCancel(cid, "You must be at least level "..level.." to use this box.")
end
return TRUE
end

*XML: <action itemid="ID" event="script" value="box.lua"/>

 

PokeLevel System:

 

 

* Limite de Pokelevel : 30

* Para adicionar mais Level Segue esse Mini-Tutorial:

Limite de PokeLevel (30) Voce Pode adicionar quantos  Level que Quiser Exemplo de como adicionar mais level Preste Bem Atençao:

------------------------------------- level ----------------------------------------------------------------

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

return true

end

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == "Numero do Level" and getItemAttribute(feet.uid, "levell") >= 0 and getItemAttribute(feet.uid, "levell") <= 1999 "Exp Maxima que o poke precisa para Upar de Level exemplo: se o poke precisa de (2000) de exp para upar de level voce deixa (1999) sempre diminuir 1 ponto de exp" 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 "Ao ultrapassar a exp de (1999) o Pokemon upa de Level" and getItemAttribute(feet.uid, "level") == "Numero do Level" then

local tab = kkkkk[getCreatureName(target)]

if tab then

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon advanced from level "Numero do Level" to Level "Para o Proximo Level"!")

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

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

return true

end

end

----------------------------------------------

Vamo Supor que voce colocou ate o lvl 100 no final do script voce tem que adicionar isso aki:

 

if isPlayer(target) == FALSE and getItemAttribute(feet.uid, "level") == 100 then --- 100 e o Limite de Level

doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Seu Pokemon Chegou no Limite de Level")

return true

end

end

 

 

 

Cria um Arquivo , creaturescripts/Pokelevel.lua:

 

------ a Tabela abaixo e a tabela de exp que seu pokemon vai receber ficando assim:

---- ["Nome do Pokemon"] = {exp = Experiencia que seu Pokemon vai Receber},



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")

 

Troca seu look.lua creaturescripts/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

 

Vai em 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) ----- aki e o level que o pokemon novo capturado recebe no primeiro goback
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 --- numero do level
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+100) ----- quantida de hp que ganha por level
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
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

 

 

 

*Aki quando voce dar primeiro Goback no Pokemon ele recebe o Level: 1

 

actions/evolution.lua:

local fotos = {

["Shiny Gyarados"] = {fotopoke = 8716},
["Shiny Krabby"] = {fotopoke = 8713},
["Shiny Zubat"] = {fotopoke = 8710},
["Shiny Venusaur"] = {fotopoke = 8707},
["Shiny Paras"] = {fotopoke = 8709},
["Shiny Rattata"] = {fotopoke = 10567},
["Shiny Buterfree"] = {fotopoke = 8708},
["Shiny Grimer"] = {fotopoke = 8712},
["Shiny Jynx"] = {fotopoke = 8714},
["Shiny Scyther"] = {fotopoke = 8715},
["Shiny Beedrill"] = {fotopoke = 8718},
["Shiny Parasect"] = {fotopoke = 8719},
["Shiny Seadra"] = {fotopoke = 8720},
["Shiny Tentacool"] = {fotopoke = 8721},
["Shiny Muk"] = {fotopoke = 8722},
["Shiny Kingler"] = {fotopoke = 8723},
["Shiny Electabuzz"] = {fotopoke = 8724},
["Shiny Dratini"] = {fotopoke = 8725},
["Shiny Voltorb"] = {fotopoke = 8726},
["Shiny Raticate"] = {fotopoke = 8727},
["Shiny Blastoise"] = {fotopoke = 8728},
["Shiny Venonat"] = {fotopoke = 8729},
["Shiny Growlithe"] = {fotopoke = 8730},
["Shiny Tentacruel"] = {fotopoke = 8731},
["Shiny Horsea"] = {fotopoke = 8732},
["Shiny Electrode"] = {fotopoke = 8733},
["Shiny Hitmonlee"] = {fotopoke = 8734},
["Shiny Magikarp"] = {fotopoke = 8735},
["Shiny Hitmonchan"] = {fotopoke = 8736},
["Shiny Raichu"] = {fotopoke = 8737},
["Shiny Oddish"] = {fotopoke = 8738},
["Shiny Venomoth"] = {fotopoke = 8739},
["Shiny Arcanine"] = {fotopoke = 8740},
["Shiny Abra"] = {fotopoke = 8741},
["Bulbasaur"] = {fotopoke = 2385},
["Ivysaur"] = {fotopoke = 2386},
["Venusaur"] = {fotopoke = 2387},
["Charmander"] = {fotopoke = 2388},
["Charmeleon"] = {fotopoke = 2389},
["Charizard"] = {fotopoke = 2390},
["Squirtle"] = {fotopoke = 2391},
["Wartortle"] = {fotopoke = 2392},
["Blastoise"] = {fotopoke = 2393},
["Caterpie"] = {fotopoke = 2394},
["Metapod"] = {fotopoke = 2395},
["Butterfree"] = {fotopoke = 2396},
["Weedle"] = {fotopoke = 2397},
["kakuna s"] = {fotopoke = 2398},
["Beedrill"] = {fotopoke = 2399},
["Pidgey"] = {fotopoke = 2400},
["Pidgeotto"] = {fotopoke = 2401},
["Pidgeot"] = {fotopoke = 2402},
["Rattata"] = {fotopoke = 2403},
["Raticate"] = {fotopoke = 2404},
["Spearow"] = {fotopoke = 2405},
["Fearow"] = {fotopoke = 2406},
["Ekans"] = {fotopoke = 2407},
["Arbok"] = {fotopoke = 2408},
["Pikachu"] = {fotopoke = 2409},
["Raichu"] = {fotopoke = 2410},
["Sandshrew"] = {fotopoke = 2411},
["Sandslash"] = {fotopoke = 2412},
["Nidoran Female"] = {fotopoke = 2413},
["Nidorina"] = {fotopoke = 2414},
["Nidoqueen"] = {fotopoke = 2415},
["Nidoran Male"] = {fotopoke = 2416},
["Nidorino"] = {fotopoke = 2417},
["Nidoking"] = {fotopoke = 2418},
["Clefairy"] = {fotopoke = 2419},
["Clefable"] = {fotopoke = 2420},
["Vulpix"] = {fotopoke = 2421},
["Ninetales"] = {fotopoke = 2422},
["Jigglypuff"] = {fotopoke = 2423},
["Wigglytuff"] = {fotopoke = 2424},
["Zubat"] = {fotopoke = 2425},
["Golbat"] = {fotopoke = 2426},
["Oddish"] = {fotopoke = 2427},
["Gloom"] = {fotopoke = 2428},
["Vileplume"] = {fotopoke = 2429},
["Paras"] = {fotopoke = 2430},
["Parasect"] = {fotopoke = 2431},
["Venonat"] = {fotopoke = 2432},
["Venomoth"] = {fotopoke = 2433},
["Diglett"] = {fotopoke = 2434},
["Dugtrio"] = {fotopoke = 2435},
["Meowth"] = {fotopoke = 2436},
["Persian"] = {fotopoke = 2437},
["Psyduck"] = {fotopoke = 2438},
["Golduck"] = {fotopoke = 2439},
["Mankey"] = {fotopoke = 2440},
["Primeape"] = {fotopoke = 2441},
["Growlithe"] = {fotopoke = 2442},
["Arcanine"] = {fotopoke = 2443},
["Poliwag"] = {fotopoke = 2444},
["Poliwhirl"] = {fotopoke = 2445},
["Poliwrath"] = {fotopoke = 2446},
["Abra"] = {fotopoke = 2447},
["Kadabra"] = {fotopoke = 2448},
["Alakazam"] = {fotopoke = 2449},
["Machop"] = {fotopoke = 2450},
["Machoke"] = {fotopoke = 2451},
["Machamp"] = {fotopoke = 2452},
["Bellsprout"] = {fotopoke = 2453},
["Weepinbell"] = {fotopoke = 2454},
["Victreebel"] = {fotopoke = 2447},
["Tentacool"] = {fotopoke = 2208},
["Tentacruel"] = {fotopoke = 2209},
["Geodude"] = {fotopoke = 2182},
["Graveler"] = {fotopoke = 2183},
["Golem"] = {fotopoke = 2184},
["Ponyta"] = {fotopoke = 2455},
["Rapidash"] = {fotopoke = 2456},
["Slowpoke"] = {fotopoke = 2457},
["Slowbro"] = {fotopoke = 2458},
["Magnemite"] = {fotopoke = 2459},
["Magneton"] = {fotopoke = 2460},
["Farfetchd"] = {fotopoke = 2461},
["Doduo"] = {fotopoke = 2462},
["Dodrio"] = {fotopoke = 2463},
["Seel"] = {fotopoke = 2464},
["Dewgong"] = {fotopoke = 2465},
["Grimer"] = {fotopoke = 2466},
["Muk"] = {fotopoke = 2467},
["Shellder"] = {fotopoke = 2468},
["Cloyster"] = {fotopoke = 2469},
["Gastly"] = {fotopoke = 2470},
["Haunter"] = {fotopoke = 2471},
["Gengar"] = {fotopoke = 2472},
["Onix"] = {fotopoke = 2473},
["Drowzee"] = {fotopoke = 2474},
["Hypno"] = {fotopoke = 2475},
["Krabby"] = {fotopoke = 2476},
["Kingler"] = {fotopoke = 2477},
["Voltorb"] = {fotopoke = 2478},
["Electrode"] = {fotopoke = 2479},
["Exeggcute"] = {fotopoke = 2480},
["Exeggutor"] = {fotopoke = 2481},
["Cubone"] = {fotopoke = 2482},
["Marowak"] = {fotopoke = 2483},
["Hitmonlee"] = {fotopoke = 2484},
["Hitmonchan"] = {fotopoke = 2485},
["Lickitung"] = {fotopoke = 2486},
["Koffing"] = {fotopoke = 2487},
["Weezing"] = {fotopoke = 2488},
["Rhyhorn"] = {fotopoke = 2489},
["Rhydon"] = {fotopoke = 2490},
["Chansey"] = {fotopoke = 2491},
["Tangela"] = {fotopoke = 2492},
["Kangaskhan"] = {fotopoke = 2493},
["Horsea"] = {fotopoke = 2494},
["Seadra"] = {fotopoke = 2496},
["Goldeen"] = {fotopoke = 2496},
["Seaking"] = {fotopoke = 2497},
["Staryu"] = {fotopoke = 2498},
["Starmie"] = {fotopoke = 2499},
["Mr Mime"] = {fotopoke = 2500},
["Scyther"] = {fotopoke = 2501},
["Jynx"] = {fotopoke = 2502},
["Electabuzz"] = {fotopoke = 2503},
["Magmar"] = {fotopoke = 2504},
["Pinsir"] = {fotopoke = 2505},
["Tauros"] = {fotopoke = 2506},
["Magikarp"] = {fotopoke = 2507},
["Gyarados"] = {fotopoke = 2508},
["Lapras"] = {fotopoke = 2507},
["Ditto"] = {fotopoke = 2508},
["Eevee"] = {fotopoke = 2509},
["Vaporeon"] = {fotopoke = 2510},
["Jolteon"] = {fotopoke = 2511},
["Flareon"] = {fotopoke = 2508},
["Porygon"] = {fotopoke = 2509},
["Omanyte"] = {fotopoke = 2510},
["Omastar"] = {fotopoke = 2511},
["Kabuto"] = {fotopoke = 2512},
["Kabutops"] = {fotopoke = 2513},
["Aerodactyl"] = {fotopoke = 2514},
["Snorlax"] = {fotopoke = 2515},
["Articuno"] = {fotopoke = 2516},
["Zapdos"] = {fotopoke = 2517},
["Moltres"] = {fotopoke = 2518},
["Dratini"] = {fotopoke = 2519},
["Dragonair"] = {fotopoke = 2520},
["Dragonite"] = {fotopoke = 2521},
["Mewtwo"] = {fotopoke = 2522},
["Mew"] = {fotopoke = 2523},
["Elder Charizard"] = {fotopoke = 2524},
["Crystal Onix"] = {fotopoke = 2525},
}

local poken = {
["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 = 950},
["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 = 5, 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 = 15, 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 = 14, 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 = 4000},
["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 = 3000},
["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 = 2500},
["Jynx"] = {level = 65, cons = 15, vida = 3000},
["Elekid"] = {level = 30, cons = 15, vida = 1500},
["Electabuzz"] = {level = 70, cons = 15, vida = 3000},
["Shiny Electabuzz"] = {level = 70, cons = 20, vida = 4200},
["Magmar"] = {level = 70, cons = 15, vida = 2800},
["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 = 3000},
["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 = 3020},
["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 = 11000},
["Mew"] = {level = 100, cons = 15, vida = 7200},
["Elder Charizard"] = {level = 10, cons = 15, vida = 3000},
}

local pokes = {
["Bulbasaur"] = {level = 40, evolution = "Ivysaur", maxh = 2600, count = 1, Stoneid = 2293, Stoneid2 = 0},
["Ivysaur"] = {level = 85, evolution = "Venusaur", maxh = 5200, count = 2, Stoneid = 2293, Stoneid2 = 0},
["Charmander"] = {level = 40, evolution = "Charmeleon", maxh = 2300, count = 1, Stoneid = 2283, Stoneid2 = 0},
["Charmeleon"] = {level = 85, evolution = "Charizard", maxh = 4700, count = 2, Stoneid = 2283, Stoneid2 = 0},
["Squirtle"] = {level = 40, evolution = "Wartortle", maxh = 2800, count = 1, Stoneid = 2277, Stoneid2 = 0},
["Wartortle"] = {level = 85, evolution = "Blastoise", maxh = 5900, count = 2, Stoneid = 2277, Stoneid2 = 0},
["Caterpie"] = {level = 10, evolution = "Metapod", maxh = 1100, count = 1, Stoneid = 2284, Stoneid2 = 0},
["Metapod"] = {level = 30, evolution = "Butterfree", maxh = 2000, count = 2, Stoneid = 2284, Stoneid2 = 0},
["Weedle"] = {level = 10, evolution = "Kakuna", maxh = 900, count = 1, Stoneid = 2284, Stoneid2 = 0},
["Kakuna"] = {level = 30, evolution = "Beedrill", maxh = 1900, count = 2, Stoneid = 2284, Stoneid2 = 0},
["Pidgey"] = {level = 20, evolution = "Pidgeotto", maxh = 1400, count = 1, Stoneid = 2289, Stoneid2 = 0},
["Pidgeotto"] = {level = 65, evolution = "Pidgeot", maxh = 3800, count = 2, Stoneid = 2289, Stoneid2 = 0},
["Rattata"] = {level = 20, evolution = "Raticate", maxh = 900, count = 1, Stoneid = 2289, Stoneid2 = 0},
["Spearow"] = {level = 50, evolution = "Fearow", maxh = 3300, count = 2, Stoneid = 2289, Stoneid2 = 0},
["Ekans"] = {level = 30, evolution = "Arbok", maxh = 2900, count = 1, Stoneid = 2278, Stoneid2 = 0},
["Pikachu"] = {level = 50, evolution = "Raichu", maxh = 3200, count = 2, Stoneid = 2279, Stoneid2 = 0},
["Sandshrew"] = {level = 55, evolution = "Sandslash", maxh = 3400, count = 2, Stoneid = 2287, Stoneid2 = 0},
["Nidoran Female"] = {level = 25, evolution = "Nidorina", maxh = 2000, count = 1, Stoneid = 2278, Stoneid2 = 0},
["Nidorina"] = {level = 65, evolution = "Nidoqueen", maxh = 4200, count = 1, Stoneid = 2278, Stoneid2 = 2287},
["Nidoran Male"] = {level = 25, evolution = "Nidorino", maxh = 2500, count = 1, Stoneid = 2278, Stoneid2 = 0},
["Nidorino"] = {level = 65, evolution = "Nidoking", maxh = 4800, count = 1, Stoneid = 2278, Stoneid2 = 2287},
["Clefairy"] = {level = 35, evolution = "Clefable", maxh = 2400, count = 1, Stoneid = 2289, Stoneid2 = 0},
["Vulpix"] = {level = 65, evolution = "Ninetales", maxh = 3400, count = 2, Stoneid = 2283, Stoneid2 = 0},
["Jigglypuff"] = {level = 42, evolution = "Wigglytuff", maxh = 2900, count = 1, Stoneid = 2289, Stoneid2 = 0},
["Zubat"] = {level = 30, evolution = "Golbat", maxh = 1900, count = 1, Stoneid = 2278, Stoneid2 = 0},
["Oddish"] = {level = 18, evolution = "Gloom", maxh = 1400, count = 1, Stoneid = 2293, Stoneid2 = 0},
["Gloom"] = {level = 50, evolution = "Vileplume", maxh = 3300, count = 1, Stoneid = 2293, Stoneid2 = 2278},
["Paras"] = {level = 50, evolution = "Parasect", maxh = 3800, count = 2, Stoneid = 2284, Stoneid2 = 0},
["Venonat"] = {level = 50, evolution = "Venomoth", maxh = 3850, count = 1, Stoneid = 2284, Stoneid2 = 2278},
["Diglett"] = {level = 35, evolution = "Dugtrio", maxh = 3450, count = 1, Stoneid = 2287, Stoneid2 = 0},
["Meowth"] = {level = 25, evolution = "Persian", maxh = 2250, count = 1, Stoneid = 2289, Stoneid2 = 0},
["Psyduck"] = {level = 55, evolution = "Golduck", maxh = 4000, count = 1, Stoneid = 2277, Stoneid2 = 2288},
["Mankey"] = {level = 45, evolution = "Primeape", maxh = 4500, count = 1, Stoneid = 2287, Stoneid2 = 0},
["Growlithe"] = {level = 80, evolution = "Arcanine", maxh = 6800, count = 2, Stoneid = 2283, Stoneid2 = 0},
["Poliwag"] = {level = 20, evolution = "Poliwhirl", maxh = 1200, count = 1, Stoneid = 2277, Stoneid2 = 0},
["Poliwhirl"] = {level = 65, evolution = "Poliwrath", maxh = 4400, count = 1, Stoneid = 2277, Stoneid2 = 2281},
["Abra"] = {level = 50, evolution = "Kadabra", maxh = 3600, count = 1, Stoneid = 2288, Stoneid2 = 0},
["Kadabra"] = {level = 80, evolution = "Alakazam", maxh = 7000, count = 2, Stoneid = 2288, Stoneid2 = 0},
["Machop"] = {level = 40, evolution = "Machoke", maxh = 3500, count = 1, Stoneid = 2281, Stoneid2 = 0},
["Machoke"] = {level = 65, evolution = "Machamp", maxh = 7500, count = 2, Stoneid = 2281, Stoneid2 = 0},
["Bellsprout"] = {level = 18, evolution = "Weepinbell", maxh = 1100, count = 1, Stoneid = 2293, Stoneid2 = 0},
["Weepinbell"] = {level = 50, evolution = "Victreebel", maxh = 4000, count = 2, Stoneid = 2293, Stoneid2 = 0},
["Tentacool"] = {level = 70, evolution = "Tentacruel", maxh = 7050, count = 1, Stoneid = 2277, Stoneid2 = 2278},
["Geodude"] = {level = 40, evolution = "Graveler", maxh = 3000, count = 1, Stoneid = 2280, Stoneid2 = 0},
["Graveler"] = {level = 70, evolution = "Golem", maxh = 6500, count = 2, Stoneid = 2280, Stoneid2 = 0},
["Ponyta"] = {level = 60, evolution = "Rapidash", maxh = 5500, count = 1, Stoneid = 2283, Stoneid2 = 0},
["Slowpoke"] = {level = 45, evolution = "Slowbro", maxh = 4600, count = 1, Stoneid = 2288, Stoneid2 = 0},
["Magnemite"] = {level = 35, evolution = "Magneton", maxh = 1750, count = 1, Stoneid = 2279, Stoneid2 = 0},
["Doduo"] = {level = 45, evolution = "Dodrio", maxh = 2650, count = 1, Stoneid = 2289, Stoneid2 = 0},
["Seel"] = {level = 65, evolution = "Dewgong", maxh = 5200, count = 1, Stoneid = 2277, Stoneid2 = 2290},
["Grimer"] = {level = 30, evolution = "Muk", maxh = 2400, count = 1, Stoneid = 2278, Stoneid2 = 0},
["Shellder"] = {level = 65, evolution = "Cloyster", maxh = 5000, count = 2, Stoneid = 2290, Stoneid2 = 0},
["Gastly"] = {level = 45, evolution = "Haunter", maxh = 3000, count = 1, Stoneid = 2286, Stoneid2 = 0},
["Haunter"] = {level = 80, evolution = "Gengar", maxh = 7000, count = 2, Stoneid = 2286, Stoneid2 = 0},
["Drowzee"] = {level = 50, evolution = "Hypno", maxh = 4600, count = 2, Stoneid = 2288, Stoneid2 = 0},
["Krabby"] = {level = 35, evolution = "Kingler", maxh = 3250, count = 1, Stoneid = 2277, Stoneid2 = 0},
["Voltorb"] = {level = 38, evolution = "Electrode", maxh = 2000, count = 1, Stoneid = 2279, Stoneid2 = 0},
["Exeggcute"] = {level = 48, evolution = "Exeggcutor", maxh = 4000, count = 1, Stoneid = 2293, Stoneid2 = 2288},
["Cubone"] = {level = 45, evolution = "Marowak", maxh = 3900, count = 2, Stoneid = 2287, Stoneid2 = 0},
["Koffing"] = {level = 30, evolution = "Weezing", maxh = 2800, count = 1, Stoneid = 2278, Stoneid2 = 0},
["Rhyhorn"] = {level = 65, evolution = "Rhydon", maxh = 7000, count = 2, Stoneid = 2280, Stoneid2 = 0},
["Horsea"] = {level = 45, evolution = "Seadra", maxh = 2500, count = 1, Stoneid = 2277, Stoneid2 = 0},
["Goldeen"] = {level = 25, evolution = "Seaking", maxh = 2000, count = 1, Stoneid = 2277, Stoneid2 = 0},
["Staryu"] = {level = 45, evolution = "Starmie", maxh = 3800, count = 1, Stoneid = 2277, Stoneid2 = 0},
["Magikarp"] = {level = 75, evolution = "Gyarados", maxh = 7800, count = 1, Stoneid = 2277, Stoneid2 = 2285},
["Omanyte"] = {level = 70, evolution = "Omastar", maxh = 6000, count = 1, Stoneid = 2277, Stoneid2 = 2285},
["Kabuto"] = {level = 70, evolution = "Kabutops", maxh = 6500, count = 1, Stoneid = 2277, Stoneid2 = 2285},
["Eevee"] = {level = 55, evolution = "Vaporeon", maxh = 6500, count = 1, Stoneid = 2277, Stoneid2 = 0},
["Eevee"] = {level = 55, evolution = "Jolteon", maxh = 6500, count = 1, Stoneid = 2279, Stoneid2 = 0},
["Eevee"] = {level = 55, evolution = "Flareon", maxh = 6500, count = 1, Stoneid = 2283, Stoneid2 = 0},
["Dratini"] = {level = 70, evolution = "Dragonair", maxh = 5600, count = 1, Stoneid = 2285, Stoneid2 = 0},
["Dragonair"] = {level = 100, evolution = "Dragonite", maxh = 10800, count = 2, Stoneid = 2285, Stoneid2 = 0},
}

local types = {
["Leaf"] = {itemid = 2293, "Bulbasaur", "Ivysaur", "Oddish", "Gloom", "Bellsprout", "Weepinbell", "Exeggcute"},
["Water"] = {itemid = 2277, "Squirtle", "Wartortle", "Horsea", "Goldeen", "Magikarp", "Psyduck", "Poliwag", "Poliwhirl", "Tentacool", "Krabby", "Staryu", "Omanyte", "Eevee"},
["Venom"] = {itemid = 2278, "Zubat", "Ekans", "Nidoran male", "Nidoran female", "Nidorino", "Nidorina", "Gloom", "Venonat", "Tentacool", "Grimer", "Koffing"},
["Thunder"] = {itemid = 2279, "Magnemite", "Pikachu", "Voltorb", "Eevee", "Elekid"},
["Rock"] = {itemid = 2280, "Geodude", "Graveler", "Rhyhorn", "Kabuto"},
["Punch"] = {itemid = 2281, "Machop", "Machoke", "Mankey", "Poliwhirl"},
["Fire"] = {itemid = 2283, "Charmander", "Charmeleon", "Vulpix", "Growlithe", "Ponyta", "Eevee"},
["Coccon"] = {itemid = 2284, "Caterpie", "Metapod", "Weedle", "Kakuna", "Paras", "Venonat", "Dragon Lord"},
["Crystal"] = {itemid = 2285, "Dratini", "Dragonair", "Magikarp", "Omanyte", "Kabuto"},
["Darkness"] = {itemid = 2286, "Gastly", "Haunter"},
["Earth"] = {itemid = 2287, "Cubone", "Sandshrew", "Nidorino", "Nidorina", "Diglett"},
["Enigma"] = {itemid = 2288, "Abra", "Kadabra", "Psyduck", "Slowpoke", "Drowzee"},
["Heart"] = {itemid = 2289, "Rattata", "Pidgey", "Pidgeotto", "Spearow", "Clefairy", "Jigglypuff", "Meowth", "Doduo"},
["Ice"] = {itemid = 2290, "Seel", "Shellder"},
}

local eevee = {'2277', '2279', '2283'}
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 getCreatureName(item2.uid) == "Eevee" then
if item.itemid == 2279 then
if getPlayerLevel(cid) < 55 then
return doPlayerSendCancel(cid, "Sorry, you don't have the Needed Level to evolve this pokemon (55).")
end
local pokeball = getPlayerSlotItem(cid, 8)
doItemSetAttribute(pokeball.uid, "poke", "This is Jolteon's pokeball. HP = [100/100]")
doItemSetAttribute(pokeball.uid, "description", "Contains a Jolteon.")
doPlayerSendTextMessage(cid, 27, "Congratulations! Your "..getCreatureName(item2.uid).." evolved into a Jolteon!")
doSendMagicEffect(topos, 18)
doTransformItem(getPlayerSlotItem(cid, 7).uid, 2511)
doSendMagicEffect(getThingPos(cid), 173)
local oldpos = getThingPos(item2.uid)
doRemoveCreature(item2.uid)
doSummonMonster(cid, "Jolteon")
local pk = getCreatureSummons(cid)[1]
registerCreatureEvent(pk, "DiePoke")
registerCreatureEvent(pk, "Exp")
doTeleportThing(pk, oldpos, false)
doCreatureSetLookDir(pk, 2)
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk) + (poken[getCreatureName(pk)].cons * getPlayerLevel(cid)))
doCreatureAddHealth(pk, getCreatureMaxHealth(pk))
setPlayerStorageValue(cid, 2, 0)
doPlayerRemoveItem(cid, item.itemid, 1)
elseif item.itemid == 2277 then
if getPlayerLevel(cid) < 55 then
return doPlayerSendCancel(cid, "Sorry, you don't have the Needed Level to evolve this pokemon (55).")
end
local pokeball = getPlayerSlotItem(cid, 8)
doItemSetAttribute(pokeball.uid, "poke", "This is Vaporeon's pokeball. HP = [100/100]")
doItemSetAttribute(pokeball.uid, "description", "Contains a Vaporeon.")
doPlayerSendTextMessage(cid, 27, "Congratulations! Your "..getCreatureName(item2.uid).." evolved into a Vaporeon!")
doSendMagicEffect(topos, 18)
doTransformItem(getPlayerSlotItem(cid, 7).uid, 2510)
doSendMagicEffect(getThingPos(cid), 173)
local oldpos = getThingPos(item2.uid)
doRemoveCreature(item2.uid)
doSummonMonster(cid, "Vaporeon")
local pk = getCreatureSummons(cid)[1]
registerCreatureEvent(pk, "DiePoke")
registerCreatureEvent(pk, "Exp")
doTeleportThing(pk, oldpos, false)
doCreatureSetLookDir(pk, 2)
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk) + (poken[getCreatureName(pk)].cons * getPlayerLevel(cid)))
doCreatureAddHealth(pk, getCreatureMaxHealth(pk))
setPlayerStorageValue(cid, 2, 0)
doPlayerRemoveItem(cid, item.itemid, 1)
elseif item.itemid == 2283 then
if getPlayerLevel(cid) < 55 then
return doPlayerSendCancel(cid, "Sorry, you don't have the Needed Level to evolve this pokemon (55).")
end
local pokeball = getPlayerSlotItem(cid, 8)
doItemSetAttribute(pokeball.uid, "poke", "This is Flareon's pokeball. HP = [100/100]")
doItemSetAttribute(pokeball.uid, "description", "Contains a Flareon.")
doPlayerSendTextMessage(cid, 27, "Congratulations! Your "..getCreatureName(item2.uid).." evolved into a Flareon!")
doSendMagicEffect(topos, 18)
doTransformItem(getPlayerSlotItem(cid, 7).uid, 2512)
doSendMagicEffect(getThingPos(cid), 173)
local oldpos = getThingPos(item2.uid)
doRemoveCreature(item2.uid)
doSummonMonster(cid, "Flareon")
local pk = getCreatureSummons(cid)[1]
registerCreatureEvent(pk, "DiePoke")
registerCreatureEvent(pk, "Exp")
doTeleportThing(pk, oldpos, false)
doCreatureSetLookDir(pk, 2)
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk) + (poken[getCreatureName(pk)].cons * getPlayerLevel(cid)))
doCreatureAddHealth(pk, getCreatureMaxHealth(pk))
setPlayerStorageValue(cid, 2, 0)
doPlayerRemoveItem(cid, item.itemid, 1)
end
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
return true
end

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 Needed 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.."!")
doSendMagicEffect(topos, 18)
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)
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk) + (poken[getCreatureName(pk)].cons * getPlayerLevel(cid)))
doCreatureAddHealth(pk, getCreatureMaxHealth(pk))
doPlayerRemoveItem(cid, stnid, count)
doPlayerRemoveItem(cid, stnid2, count)
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
return TRUE
end

 

*Exemplo de Evoluçao:

["Bulbasaur"] = {level = 40, evolution = "Ivysaur", maxh = 2600, count = 1, Stoneid = 2293, Stoneid2 = 0},

["Nome do Pokemon"] ={level = "level que precisa para Evoluir" , evolution = "Nome do Pokemon",maxh ="o Max de Hp que vai ter",count = "quantidade de stone",Stoneid = "Id da Stone", Stoneid2 = "id da stone 2"},

 

vai em Actions/Rarecandy.lua

 

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

local feet = getPlayerSlotItem(cid, CONST_SLOT_FEET)

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





local pk = getCreatureSummons(cid)[1]
local chckc = getItemAttribute(feet.uid, "level")
local lvl = getItemAttribute(feet.uid, "level")


if not isPlayer(getCreatureMaster(itemEx.uid)) then
return doPlayerSendCancel(cid, "You cant use rare candys on wild pokemons.")
end

if not isCreature(itemEx.uid) then
return doPlayerSendCancel(cid, "You can only use rare candys on pokemons!")
end

if isPlayer(itemEx.uid) then
return doPlayerSendCancel(cid, "You can only use rare candys on pokemons!")
end

if getItemAttribute(feet.uid, "level") <= 29 then
doItemSetAttribute(feet.uid, "level", chckc +1)
setCreatureMaxHealth(pk, getCreatureMaxHealth(pk)+100)
doPlayerSendTextMessage(cid, 22, "Your "..getCreatureName(itemEx.uid).." advanced from Level ".. getItemAttribute(feet.uid, "level")-1 .." to Level ".. getItemAttribute(feet.uid, "level")..".")
doItemSetAttribute(feet.uid, "levell", 0)
doItemSetAttribute(feet.uid, "description", "This ball carries a "..e.nm.." "..getItemAttribute(feet.uid, "poke"):sub(9, findLetter(getItemAttribute(feet.uid, "poke"), "'")-1).." (level "..getItemAttribute(feet.uid, "level")..").")
doRemoveItem(item.uid, 1)
else
doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_1, "Your pokemon already is in maximum level.")
return TRUE

end
end

 

*XML: <action itemid="ID" allowfaruse="1" event="script" value="Rarecandy.lua"/>

 

 

 

 

 

 

 

 

 

 

 

 

Vlw man estava precisando continue trazendo novidades 

Obrigado por compartilhar, reputado.

Oque eu crio para colocar o LVL System ? Eu coloco onde ? ...

O sistema do Level system foi testado em PDA sem level system?

reputado.

Editado Setembro 26, 2014 10 anos por AnnaFeeh (veja o histórico de edições)