Removed the player's ability to change the font

Data/Scripts/001_Settings.rb

@@ -391,14 +391,6 @@ module Settings
     "choice 27",
     "choice 28"
   ]
-
-  # Available fonts, as selectable in the Options Screen.
-  FONT_OPTIONS = [
-    "Power Green",
-    "Power Red and Blue",
-    "Power Red and Green",
-    "Power Clear"
-  ]
 end
 
 # DO NOT EDIT THESE!

Data/Scripts/002_Save data/005_Game_SaveConversions.rb

@@ -23,7 +23,6 @@ SaveData.register_conversion(:v19_convert_PokemonSystem) do
     new_system.battlestyle = save_data[:pokemon_system].battlestyle || new_system.battlestyle
     new_system.frame       = save_data[:pokemon_system].frame || new_system.frame
     new_system.textskin    = save_data[:pokemon_system].textskin || new_system.textskin
-    new_system.font        = save_data[:pokemon_system].font || new_system.font
     new_system.screensize  = save_data[:pokemon_system].screensize || new_system.screensize
     new_system.language    = save_data[:pokemon_system].language || new_system.language
     new_system.runstyle    = save_data[:pokemon_system].runstyle || new_system.runstyle

Data/Scripts/007_Objects and windows/002_MessageConfig.rb

@@ -1,43 +1,27 @@
 module MessageConfig
-  WindowOpacity   = 255
+  LIGHT_TEXT_MAIN_COLOR   = Color.new(248, 248, 248)
-  TextSpeed       = nil   # can be positive to wait frames or negative to
+  LIGHT_TEXT_SHADOW_COLOR = Color.new(72, 80, 88)
-                          # show multiple characters in a single frame
+  DARK_TEXT_MAIN_COLOR    = Color.new(80, 80, 88)
+  DARK_TEXT_SHADOW_COLOR  = Color.new(160, 160, 168)
+  FONT_NAME               = "Power Green"
+  FONT_SIZE               = 29
+  SMALL_FONT_NAME         = "Power Green Small"
+  SMALL_FONT_SIZE         = 25
+  NARROW_FONT_NAME        = "Power Green Narrow"
+  NARROW_FONT_SIZE        = 29
   # 0 = Pause cursor is displayed at end of text
   # 1 = Pause cursor is displayed at bottom right
   # 2 = Pause cursor is displayed at lower middle side
-  CURSORMODE      = 1
+  CURSOR_POSITION         = 1
-  LIGHTTEXTBASE   = Color.new(248,248,248)
+  WINDOW_OPACITY          = 255
-  LIGHTTEXTSHADOW = Color.new(72,80,88)
+  TEXT_SPEED              = nil   # can be positive to wait frames or negative to
-  DARKTEXTBASE    = Color.new(80,80,88)
+                                  # show multiple characters in a single frame
-  DARKTEXTSHADOW  = Color.new(160,160,168)
-  FontSubstitutes = {
-     "Power Red and Blue"  => "Pokemon RS",
-     "Power Red and Green" => "Pokemon FireLeaf",
-     "Power Green"         => "Pokemon Emerald",
-     "Power Green Narrow"  => "Pokemon Emerald Narrow",
-     "Power Green Small"   => "Pokemon Emerald Small",
-     "Power Clear"         => "Pokemon DP"
-  }
   @@systemFrame     = nil
   @@defaultTextSkin = nil
-  @@systemFont      = nil
   @@textSpeed       = nil
-
+  @@systemFont      = nil
-  def self.pbTryFonts(*args)
+  @@smallFont       = nil
-    for a in args
+  @@narrowFont      = nil
-      if a && a.is_a?(String)
-        return a if Font.exist?(a)
-        a=MessageConfig::FontSubstitutes[a] || a
-        return a if Font.exist?(a)
-      elsif a && a.is_a?(Array)
-        for aa in a
-          ret=MessageConfig.pbTryFonts(aa)
-          return ret if ret!=""
-        end
-      end
-    end
-    return ""
-  end
 
   def self.pbDefaultSystemFrame
     if $PokemonSystem
@@ -55,27 +39,6 @@ module MessageConfig
     end
   end
 
