RPGツクールXP テクニック - メニュー画面改造 -

概要

メニュー画面を横型に改造します。
(コマンド追加系のスクリプトを使用する場合にもお勧め)

スクリーンショット

スクリプト

RGSS
セクション：KGC_MenuAlter

#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
#_/    ◆ メニュー画面改造 - KGC_MenuAlter ◆
#_/    ◇ Last update : 2009/08/23 ◇
#_/----------------------------------------------------------------------------
#_/  メニュー画面を怪しいスタイルに改造します。
#_/============================================================================
#_/ ≪多人数パーティ[LargeParty]≫より上
#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

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

module KGC
  # ◆メニュー背景透過
  MA_MENU_TRANSPARENT = true

# ◆[正常]時に表示する文字列
  MA_FINE_STATE_NAME = "Fine."
  # ◆メニューステータスにバトラーグラフィックを表示
  MA_MENU_STATUS_BATTLER = true
  # ◆メニューステータスに表示する人数
  #  ※仕様上、5 以上にすると表示が被ります。
  MA_MENU_STATUS_MEMBER = 4

# ◆必須メンバーの背景色
  MA_INDISPENSABLE_COLOR = Color.new(0, 128, 192, 96)
  # ◆待機メンバーの背景色
  MA_STAND_COLOR         = Color.new(0, 0, 0, 96)
  #  ↑２つは≪多人数パーティ[LargeParty]≫が無いと無効。
  #  使用しない場合は、第４引数を 0 にしてください。

# ◆コマンド名「ステータス」
  MA_COMMAND_STATUS = "ステータス"
  # ◆コマンド名「セーブ」
  MA_COMMAND_SAVE = "セーブ"
  # ◆コマンド名「ゲーム終了」
  MA_COMMAND_END = "ゲーム終了"
  # ◆コマンド名「プレイ記録」(≪プレイ記録画面≫)
  MA_COMMAND_PLAY_RECORD = "プレイ記録"
  # ◆コマンド名「パーティ編成」(≪多人数パーティ≫)
  MA_COMMAND_PARTY_ARRANGE = "パーティ編成"
  # ◆コマンド名「スキル設定」(≪スキルCP制≫)
  MA_COMMAND_SKILL_SETTING = "スキル設定"
  # ◆コマンド名「モンスター図鑑」(≪モンスター図鑑≫)
  MA_COMMAND_MONSTER_GUIDE = "モンスター図鑑"
  # ◆コマンド名「あらすじ」(≪あらすじ≫)
  MA_COMMAND_OUTLINE = "あらすじ"
  # ◆コマンド名「パラメータ振り分け」(≪パラメータ振り分け≫)
  MA_COMMAND_DISTRIBUTE_PARAMETER = "パラメータ振分"

# ◆一行に表示するコマンド数
  MA_COL_COMMANDS = 7
  # ◆メニューコマンドリスト
  #  以下の中から使用したいコマンドを表示順に格納。
  #  (6 以降は、対応する機能を導入しないと使えません)
  #  ≪ 0..アイテム  1..スキル  2..装備  3..ステータス  4..セーブ  5..終了
  #     6..プレイ記録  7..パーティ編成  8..スキル設定  9..戦闘難易度
  #     10..ACBウェイトモード  11..モンスター図鑑  12..あらすじ
  #     13..パラメータ振り分け ≫
  #  ※同じコマンドを複数指定するとバグります。
  MA_COMMANDS = [0, 1, 2, 3, 4, 6, 7, 8, 9, 10, 11, 12, 5]
  # ◆ActiveCountBattle ウェイトモード名
  MA_ACB_WAIT_MODE = ["フルアクティブ", "セミアクティブ", "ウェイト"]

# ◆メニュー画面トランジション
  MA_MENU_TRANSITION = "015-Diamond01"
end

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

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

#==============================================================================
# ■ Game_Temp
#==============================================================================

class Game_Temp
  attr_accessor :menu_selected_index
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias initialize_KGC_MenuAlter initialize
  def initialize
    initialize_KGC_MenuAlter

@menu_selected_index = nil
  end
end

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

#==============================================================================
# ■ Game_Actor
#==============================================================================

class Game_Actor < Game_Battler
  attr_reader :exp_list
end

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

#==============================================================================
# ■ Window_Base
#==============================================================================

