[whtmn]

PHP Code:

name = "Leveling in Vro hoenn"
author = "whtmn"
description= [[Start in pokecenter in pokemon league hoenn.]]
movesNotToForget = {""} --add moves here
mounts= { ""}

rectanglesCount = 4
rectangles = {
    {42, 5, 44, 6}, 
    {42, 7, 44, 8}, 
    {41, 5, 42, 6}, 
    {43, 5, 44, 7}  
}

selectedRectangle = 0

function onStart()
    selectRandomRectangle()
    for _, mountName in ipairs(mounts) do
        if hasItem(mountName) then
            setMount(mountName)
            break
        end
    end
end

function onPathAction()
   if isPokemonUsable(1) then
       if getMapName() == "Pokemon League Hoenn" then
            moveToCell(10, 28)
       elseif getMapName() == "Ever Grande City" then
            moveToCell(30, 34)
       elseif getMapName() == "Victory Road Hoenn 1F" then 
            moveToRectangle(
            rectangles[selectedRectangle][1],
            rectangles[selectedRectangle][2],
            rectangles[selectedRectangle][3],
            rectangles[selectedRectangle][4]
            )
       end
   else
       if getMapName() == "Victory Road Hoenn 1F" then
           moveToCell(46, 10)
       elseif getMapName() == "Ever Grande City" then
           moveToCell(30, 9)
       elseif getMapName() == "Pokemon League Hoenn" then
           talkToNpcOnCell(4, 22)
       end
   end
end

function onBattleAction()
   if isWildBattle() and ( isOpponentShiny() ) then
       if useItem("Ultra Ball") or useItem("Great Ball") or useItem("Pokeball") then
           return
       end
   end
   if getActivePokemonNumber() == 1 then
       return attack() or run() or sendUsablePokemon() or sendAnyPokemon()
   else
       return run() or attack() or sendUsablePokemon() or sendAnyPokemon()
   end
end
function onLearningMove(moveName, pokemonIndex)
   forgetAnyMoveExcept(movesNotToForget)
end 

function onBattleMessage(message)
    -- Switch rectangle after each battle.
    if stringContains(message, "you have won") then
        selectRandomRectangle()
    end
end

function selectRandomRectangle()
    selectedRectangle = math.random(1, rectanglesCount)
    log("Using rectangle " .. selectedRectangle .. ".")
end