-  def self.pbDefaultSystemFontName
-    if $PokemonSystem
-      return MessageConfig.pbTryFonts(Settings::FONT_OPTIONS[$PokemonSystem.font], "Arial Narrow", "Arial")
-    else
-      return MessageConfig.pbTryFonts(Settings::FONT_OPTIONS[0], "Arial Narrow", "Arial")
-    end
-  end
-
-  def self.pbDefaultTextSpeed
-    return ($PokemonSystem) ? pbSettingToTextSpeed($PokemonSystem.textspeed) : pbSettingToTextSpeed(nil)
-  end
-
-  def self.pbSettingToTextSpeed(speed)
-    case speed
-    when 0 then return 2
-    when 1 then return 1
-    when 2 then return -2
-    end
-    return TextSpeed || 1
-  end
-
   def self.pbDefaultWindowskin
     skin=($data_system) ? $data_system.windowskin_name : nil
     if skin && skin!=""
@@ -104,16 +67,6 @@ module MessageConfig
     return @@defaultTextSkin
   end
 
-  def self.pbGetSystemFontName
-    @@systemFont=pbDefaultSystemFontName if !@@systemFont
-    return @@systemFont
-  end
-
-  def self.pbGetTextSpeed
-    @@textSpeed=pbDefaultTextSpeed if !@@textSpeed
-    return @@textSpeed
-  end
-
   def self.pbSetSystemFrame(value)
     @@systemFrame=pbResolveBitmap(value) || ""
   end
@@ -122,13 +75,88 @@ module MessageConfig
     @@defaultTextSkin=pbResolveBitmap(value) || ""
   end
 
-  def self.pbSetSystemFontName(value)
+  #-----------------------------------------------------------------------------
-    @@systemFont=MessageConfig.pbTryFonts([value],"Arial Narrow","Arial")
+
+  def self.pbDefaultTextSpeed
+    return ($PokemonSystem) ? pbSettingToTextSpeed($PokemonSystem.textspeed) : pbSettingToTextSpeed(nil)
+  end
+
+  def self.pbGetTextSpeed
+    @@textSpeed=pbDefaultTextSpeed if !@@textSpeed
+    return @@textSpeed
   end
 
   def self.pbSetTextSpeed(value)
     @@textSpeed=value
   end
+
+  def self.pbSettingToTextSpeed(speed)
+    case speed
+    when 0 then return 2
+    when 1 then return 1
+    when 2 then return -2
+    end
+    return TEXT_SPEED || 1
+  end
+
+  #-----------------------------------------------------------------------------
+
+  def self.pbDefaultSystemFontName
+    return MessageConfig.pbTryFonts(FONT_NAME, "Arial Narrow", "Arial")
+  end
+
+  def self.pbDefaultSmallFontName
+    return MessageConfig.pbTryFonts(SMALL_FONT_NAME, "Arial Narrow", "Arial")
+  end
+
+  def self.pbDefaultNarrowFontName
+    return MessageConfig.pbTryFonts(NARROW_FONT_NAME, "Arial Narrow", "Arial")
+  end
+
+  def self.pbGetSystemFontName
+    @@systemFont = pbDefaultSystemFontName if !@@systemFont
+    return @@systemFont
+  end
+
+  def self.pbGetSmallFontName
+    @@smallFont = pbDefaultSmallFontName if !@@smallFont
+    return @@smallFont
+  end
+
+  def self.pbGetNarrowFontName
+    @@narrowFont = pbDefaultNarrowFontName if !@@narrowFont
+    return @@narrowFont
+  end
+
+  def self.pbSetSystemFontName(value)
+    @@systemFont = MessageConfig.pbTryFonts(value)
+    @@systemFont = MessageConfig.pbDefaultSystemFontName if @@systemFont == ""
+  end
+
+  def self.pbSetSmallFontName(value)
+    @@smallFont = MessageConfig.pbTryFonts(value)
+    @@smallFont = MessageConfig.pbDefaultSmallFontName if @@smallFont == ""
+  end
+
+  def self.pbSetNarrowFontName(value)
+    @@narrowFont = MessageConfig.pbTryFonts(value)
+    @@narrowFont = MessageConfig.pbDefaultNarrowFontName if @@narrowFont == ""
+  end
+
+  def self.pbTryFonts(*args)
+    for a in args
+      next if !a
+      if a.is_a?(String)
+        return a if Font.exist?(a)
+      elsif a.is_a?(Array)
+        for aa in a
+          ret = MessageConfig.pbTryFonts(aa)
+          return ret if ret != ""
+        end
+      end
+    end
+    return ""
+  end
 end
 
 