class Window_Base < Window
  #--------------------------------------------------------------------------
  # ● 名前の描画
  #--------------------------------------------------------------------------
  def draw_actor_name(actor, x, y)
    self.contents.font.color = normal_color
    self.contents.draw_shadow_text(x, y, 120, 32, actor.name)
  end
  #--------------------------------------------------------------------------
  # ● クラスの描画
  #--------------------------------------------------------------------------
  def draw_actor_class(actor, x, y)
    self.contents.font.color = normal_color
    self.contents.draw_shadow_text(x, y, 236, 32, actor.class_name)
  end
  #--------------------------------------------------------------------------
  # ● レベルの描画
  #--------------------------------------------------------------------------
  def draw_actor_level(actor, x, y)
    self.contents.font.color = system_color
    self.contents.draw_shadow_text(x, y, 32, 32, "Lv")
    self.contents.font.color = normal_color
    self.contents.draw_shadow_text(x + 32, y, 24, 32, actor.level.to_s, 2)
  end
  #--------------------------------------------------------------------------
  # ● 描画用のステート文字列作成
  #--------------------------------------------------------------------------
  def make_battler_state_text(battler, width, need_normal)
    # 括弧の幅を取得
    brackets_width = self.contents.text_size("[]").width
    # ステート名の文字列を作成
    text = ""
    battler.states.each { |i|
      if $data_states[i].rating >= 1
        if text == ""
          text = $data_states[i].name
        else
          new_text = text + "/" + $data_states[i].name
          text_width = self.contents.text_size(new_text).width
          break if text_width > width - brackets_width
          text = new_text
        end
      end
    }
    # ステート名の文字列が空の場合は KGC::MA_FINE_STATE_NAME にする
    if text == ""
      text = KGC::MA_FINE_STATE_NAME if need_normal
    elsif battler.is_a?(Game_Enemy)
      # 敵の場合は括弧をつける
      text = "[#{text}]"
    end
    # 完成した文字列を返す
    return text
  end

unless $imported["StateIcon"]
  #--------------------------------------------------------------------------
  # ● ステートの描画
  #--------------------------------------------------------------------------
  def draw_actor_state(actor, x, y, width = 120)
    text = make_battler_state_text(actor, width, true)
    self.contents.font.color = actor.dead? ? knockout_color : normal_color
    self.contents.draw_shadow_text(x, y, width, 32, text)
  end
  end
end

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

#==============================================================================
# ■ Window_MenuCommand
#------------------------------------------------------------------------------
# 　メニュー用のコマンド選択を行うウィンドウです。
#==============================================================================

class Window_MenuCommand < Window_Selectable
	#--------------------------------------------------------------------------
	# ● オブジェクト初期化
	#		 commands : コマンド文字列の配列
	#--------------------------------------------------------------------------
	def initialize(commands)
    col_max = KGC::MA_COL_COMMANDS
		# コマンドの個数からウィンドウの高さを算出
		super(0, 0, 640, (commands.size / col_max + 1) * 32 + 32)
    @column_max = col_max
		@item_max = commands.size
		@commands = commands
		self.contents = Bitmap.new(width - 32, height - 32)
		refresh
		self.index = 0
	end
	#--------------------------------------------------------------------------
	# ● リフレッシュ
	#--------------------------------------------------------------------------
	def refresh(commands = nil)
    @commands = commands if commands != nil
		self.contents.clear
		for i in 0...@item_max
			draw_item(i, normal_color)
		end
	end
	#--------------------------------------------------------------------------
	# ● 項目の描画
	#		 index : 項目番号
	#		 color : 文字色
	#--------------------------------------------------------------------------
	def draw_item(index, color)
		self.contents.font.color = color
		rect = Rect.new((index % @column_max) * ((width - 32) / @column_max),
      index / @column_max * 32, (width - 32) / @column_max, 32)
		self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
		self.contents.draw_text(rect, @commands[index], 1)
	end
  #--------------------------------------------------------------------------
  # ● 項目の無効化
  #     index : 項目番号
  #--------------------------------------------------------------------------
  def disable_item(index)
    draw_item(index, disabled_color)
  end
  #--------------------------------------------------------------------------
  # ● カーソルの矩形更新
  #--------------------------------------------------------------------------
  def update_cursor_rect
    # カーソル位置が 0 未満の場合
    if @index < 0
      self.cursor_rect.empty
      return
    end
    # 現在の行を取得
    row = @index / @column_max
    # 現在の行が、表示されている先頭の行より前の場合
    if row < self.top_row
      # 現在の行が先頭になるようにスクロール
      self.top_row = row
    end
    # 現在の行が、表示されている最後尾の行より後ろの場合
    if row > self.top_row + (self.page_row_max - 1)
      # 現在の行が最後尾になるようにスクロール
      self.top_row = row - (self.page_row_max - 1)
    end
    # カーソルの幅を計算
    cursor_width = (width - 32) / @column_max
    # カーソルの座標を計算
    x = @index % @column_max * cursor_width
    y = @index / @column_max * 32 - self.oy
    # カーソルの矩形を更新
    self.cursor_rect.set(x, y, cursor_width, 32)
  end
end

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

#==============================================================================
# ■ Window_MenuStatus
#==============================================================================

