Script Pokémon Inicial

local starterpokes = {
["Charmander"] = {x = 762, y = 659, z = 7},
["Squirtle"] = {x = 762, y = 661, z = 7},
["Bulbasaur"] = {x = 762, y = 663, z = 7},
}

local level = 5
local extrastr = 1.5
local btype = "normal"

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

    if getPlayerLevel(cid) > 10 then
    return true
    end

    local pokemon = ""

    for a, b in pairs (starterpokes) do
        if isPosEqualPos(topos, b) then
            pokemon = a
        end
    end

    if pokemon == "" then return true end
    
    if getPlayerStorageValue(cid, 9658754) ~= 1 then              --alterado v2.7 -opicional-
       sendMsgToPlayer(cid, 27, "Talk to the Prof. Robert to choose your beginner city first!")
       return true
    end

    local gender = getRandomGenderByName(pokemon)

    local mypoke = getPokemonStatus(pokemon)

        if not mypoke then return true end

    local offense = mypoke.off * level * extrastr
    local defense = mypoke.def * level * extrastr
    local speed = mypoke.agi * level * extrastr
    local vit = mypoke.vit * level * extrastr
    local spatk = mypoke.spatk * level * extrastr
    local happy = 180
    local leveltable = getPokemonExperienceTable(pokemon)

    doPlayerAddItem(cid, 2160, 2)
    doPlayerAddItem(cid, 2392, 50)
    doPlayerAddItem(cid, 2394, 100)
    doPlayerAddItem(cid, 12344, 20)
    
    local balls = doPlayerAddItem(cid, 2394, 10)

    local item = doCreateItemEx(2219)
        doItemSetAttribute(item, "poke", pokemon)
        doItemSetAttribute(item, "hp", 1)
        doItemSetAttribute(item, "level", level)
        doItemSetAttribute(item, "exp", leveltable[level])
        doItemSetAttribute(item, "nextlevelexp", leveltable[level+1] - leveltable[level])
        doItemSetAttribute(item, "offense", offense)
        doItemSetAttribute(item, "defense", defense)
        doItemSetAttribute(item, "speed", speed)
        doItemSetAttribute(item, "vitality", vit)
        doItemSetAttribute(item, "specialattack", spatk)
        doItemSetAttribute(item, "happy", happy)
        doItemSetAttribute(item, "gender", gender)
        doItemSetAttribute(item, "description", "Contains a "..pokemon..".")
        doItemSetAttribute(item, "fakedesc", "Contains a "..pokemon..".")
    doPlayerAddItemEx(cid, item, true)

    doTransformItem(item, pokeballs[btype].on)

    doPlayerSendTextMessage(cid, 27, "Você achou um novo pokemon, boa jornada.")
    doPlayerSendTextMessage(cid, 27, "Não esqueca de usar a pokedex neste novo pokemon.")
    
    doSendMagicEffect(getThingPos(cid), 29)
    doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
    doSendMagicEffect(getThingPos(cid), 27)
    doSendMagicEffect(getThingPos(cid), 29)
    

return TRUE
end