@@ -314,17 +342,17 @@ def getSkinColor(windowskin,color,isDarkSkin)
        "F0F0F8","C8C8D0",   # 8  White
        "9040E8","B8A8E0",   # 9  Purple
        "F89818","F8C898",   # 10 Orange
-       colorToRgb32(MessageConfig::DARKTEXTBASE),
+       colorToRgb32(MessageConfig::DARK_TEXT_MAIN_COLOR),
-          colorToRgb32(MessageConfig::DARKTEXTSHADOW),   # 11 Dark default
+          colorToRgb32(MessageConfig::DARK_TEXT_SHADOW_COLOR),   # 11 Dark default
-       colorToRgb32(MessageConfig::LIGHTTEXTBASE),
+       colorToRgb32(MessageConfig::LIGHT_TEXT_MAIN_COLOR),
-          colorToRgb32(MessageConfig::LIGHTTEXTSHADOW)   # 12 Light default
+          colorToRgb32(MessageConfig::LIGHT_TEXT_SHADOW_COLOR)   # 12 Light default
     ]
     if color==0 || color>textcolors.length/2   # No special colour, use default
       if isDarkSkin   # Dark background, light text
-        return shadowc3tag(MessageConfig::LIGHTTEXTBASE,MessageConfig::LIGHTTEXTSHADOW)
+        return shadowc3tag(MessageConfig::LIGHT_TEXT_MAIN_COLOR, MessageConfig::LIGHT_TEXT_SHADOW_COLOR)
       end
       # Light background, dark text
-      return shadowc3tag(MessageConfig::DARKTEXTBASE,MessageConfig::DARKTEXTSHADOW)
+      return shadowc3tag(MessageConfig::DARK_TEXT_MAIN_COLOR, MessageConfig::DARK_TEXT_SHADOW_COLOR)
     end
     # Special colour as listed above
     if isDarkSkin && color!=12   # Dark background, light text
@@ -345,9 +373,9 @@ def getDefaultTextColors(windowskin)
   if !windowskin || windowskin.disposed? ||
      windowskin.width!=128 || windowskin.height!=128
     if isDarkWindowskin(windowskin)
-      return [MessageConfig::LIGHTTEXTBASE,MessageConfig::LIGHTTEXTSHADOW]   # White
+      return [MessageConfig::LIGHT_TEXT_MAIN_COLOR, MessageConfig::LIGHT_TEXT_SHADOW_COLOR]   # White
     else
-      return [MessageConfig::DARKTEXTBASE,MessageConfig::DARKTEXTSHADOW]   # Dark gray
+      return [MessageConfig::DARK_TEXT_MAIN_COLOR, MessageConfig::DARK_TEXT_SHADOW_COLOR]   # Dark gray
     end
   else   # VX windowskin
     color = windowskin.get_pixel(64, 96)
@@ -379,41 +407,22 @@ end
 #===============================================================================
 # Set a bitmap's font
 #===============================================================================
-# Gets the name of the system small font.
-def pbSmallFontName
-  return MessageConfig.pbTryFonts("Power Green Small","Pokemon Emerald Small",
-     "Arial Narrow","Arial")
-end
-
-# Gets the name of the system narrow font.
-def pbNarrowFontName
-  return MessageConfig.pbTryFonts("Power Green Narrow","Pokemon Emerald Narrow",
-     "Arial Narrow","Arial")
-end
-
 # Sets a bitmap's font to the system font.
 def pbSetSystemFont(bitmap)
-  fontname = MessageConfig.pbGetSystemFontName
+  bitmap.font.name = MessageConfig.pbGetSystemFontName
-  bitmap.font.name = fontname
+  bitmap.font.size = MessageConfig::FONT_SIZE
-  if fontname == "Pokemon FireLeaf" || fontname == "Power Red and Green"
-    bitmap.font.size = 27
-  elsif fontname == "Pokemon Emerald Small" || fontname == "Power Green Small"
-    bitmap.font.size = 29
-  else
-    bitmap.font.size = 29
-  end
 end
 
 # Sets a bitmap's font to the system small font.
 def pbSetSmallFont(bitmap)
