メッセージウィンドウ改造

概要

メッセージウィンドウに微妙な機能を追加するスクリプトです。
このスクリプトでは、以下の機能が利用できます。

メッセージウィンドウ左上に名前を表示。
文章量に合わせてウィンドウサイズを自動調整。
顔グラフィックを表示。
画像サイズは任意。別ウィンドウへの表示も可能。
ウィンドウ内の文字列整列。
左側・中央・右側表示が可能。
メッセージのスクロール表示。
ウィンドウ内に大量の文章をぶち込み、上下にスクロール表示。
独自制御文字。
≪書式指定文字描画≫の制御文字に一部対応。

スクリーンショット

ScreenShot

更新履歴

2005/05/29

名前ウィンドウ縦幅調整機能を追加。

2005/05/06

独自制御文字「\IN[n] \WN[n] \AN[n] \IT[n] \WP[n] \AR[n]」に対応。

2005/04/09

「名前ウィンドウスキン変更」「顔グラフィック専用ウィンドウ」を追加。

2005/02/24

名前ウィンドウにウィンドウスキンの変更が適用されないバグを修正。

2004/11/17

「メッセージスクロール」機能を追加。

2004/10/30

本文より数値入力幅の方が大きい場合、ウィンドウからはみ出るバグを修正。

スクリプト

KGC_MessageAlter

#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
#_/    ◆メッセージウィンドウ改造 － KGC_MessageAlter◆
#_/----------------------------------------------------------------------------
#_/  メッセージウィンドウを改造し、微妙な機能を追加します。
#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

#==============================================================================
# ★ カスタマイズ項目 ★
#==============================================================================

module KGC
  # ◆ウィンドウサイズ自動調整初期設定
  MSGA_AUTO_ADJUST_DEFAULT = true
  # ◆スクロール機能初期設定
  MSGA_SCROLL_DEFAULT = false

# ◆スクロール速度【単位：px】
  MSGA_SCROLL_SPEED = 4
  # ◆最下部到達必須
  #  true にすると、最下部までスクロールしないとメッセージが消せない
  MSGA_MUST_LOWEST = false

# ◆顔グラフィック専用ウィンドウを使用
  MSGA_FACE_WINDOW = true
  # ◆名前ウィンドウの縦幅
  #  文字サイズも自動調整(48～64 あたりを推奨)
  MSGA_NAME_WINDOW_HEIGHT = 48
end

#★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★

$imported = {} if $imported == nil
$imported["MessageAlter"] = true

#==============================================================================
# ■ Game_System
#==============================================================================

class Game_System
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_accessor :message_auto_adjust      # メッセージウィンドウ自動サイズ調整
  attr_accessor :message_align            # メッセージウィンドウ アライン
  attr_accessor :message_scroll           # メッセージウィンドウ スクロール
  attr_accessor :name_window_skin         # 名前ウィンドウスキン
  attr_accessor :face_window_skin         # 顔グラフィック専用ウィンドウスキン
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias initialize_KGC_MessageAlter initialize
  def initialize
    # 元の処理を実行
    initialize_KGC_MessageAlter

@message_auto_adjust = KGC::MSGA_AUTO_ADJUST_DEFAULT
    @message_align = 0
    @message_scroll = KGC::MSGA_SCROLL_DEFAULT
    @name_window_skin = nil
    @face_window_skin = nil
  end
end

#★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★

#==============================================================================
# ■ Window_Message
#==============================================================================

class Window_Message < Window_Selectable
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias initialize_KGC_MessageAlter initialize
  def initialize
    # 元の処理を実行
    initialize_KGC_MessageAlter

# 名前用小型ウィンドウ作成
    @name_window = Window_Base.new(80, 240, 160, KGC::MSGA_NAME_WINDOW_HEIGHT)
    @name_window.visible = false
    @name_window.back_opacity = 160
    @name_window.z = 9999
    # 顔グラフィック専用ウィンドウ作成
    @face_window = Window_Base.new(0, 0, 32, 32)
    @face_window.visible = false
    @face_window.back_opacity = 160
    @face_window.z = 9998
  end
  #--------------------------------------------------------------------------
  # ● 解放
  #--------------------------------------------------------------------------
  alias dispose_KGC_MessageAlter dispose
  def dispose
    # ウィンドウ解放
    @name_window.dispose
    @face_window.dispose