class Window_MenuStatus < Window_Selectable
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(items = KGC::MA_COL_COMMANDS)
    @dy = (items / KGC::MA_COL_COMMANDS + 1) * 32 + 32
    @dw = 608 / KGC::MA_MENU_STATUS_MEMBER
    @dh = 384 - @dy
    super(0, @dy, 640, @dh)
    @column_max = KGC::MA_MENU_STATUS_MEMBER
    bh = (($game_party.actors.size - 1) / @column_max + 1) * @dh - 32
    self.contents = Bitmap.new(608, bh)
    refresh
    self.active = false
    self.index = -1
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    self.contents.clear
    self.contents.font.size = 20
    @item_max = $game_party.actors.size
    ch = @dh - 192
    for i in 0...$game_party.actors.size
      actor = $game_party.actors[i]
      x = i % @column_max * @dw + 8
      y = i / @column_max * @dh + ch
      if $imported["LargeParty"]
        # 必須メンバー
        if $game_party.indispensable_actors.include?(actor)
          color = KGC::MA_INDISPENSABLE_COLOR
        # 戦闘参加メンバー以降
        elsif i >= $game_party.battle_actors.size
          color = KGC::MA_STAND_COLOR
        else
          color = Color.new(0, 0, 0, 0)
        end
        self.contents.fill_rect(x - 8, y - ch, @dw, @dh, color)
      end
      if KGC::MA_MENU_STATUS_BATTLER
        draw_actor_graphic(actor, x, y - ch)
      else
        draw_actor_graphic(actor, x + 64, y - ch / 3)
      end
      draw_actor_name(actor, x, y)
      draw_actor_class(actor, x, y + 24)
      draw_actor_level(actor, x, y + 48)
      draw_actor_state(actor, x + 64, y + 48)
      draw_actor_hp(actor, x, y + 96)
      draw_actor_sp(actor, x, y + 124)

if $imported["HPSPAlter2"]
        # EXP描画
        draw_actor_next_exp(actor, x, y + 72)
        next
      end
      # HP/SPゲージを導入している場合
      if $imported["HPSPAlter"]
        # EXPゲージ描画
        rest_exp = actor.next_rest_exp_s.to_i
        next_exp = actor.next_exp_s.to_i - actor.exp_list[actor.level]
        gx = x
        gw = (next_exp - rest_exp) * @g_width / next_exp
        if KGC::HPSP_GAUGE_SLANT
          gy = @g_height + 96
          gy2 = @g_height + 1
          for i in 0...(@g_height + 2)
            self.contents.blt(gx + 31 + i, y + gy - i,
              @hpsp_gauge, Rect.new(0, gy2 - i, 102, 1))
          end
          gy -= 1
          gy2 = @g_height * 4 + 1
          for i in 0...@g_height
            self.contents.blt(gx + 33 + i, y + 99 - i,
              @hpsp_gauge, Rect.new(0, gy2 - i , gw, 1))
          end
        else
          self.contents.blt(gx + 31, y + 95,
            @hpsp_gauge, Rect.new(0, 0, 102, @g_height + 2))
          self.contents.blt(gx + 32, y + 96,
            @hpsp_gauge, Rect.new(0, @g_height * 4 + 2 , gw, @g_height))
        end
      end
      self.contents.font.color = system_color
      self.contents.draw_shadow_text(x, y + 72, 32, 32, "Next")
      self.contents.font.color = normal_color
      self.contents.draw_shadow_text(x + 32, y + 72, 100, 32, actor.next_rest_exp_s, 2)
    end
  end
  #--------------------------------------------------------------------------
  # ● カーソル矩形更新
  #--------------------------------------------------------------------------
  def update_cursor_rect
    # カーソル位置が 0 未満の場合
    if @index < 0
      self.cursor_rect.empty
      return
    end
    # カーソルの座標を計算
    x = @index % @column_max * @dw
    y = @index / @column_max * @dh - self.oy
    # カーソルの矩形を更新
    self.cursor_rect.set(x, y, @dw, @dh - 32)
    self.oy = @index / @column_max * @dh
  end
  #--------------------------------------------------------------------------
  # ● グラフィックの描画
  #--------------------------------------------------------------------------
  if KGC::MA_MENU_STATUS_BATTLER
  def draw_actor_graphic(actor, x, y)
    bitmap = RPG::Cache.battler(actor.battler_name, actor.battler_hue)
    cw, ch = bitmap.width, bitmap.height
    self.contents.blt(x, y, bitmap, bitmap.rect)
  end
  end
end

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

#==============================================================================
# ■ Window_Item
#==============================================================================

if KGC::MA_MENU_TRANSPARENT
class Window_Item < Window_Selectable
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias initialize_KGC_MenuAlter initialize
  def initialize
    initialize_KGC_MenuAlter