-  bitmap.font.name = pbSmallFontName
+  bitmap.font.name = MessageConfig.pbGetSmallFontName
-  bitmap.font.size = 25
+  bitmap.font.size = MessageConfig::SMALL_FONT_SIZE
 end
 
 # Sets a bitmap's font to the system narrow font.
 def pbSetNarrowFont(bitmap)
-  bitmap.font.name = pbNarrowFontName
+  bitmap.font.name = MessageConfig.pbGetNarrowFontName
-  bitmap.font.size = 29
+  bitmap.font.size = MessageConfig::NARROW_FONT_SIZE
 end
 
 #===============================================================================

Data/Scripts/007_Objects and windows/005_SpriteWindow_text.rb

@@ -119,7 +119,7 @@ class Window_AdvancedTextPokemon < SpriteWindow_Base
   attr_reader   :waitcount
 
   def initialize(text="")
-    @cursorMode       = MessageConfig::CURSORMODE
+    @cursorMode       = MessageConfig::CURSOR_POSITION
     @endOfText        = nil
     @scrollstate      = 0
     @realframes       = 0

Data/Scripts/007_Objects and windows/011_Messages.rb

@@ -495,7 +495,7 @@ def pbCreateMessageWindow(viewport=nil,skin=nil)
   end
   msgwindow.visible=true
   msgwindow.letterbyletter=true
-  msgwindow.back_opacity=MessageConfig::WindowOpacity
+  msgwindow.back_opacity=MessageConfig::WINDOW_OPACITY
   pbBottomLeftLines(msgwindow,2)
   $game_temp.message_window_showing=true if $game_temp
   skin=MessageConfig.pbGetSpeechFrame() if !skin

Data/Scripts/016_UI/015_UI_Options.rb

@@ -7,7 +7,6 @@ class PokemonSystem
   attr_accessor :battlestyle
   attr_accessor :frame
   attr_accessor :textskin
-  attr_accessor :font
   attr_accessor :screensize
   attr_accessor :language
   attr_accessor :runstyle
@@ -21,7 +20,6 @@ class PokemonSystem
     @battlestyle = 0     # Battle style (0=switch, 1=set)
     @frame       = 0     # Default window frame (see also Settings::MENU_WINDOWSKINS)
     @textskin    = 0     # Speech frame
-    @font        = 0     # Font (see also Settings::FONT_OPTIONS)
     @screensize  = (Settings::SCREEN_SCALE * 2).floor - 1   # 0=half size, 1=full size, 2=full-and-a-half size, 3=double size
     @language    = 0     # Language (see also Settings::LANGUAGES in script PokemonSystem)
     @runstyle    = 0     # Default movement speed (0=walk, 1=run)
@@ -365,13 +363,6 @@ class PokemonOption_Scene
            MessageConfig.pbSetSystemFrame("Graphics/Windowskins/" + Settings::MENU_WINDOWSKINS[value])
          }
        ),
-       EnumOption.new(_INTL("Font Style"),[_INTL("Em"),_INTL("R/S"),_INTL("FRLG"),_INTL("DP")],
-         proc { $PokemonSystem.font },
-         proc { |value|
-           $PokemonSystem.font = value
-           MessageConfig.pbSetSystemFontName(Settings::FONT_OPTIONS[value])
-         }
-       ),
        EnumOption.new(_INTL("Text Entry"),[_INTL("Cursor"),_INTL("Keyboard")],
          proc { $PokemonSystem.textinput },
          proc { |value| $PokemonSystem.textinput = value }
@@ -408,7 +399,6 @@ class PokemonOption_Scene
   def pbOptions
     oldSystemSkin = $PokemonSystem.frame      # Menu
     oldTextSkin   = $PokemonSystem.textskin   # Speech
-    oldFont       = $PokemonSystem.font
     pbActivateWindow(@sprites,"option") {
       loop do
         Graphics.update
@@ -429,11 +419,6 @@ class PokemonOption_Scene
             @sprites["option"].setSkin(MessageConfig.pbGetSystemFrame())
             oldSystemSkin = $PokemonSystem.frame
           end
-          if $PokemonSystem.font!=oldFont
-            pbSetSystemFont(@sprites["textbox"].contents)
-            @sprites["textbox"].text = _INTL("Speech frame {1}.",1+$PokemonSystem.textskin)
-            oldFont = $PokemonSystem.font
-          end
         end
         if Input.trigger?(Input::BACK)
           break