# 元の処理を実行
    dispose_KGC_MessageAlter
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    self.contents.clear
    # ウィンドウ初期化
    initialize_window
    # 文字列バッファ作成
    text_buf, trans_x = [Bitmap.new(608, 32)], [0]
    # メッセージウィンドウ自動サイズ調整がオフの場合
    unless $game_system.message_auto_adjust
      self.contents = Bitmap.new(width - 32, height - 32)
    end
    text_buf[0].font.color = self.normal_color
    x = y = max_x = 0
    @cursor_width = 0
    # 選択肢なら字下げを行う
    x = 8 if $game_temp.choice_start == 0
    # 表示待ちのメッセージがある場合
    if $game_temp.message_text != nil
      text = $game_temp.message_text
      # 制御文字処理
      begin
        last_text = text.clone
        text.gsub!(/\\[V]\[(\d+)\]/i) { $game_variables[$1.to_i] }
        text.gsub!(/\\IN\[(\d+)\]/i) { $data_items[$1.to_i] == nil ?
          "" : $data_items[$1.to_i].name }
        text.gsub!(/\\WN\[(\d+)\]/i) { $data_weapons[$1.to_i] == nil ?
          "" : $data_weapons[$1.to_i].name }
        text.gsub!(/\\AN\[(\d+)\]/i) { $data_armors[$1.to_i] == nil ?
          "" : $data_armors[$1.to_i].name }
      end until text == last_text
      text.gsub!(/\\[N]\[(\d+)\]/i) do
        $game_actors[$1.to_i] != nil ? $game_actors[$1.to_i].name : ""
      end
      # 便宜上、"\\\\" を "\000" に変換
      text.gsub!(/\\\\/) { "\000" }
      # "\\C" を "\001" に、"\\G" を "\002" に変換
      text.gsub!(/\\[C]\[(\d+)\]/i) { "\001[#{$1}]" }
      text.gsub!(/\\[G]/i) { "\002" }

