vermillion city fan club random pokemon

Data/Scripts/003_Game processing/002_Scene_Map.rb

@@ -95,11 +95,11 @@ class Scene_Map
 
     $game_player.straighten
     $game_map.update
-    disposeSpritesets
+    #disposeSpritesets
     if RPG::Cache.need_clearing
       RPG::Cache.clear
     end
-    createSpritesets
+    #createSpritesets
     if $game_temp.transition_processing
       $game_temp.transition_processing = false
       Graphics.transition(20)

Data/Scripts/050_AddOns/BattleLounge.rb

@@ -186,12 +186,12 @@ def generateRandomFusionFromPokemon(dexNum, onlyCustomSprites = false, allowLege
   return speciesList.sample
 end
 
-def getRandomBasePokemon(includeLegendaries = false)
+def getRandomBasePokemon(includeLegendaries = false,maxNb=NB_POKEMON)
   legendaries =listLegendaryPokemonIds()
-  poke = rand(NB_POKEMON + 1)
+  poke = rand(maxNb + 1)
   return poke if includeLegendaries
   while legendaries.include?(poke)
-    poke = rand(NB_POKEMON + 1)
+    poke = rand(maxNb + 1)
   end
   return poke
 end

PBS/items.txt

@@ -603,7 +603,7 @@
 595,GOLDRING,Gold Ring,Gold Rings,1,20000,A ring made out of gold. It sells for a high price.,0,0,0,
 596,SEADRAFIN,Seadra Fin,Seadra Fins,1,14200,The dorsal fin of Seadra that is used as an ingredient in some medicine. It sells for a high price.,0,0,0,
 597,SACREDPOTION,Secret Potion,Secret Potions,2,7000,"An ancient, secret medicine. It fully revives all fainted Pokémon in a battle.",2,0,0,
-598,ABILITYCAPSULE,Ability Capsule,Ability Capsules,1,25000,"A capsule that allows a Pokémon with two Abilities to switch between these Abilities when it is used.",1,0,0,
+598,ABILITYCAPSULE,Ability Capsule,Ability Capsules,1,9500,"A capsule that allows a Pokémon with two Abilities to switch between these Abilities when it is used.",1,0,0,
 599,MAGICBOOTS,Magic Boots,Magic Boots,8,0,"A pair of magic boots that allow you to walk anywhere by pressing the CTRL key.",2,0,6,
 600,ANCIENTSTONE,unknown_item,unknown_items,1,1,This item has been removed from the game.,1,0,7,
 601,ICESTONE,Ice Stone,Ice Stones,1,5000,A peculiar stone that makes certain species of Pokémon evolve. It is made out of ice.,1,0,7,

PBS/trainers.txt

@@ -644,7 +644,7 @@ Pokemon = B26H52,34 #Meowchu
 
 [CUEBALL,Isaiah]
 Pokemon = MACHOP,34 #GEOCHOP
-Pokemon = B68H76,34 #GOLCHAMP
+Pokemon = B67H25,34 #machoke + pikachu
 ##############################
 
 [BIKER,Virgil]
@@ -1853,11 +1853,11 @@ Pokemon = B24H42,38
 #Rocket bully
 
 [TEAMROCKET_M,Cyrus]
-Pokemon = B141H105,39 
+Pokemon = B110H20,39 #Weezing + raticate
 #########################
 
 [TEAMROCKET_F,Sam]
-Pokemon = B139H97,39 
+Pokemon = B51H24,39		#Dugtrio + arbok 
 ########################
 
 ##########################