Better format in credits

Data/Scripts/011_Battle/006_Other battle types/002_PokeBattle_SafariZone.rb

@@ -478,7 +478,7 @@ class PokeBattle_SafariZone
           if @ballCount<=0
             pbDisplay(_INTL("PA: You have no Safari Balls left! Game over!"))
             @decision = 2
-          elsif pbRandom(100)<5*escapeFactor
+          elsif can_escape(pkmn, escapeFactor)
             pbSEPlay("Battle flee")
             pbDisplay(_INTL("{1} fled!",pkmn.name))
             @decision = 3
@@ -503,3 +503,9 @@ class PokeBattle_SafariZone
     return @decision
   end
 end
+
+def can_escape(pokemon, escapeFactor)
+  return false if pokemon.shiny?
+  return false if pokemon.species == :VOLCARONA
+  return pbRandom(100)<5*escapeFactor
+end