text.gsub!(/\\AL\[(\d+)\]/i) { "\x10[#{$1}]" }
      text.gsub!(/\\IT\[(\d+)\]/i) { "\x11[#{$1}]" }
      text.gsub!(/\\WP\[(\d+)\]/i) { "\x12[#{$1}]" }
      text.gsub!(/\\AR\[(\d+)\]/i) { "\x13[#{$1}]" }
      # c に 1 文字を取得 (文字が取得できなくなるまでループ)
      while ((c = text.slice!(/./m)) != nil)
        # \\ の場合
        if c == "\000"
          # 本来の文字に戻す
          c = "\\"
        end
        # \C[n] の場合
        if c == "\001"
          # 文字色を変更
          text.sub!(/\[(\d+)\]/, "")
          color = $1.to_i
          if color >= 0 && color <= 7
            text_buf[y].font.color = self.text_color(color)
          end
          # 次の文字へ
          next
        end
        # \G の場合
        if c == "\002"
          # ゴールドウィンドウを作成
          if @gold_window == nil
            @gold_window = Window_Gold.new
            @gold_window.x = 560 - @gold_window.width
            if $game_temp.in_battle
              @gold_window.y = 192
            else
              @gold_window.y = self.y >= 128 ? 32 : 384
            end
            @gold_window.opacity = self.opacity
            @gold_window.back_opacity = self.back_opacity
          end
          # 次の文字へ
          next
        end
        # \AL[n] の場合
        if c == "\x10"
          # アラインタイプを変更
          text.sub!(/\[(\d+)\]/, "")
          align = $1.to_i
          # 次の文字へ
          next
        end
        # 改行文字の場合
        if c == "\n"
          # 選択肢ならカーソルの幅を更新
          if y >= $game_temp.choice_start
            @cursor_width = [@cursor_width, x].max
          end
          # y に 1 を加算
          y += 1
          # 新しい文字列バッファを作成
          text_buf[y] = Bitmap.new(608, 32)
          text_buf[y].font.color = self.normal_color
          # x の最大値更新判定
          max_x = [x, max_x].max
          # x を初期化
          x = 0
          # 選択肢なら字下げを行う
          x = 8 if y >= $game_temp.choice_start
          # 次の文字へ
          next
        end
        # \IT[n] の場合
        if c == "\x11"
          text.sub!(/\[(\d+)\]/, "")
          item = $data_items[$1.to_i]
          if item != nil
            # アイテム名をアイコン付きで描画
            icon = RPG::Cache.icon(item.icon_name)
            text_buf[y].blt(x + 4, [(32 - icon.height) / 2, 0].max, icon, icon.rect)
            x += icon.width + 8
            cx = text_buf[y].text_size(item.name).width + 8
            text_buf[y].draw_text(x, 0, cx, 32, item.name)
            x += cx - 8
          end
          next
        end
        # \WP[n] の場合
        if c == "\x12"
          text.sub!(/\[(\d+)\]/, "")
          item = $data_weapons[$1.to_i]
          if item != nil
            # 武器名をアイコン付きで描画
            icon = RPG::Cache.icon(item.icon_name)
            text_buf[y].blt(x + 4, [(32 - icon.height) / 2, 0].max, icon, icon.rect)
            x += icon.width + 8
            cx = text_buf[y].text_size(item.name).width + 8
            text_buf[y].draw_text(x, 0, cx, 32, item.name)
            x += cx - 8
          end
          next
        end
        # \AR[n] の場合
        if c == "\x13"
          text.sub!(/\[(\d+)\]/, "")
          item = $data_armors[$1.to_i]
          if item != nil
            # 武器名をアイコン付きで描画
            icon = RPG::Cache.icon(item.icon_name)
            text_buf[y].blt(x + 4, [(32 - icon.height) / 2, 0].max, icon, icon.rect)
            x += icon.width + 8
            cx = text_buf[y].text_size(item.name).width + 8
            text_buf[y].draw_text(x, 0, cx, 32, item.name)
            x += cx - 8
          end
          next
        end
        # 文字を描画
        text_buf[y].draw_text(4 + x, 0, 40, 32, c)
        # x に描画した文字の幅を加算
        x += text_buf[y].text_size(c).width
        # 転送用X座標保存
        trans_x[y] = x
        # 選択肢の場合はインデント分戻す
        trans_x[y] += 12 if $game_temp.choice_max > 0
      end
    end
    # メッセージウィンドウ自動サイズ調整がオンの場合
    if $game_system.message_auto_adjust
      # 数値入力の場合は１行余分に追加
      y += 1 if $game_temp.num_input_variable_id > 0
      # ウィンドウサイズを調整
      self.width = max_x + 48
      self.height = [y, 4].min * 32 + 32
      # 顔グラフィックが存在する場合
      if @face_bitmap != nil && !KGC::MSGA_FACE_WINDOW
        # ウィンドウの幅を加算
        self.width += @face_bitmap.width + 16
        # ウィンドウの高さが顔グラフィックよりも小さい場合
        if @face_bitmap.height + 32 > self.height
          # 顔グラフィックより大きいサイズに設定
          self.height = @face_bitmap.height + 32
        end
        self.contents = Bitmap.new(width - 32, [y * 32, @face_bitmap.height].max)
        face_y = (self.contents.height - @face_bitmap.height) / 2
        # 顔グラフィックが左側表示の場合
        if $msg_face[1] == 0
          @text_x = @face_bitmap.width + 16
          self.contents.blt(8, face_y, @face_bitmap,
            Rect.new(0, 0, @face_bitmap.width, @face_bitmap.height))
        else
          @text_x = 0
          self.contents.blt(self.contents.width - @face_bitmap.width - 8,
            face_y, @face_bitmap,
            Rect.new(0, 0, @face_bitmap.width, @face_bitmap.height))
        end
      else
        @text_x = 0
        self.contents = Bitmap.new(width - 32, y * 32)
      end
    # メッセージウィンドウ自動サイズ調整がオフの場合
    else
      # 顔グラフィックが存在する場合
      if @face_bitmap != nil && !KGC::MSGA_FACE_WINDOW
        # ウィンドウの高さが顔グラフィックよりも小さい場合
        if @face_bitmap.height + 32 > self.height
          # 顔グラフィックより大きいサイズに設定
          self.height = @face_bitmap.height + 32
        end
        face_y = (self.contents.height - @face_bitmap.height) / 2
        # 顔グラフィックが左側表示の場合
        if $msg_face[1] == 0
          @text_x = @face_bitmap.width + 16
          self.contents.blt(8, face_y, @face_bitmap,
            Rect.new(0, 0, @face_bitmap.width, @face_bitmap.height))
        else
          @text_x = 0
          self.contents.blt(self.contents.width - @face_bitmap.width - 8,
            face_y, @face_bitmap,
            Rect.new(0, 0, @face_bitmap.width, @face_bitmap.height))
        end
      else
        @text_x = 0
      end
    end
    # ウィンドウ内容を描画
    for i in 0...text_buf.size
      next if text_buf[i] == nil
      trans_x[i] = 0 if trans_x[i] == nil
      # 転送用X座標設定
      align = $game_system.message_align if align == nil
      case align
      when 0, nil  # 左側
        tx = @text_x
      when 1  # 中央
        if $msg_face != nil && $msg_face[1] == 1
          tx = (self.contents.width - trans_x[i] - @face_bitmap.width - 16) / 2
        else
          tx = (self.contents.width - trans_x[i] + @text_x) / 2
        end
      when 2  # 右側
        if $msg_face != nil && $msg_face[1] == 0
          tx = self.contents.width - trans_x[i] - 8
        elsif $msg_face != nil && $msg_face[1] == 1
          tx = self.contents.width - trans_x[i] - @face_bitmap.width - 24
        else
          tx = self.contents.width - trans_x[i] + @text_x - 8
        end
      end
      self.contents.blt(tx, i * 32, text_buf[i], text_buf[i].rect)
      text_buf[i].dispose
    end
    # 選択肢の場合
    if $game_temp.choice_max > 0
      @item_max = $game_temp.choice_max
      self.active = true
      self.index = 0
    end
    # 数値入力の場合
    if $game_temp.num_input_variable_id > 0
      digits_max = $game_temp.num_input_digits_max
      number = $game_variables[$game_temp.num_input_variable_id]
      @input_number_window = Window_InputNumber.new(digits_max)
      @input_number_window.number = number
      @input_number_window.x = self.x + 8 + @text_x
      @input_number_window.y = self.y + $game_temp.num_input_start * 32
      # メッセージウィンドウ自動サイズ調整がオンの場合
      if $game_system.message_auto_adjust
        # ウィンドウの幅を調整
        self.width = [self.width, @input_number_window.width + 16].max
        # ウィンドウを中央へ移動
        centering_window
        # 数値入力ウィンドウ位置を調整
        @input_number_window.x = self.x + 8 + @text_x
      end
    end
    # 名前が設定されている場合、名前表示
    if $msg_name != nil
      fs = [[22 - (64 - KGC::MSGA_NAME_WINDOW_HEIGHT) / 4, 12].max, 80].min
      bitmap = Bitmap.new(32, 32)
      bitmap.font.size = fs
      cx = bitmap.text_size($msg_name).width
      @name_window.width = cx + 32
      @name_window.contents.dispose if @name_window.contents != nil
      @name_window.contents = Bitmap.new(cx, KGC::MSGA_NAME_WINDOW_HEIGHT - 32)
      @name_window.contents.font.size = fs
      @name_window.contents.draw_text(0, 0, cx + 8, KGC::MSGA_NAME_WINDOW_HEIGHT - 32, $msg_name)
      @name_window.visible = true
      if $game_system.name_window_skin != nil
        @name_window.windowskin = RPG::Cache.windowskin($game_system.name_window_skin)
      else
        @name_window.windowskin = self.windowskin
      end
    # 名前が設定されていない場合、ウィンドウ消去
    else
      @name_window.visible = false
    end
    # 顔グラフィック専用ウィンドウ表示
    if $msg_face != nil && KGC::MSGA_FACE_WINDOW
      @face_window.width = @face_bitmap.width + 32
      @face_window.height = [@face_bitmap.height + 32, self.height].max
      self.height = [@face_window.height, self.height].max
      face_y = (@face_window.height - @face_bitmap.height - 32) / 2
      @face_window.contents.dispose if @face_window.contents != nil
      @face_window.contents = Bitmap.new(@face_window.width - 32, @face_window.height - 32)
      @face_window.contents.blt(0, face_y, @face_bitmap, @face_bitmap.rect)
      if $game_system.face_window_skin != nil
        @face_window.windowskin = RPG::Cache.windowskin($game_system.face_window_skin)
      else
        @face_window.windowskin = self.windowskin
      end
      @face_window.visible = true
    else
      @face_window.visible = false
    end
    # 中央に移動
    centering_window
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウ設定初期化
  #--------------------------------------------------------------------------
  def initialize_window
    if $msg_face == nil || $msg_face[0] == nil || $msg_face[1] == nil
      @face_bitmap.dispose if @face_bitmap != nil
      @face_bitmap = nil
      self.width = 480
    else
      @face_bitmap = RPG::Cache.picture($msg_face[0])
      self.width = KGC::MSGA_FACE_WINDOW ? 480 : 496 + @face_bitmap.width
    end
    centering_window
    self.y = 304
    self.oy = 0
    self.height = 160
    reset_window
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウを中央に移動
  #--------------------------------------------------------------------------
  def centering_window
    if @face_window.visible && $msg_face != nil
      cx = 640 - self.width - @face_window.width
      case $msg_face[1]
      when 1  # 右
        @face_window.x = cx / 2 + self.width
        self.x = cx / 2
        @name_window.x = self.x
      else  # 左
        @face_window.x = cx / 2
        self.x = cx / 2 + @face_window.width
        @name_window.x = @face_window.x
      end
    else
      cx = 640 - self.width
      self.x = cx / 2
      @name_window.x = self.x
    end
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウの位置と不透明度の設定
  #--------------------------------------------------------------------------
  def reset_window
    if $game_temp.in_battle
      self.y = 32
    else
      case $game_system.message_position
      when 0  # 上
        self.y = 32
      when 1  # 中
        self.y = 160
      when 2  # 下
        self.y = 304
      end
    end
    if $game_system.message_frame == 0
      self.opacity = 255
    else
      self.opacity = 0
    end
    @name_window.y = self.y - KGC::MSGA_NAME_WINDOW_HEIGHT + 16
    @name_window.opacity = self.opacity
    @face_window.y = self.y
    @face_window.opacity = self.opacity
    self.back_opacity = 160
    self.pause = false
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  def update
    super
    # ウィンドウを更新
    @name_window.update
    @face_window.update
    # フェードインの場合
    if @fade_in
      self.contents_opacity += 24
      @name_window.contents_opacity += 24 if $msg_name != nil
      @face_window.contents_opacity += 24 if $msg_face != nil
      if @input_number_window != nil
        @input_number_window.contents_opacity += 24
      end
      if self.contents_opacity == 255
        @fade_in = false
      end
      return
    end
    # 数値入力中の場合
    if @input_number_window != nil
      @input_number_window.update
      # 決定
      if Input.trigger?(Input::C)
        $game_system.se_play($data_system.decision_se)
        $game_variables[$game_temp.num_input_variable_id] =
          @input_number_window.number
        $game_map.need_refresh = true
        # 数値入力ウィンドウを解放
        @input_number_window.dispose
        @input_number_window = nil
        terminate_message
      end
      return
    end
    # メッセージ表示中の場合
    if @contents_showing
      # スクロール最大位置を計算
      scroll_max = self.contents.height - (self.height - 32)
      # 選択肢の表示中でなければポーズサインを表示
      if $game_temp.choice_max == 0
        self.pause = true
      end
      # キャンセル
      if Input.trigger?(Input::B) && $game_temp.choice_max > 0 &&
          $game_temp.choice_cancel_type > 0
        $game_system.se_play($data_system.cancel_se)
        $game_temp.choice_proc.call($game_temp.choice_cancel_type - 1)
        terminate_message
      end
      # 決定
      if Input.trigger?(Input::C)
        if $game_temp.choice_max > 0
          $game_system.se_play($data_system.decision_se)
          $game_temp.choice_proc.call(self.index)
        end
        # スクロール機能がオン、かつ選択肢でない場合
        if $game_system.message_scroll && $game_temp.choice_max == 0
          # 最下部到達判定
          if KGC::MSGA_MUST_LOWEST
            terminate_message if self.oy == scroll_max
          else
            terminate_message
          end
        else
          terminate_message
        end
      end
      # スクロール機能がオン、かつ選択肢でない場合
      if $game_system.message_scroll && $game_temp.choice_max == 0
        # 方向ボタンの上が押されている場合
        if Input.press?(Input::UP)
          self.oy = [self.oy - KGC::MSGA_SCROLL_SPEED, 0].max
        # 方向ボタンの下が押されている場合
        elsif Input.press?(Input::DOWN)
          self.oy = [self.oy + KGC::MSGA_SCROLL_SPEED, scroll_max].min
        # R ボタンが押された場合
        elsif Input.repeat?(Input::R)
          self.oy = [self.oy + (self.height - 32), scroll_max].min
        # L ボタンが押された場合
        elsif Input.repeat?(Input::L)
          self.oy = [self.oy - (self.height - 32), 0].max
        end
        # ウィンドウ最下部に達した場合
        if $game_temp.choice_max == 0 && self.oy == scroll_max
          # ポーズサインを表示
          self.pause = true
        else
          # ポーズサインを消去
          self.pause = false
        end
      end
      return
    end
    # フェードアウト中以外で表示待ちのメッセージか選択肢がある場合
    if !@fade_out && $game_temp.message_text != nil
      @contents_showing = true
      $game_temp.message_window_showing = true
      reset_window
      refresh
      Graphics.frame_reset
      self.visible = true
      self.contents_opacity = 0
      if @input_number_window != nil
        @input_number_window.contents_opacity = 0
      end
      @fade_in = true
      return
    end
    # 表示すべきメッセージがないが、ウィンドウが可視状態の場合
    if self.visible
      @fade_out = true
      self.opacity -= 48
      @name_window.opacity -= 48
      @face_window.opacity -= 48
      if self.opacity == 0
        self.visible = false
        @name_window.visible = false
        @face_window.visible = false
        @fade_out = false
        $game_temp.message_window_showing = false
      end
      return
    end
  end
  #--------------------------------------------------------------------------
  # ● カーソルの矩形更新
  #--------------------------------------------------------------------------
  def update_cursor_rect
    if @index >= 0
      n = $game_temp.choice_start + @index
      self.cursor_rect.set(8 + @text_x, n * 32, @cursor_width, 32)
    else
      self.cursor_rect.empty
    end
  end
