Events.onWildPokemonCreate+=proc {|sender,e|
pokemon=e[0]
if $game_switches[X] && $game_map.map_id == X
proba = rand(10)
if proba <3
newspecies = PBSpecies::RATTATA
elsif proba >=3 && proba <6
newspecies = PBSpecies::CATERPIE
elsif probal >=6 && proba <8
newspecies = PBSpecies::PIDGEY
else
newspecies = PBSpecies::SPEAROW
end
pokemon.species = newspecies
pokemon.level = 5 + rand(3)
pokemon.name = PBSpecies.getName(newspecies)
pokemon.resetMoves
pokemon.calcStats
end
}