Added class GameStats, added Pokédex records for eggs seen and expanded seen_forms to include shinies

Data/Scripts/012_Overworld/006_Overworld_BerryPlants.rb

@@ -412,6 +412,7 @@ def pbBerryPlant
       berry = screen.pbChooseItemScreen(Proc.new { |item| GameData::Item.get(item).is_berry? })
     }
     if berry
+      $stats.berries_planted += 1
       berry_plant.plant(berry)
       $bag.remove(berry)
       if Settings::NEW_BERRY_PLANTS
@@ -441,6 +442,10 @@ def pbPickBerry(berry, qty = 1)
     pbMessage(_INTL("Too bad...\nThe Bag is full..."))
     return false
   end
+  $stats.berry_plants_picked += 1
+  if qty >= GameData::BerryPlant.get(@berry_id).maximum_yield
+    $stats.max_yield_berry_plants += 1
+  end
   $bag.add(berry, qty)
   if qty > 1
     pbMessage(_INTL("You picked the {1} \\c[1]{2}\\c[0].\\wtnp[30]", qty, berry_name))