end

#★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★

#==============================================================================
# ■ Interpreter (分割定義 3)
#==============================================================================

class Interpreter
  #--------------------------------------------------------------------------
  # ● 文章の表示
  #--------------------------------------------------------------------------
  def command_101
    # ほかの文章が message_text に設定済み、かつスクロール機能がオフの場合
    if $game_temp.message_text != nil && !$game_system.message_scroll
      # 終了
      return false
    end
    # メッセージ終了待機中フラグおよびコールバックを設定
    @message_waiting = true
    $game_temp.message_proc = Proc.new { @message_waiting = false }
    # message_text に 1 行目を設定
    $game_temp.message_text = @list[@index].parameters[0] + "\n"
    line_count = 1
    # ループ
    loop {
      # 次のイベントコマンドが文章 2 行目以降の場合
      if @list[@index+1].code == 401
        # message_text に 2 行目以降を追加
        $game_temp.message_text += @list[@index+1].parameters[0] + "\n"
        line_count += 1
      # イベントコマンドが文章 2 行目以降ではない場合
      else
        # 次のイベントコマンドが文章表示、かつスクロール機能がオンの場合
        if @list[@index+1].code == 101 && $game_system.message_scroll
          # message_text に次の文章を追加
          $game_temp.message_text += @list[@index+1].parameters[0] + "\n"
          line_count += 1
          # インデックスを進める
          @index += 1
          next
        # 次のイベントコマンドが選択肢の表示の場合
        elsif @list[@index+1].code == 102
          # 選択肢が画面に収まる場合
          if @list[@index+1].parameters[0].size <= 4 - line_count
            # インデックスを進める
            @index += 1
            # 選択肢のセットアップ
            $game_temp.choice_start = line_count
            setup_choices(@list[@index].parameters)
          end
        # 次のイベントコマンドが数値入力の処理の場合
        elsif @list[@index+1].code == 103
          # 数値入力ウィンドウが画面に収まる場合
          if line_count < 4
            # インデックスを進める
            @index += 1
            # 数値入力のセットアップ
            $game_temp.num_input_start = line_count
            $game_temp.num_input_variable_id = @list[@index].parameters[0]
            $game_temp.num_input_digits_max = @list[@index].parameters[1]
          end
        end
        # 継続
        return true
      end
      # インデックスを進める
      @index += 1
    }
  end
end

使用法

$game_system.name_window_skin = filename
$game_system.face_window_skin = filename

を実行すると、名前・顔グラフィック用のウィンドウスキンのみを変更することができます。
filenameには「Graphics\Windowskins」内のファイル名を指定します。
(nilを指定すると通常のウィンドウスキンになります)

文章に名前表示」

イベントコマンド「スクリプト」で

$msg_name = "表示する名前"

というスクリプトを実行すればOKです。
名前を消す場合は

$msg_name = nil

と指定してください。

# ◆名前ウィンドウの縦幅
MSGA_NAME_WINDOW_HEIGHT = 48

を変更すると、名前ウィンドウの高さを調整できます。
(フォントサイズも自動調整)
64に設定すると、通常のウィンドウと同じフォントサイズになります。

「メッセージウィンドウみたいにID[x]のアクター名を表示したい!!」という場合は

$msg_name = $game_actors[x].name

と指定すれば、ID[x]のアクター名を表示します。

ウィンドウサイズ自動調整

↑のスクリプトでは、デフォルトでサイズ調整を行います。
解除する場合は、イベントコマンド「スクリプト」で

$game_system.message_auto_adjust = false

を実行してください。

顔グラフィック表示

イベントコマンド「スクリプト」で

$msg_face = ["画像ファイル", {表示位置}]

というスクリプトを実行してください。
画像ファイルは「Graphics\Pictures」から読み込みます。
表示位置には、以下の値を入力してください。
　0　ウィンドウ左端に表示
　1　ウィンドウ右端に表示
顔グラフィックを消去する場合は

$msg_face = nil

を実行すればOKです。
ちなみに、画像サイズに制限はありません。
縦長や小さい画像も使用可能です。
(ウィンドウ巨大化防止のため、最大でも縦横96px程度に収めてください)

<例> 「test.png」を左端に表示する場合
$msg_face = ["test.png", 0]

# ◆顔グラフィック専用ウィンドウを使用
MSGA_FACE_WINDOW = true

をtrueにすると、顔グラフィックを専用のウィンドウに表示します。

メッセージアライン

ウィンドウ内文字列の整列方法を設定します。
設定には、制御文字 \AL[x] を使用します。(大文字・小文字は問いません)
xには、以下の値を入力してください。
　0　左側に表示(デフォルト)
　1　中央に表示
　2　右側に表示
\AL[x] は、文中のどこにあっても構いません。
邪魔にならない位置に適当に記述してください。

長期間整列を持続させる場合は、イベントコマンド「スクリプト」で

$game_system.message_align = x

というスクリプトを実行してください。
この場合、同様のスクリプトで設定を変更するまで持続します。

設定の優先順位は　\AL[x] ＞ $game_system.message_align　です。

メッセージスクロール

イベントコマンド「文章の表示」を連続で使用すると、それらの文章全てをメッセージウィンドウに一度に描画し、スクロールして読むことができます。
「↑↓」ボタンで通常スクロール、「LR」ボタンでページ単位スクロールが可能です。

途中で文章を切る場合は、コマンド間に「ウェイト」等を適当に挿入してください。

$game_system.message_scroll = false

を実行すると、スクロール機能を解除できます。

独自制御文字

≪書式指定文字描画≫が対応している制御文字の一部を使用できます。
対応している制御文字は以下の通りです。
\IN[n] \WN[n] \AN[n] \IT[n] \WP[n] \AR[n]
それぞれの効果は≪書式指定文字描画≫を参照してください。
メッセージウィンドウで使用する場合に限り、\ を2つ付ける必要はありません。