マップデータ戦闘背景

マップデータ戦闘背景

コンセプト	マップデータをそのまま戦闘背景にしたい。
挿入位置	「▼ 素材」のすぐ下辺りに。
完成すると	マップデータをそのまま戦闘背景に出来る。
更新履歴	4/28：イベントスクリプトにて戦闘背景変更機能追加。 ========== 2011年 ============================================================ 11/19：無設定での戦闘エラーを修正。 11/6：マップイベントのグラフィックも表示可能に。

★　概要及び機能　★

・戦闘背景をマップデータを使って任意のマップを背景にしたい。
・実際にマップデータを読んで戦闘背景に設定します。
・動作は普通のマップ画面と同様です。
・遠景とかループ遠景とかも可能です。
・マップイベントもグラフィックが表示可能です。
　イベントは実行されません。
　マップイベントの移動が可能です。
　通行設定も適用されます。
・使い方によっては遠景だけを表示して戦闘背景も可能です。
・作り方は「幅17・高さ13」の最小マップサイズで作る必要があります。
・下記設定にて「マップ」「エリア」「地形ＩＤ」の３種類からマップを取得。
・優先度は「マップ＞エリア＞地形」とマップが最優先。
・地形はKGC様「タイルセット拡張」などでタイルＩＤを変数に格納し
　その変数番号を設定ヶ所に入れて下さい。

★　イベントコマンド　★

「changing_battle_back(A,B) 」で背景を変更します。
Ａ　：　true = 変更　false = 戻す
Ｂ　：　マップＩＤ。上記falseなら無指定

changing_battle_back(true, 10)
戦闘背景をマップＩＤ10に変更。

「changing_battle_back(false)」
元の戦闘背景に戻す。

#==============================================================================
#    ?VX RGSS2 「マップデータ戦闘背景」?
#　　　　　　EnDlEss DREamER
#     URL:http://mitsu-evo.6.ql.bz/
#     製作者 mitsu-evo
#     Last:2011/4/28
#　　 マップＩＤを指定して、そのマップデータを戦闘背景にする。
#     ▼ 「▼ 素材」の直下。
#==============================================================================
$ed_rgss2 = {} if $ed_rgss2 == nil
$ed_rgss2["ed_map_battle_back"] = true
=begin

4/28：イベントスクリプトにて戦闘背景変更機能追加。

★　概要及び機能　★
      
    ・戦闘背景をマップデータを使って任意のマップを背景にしたい。
    ・実際にマップデータを読んで戦闘背景に設定します。
    ・動作は普通のマップ画面と同様です。
    ・遠景とかループ遠景とかも可能です。
    ・マップイベントもグラフィックが表示可能です。
    　イベントは実行されません。
    　マップイベントの移動が可能です。
    ・使い方によっては遠景だけを表示して戦闘背景も可能です。
    ・作り方は「幅17・高さ13」の最小マップサイズで作る必要があります。
    ・下記設定にて「マップ」「エリア」「地形ＩＤ」の３種類からマップを取得。
    ・優先度は「マップ＞エリア＞地形」とマップが最優先。
    ・地形はKGC様「タイルセット拡張」などでタイルＩＤを変数に格納し
    　その変数番号を設定ヶ所に入れて下さい。

★　イベントコマンド　★
    
    「changing_battle_back(A,B) 」で背景を変更します。
    Ａ　：　true = 変更　false = 戻す
    Ｂ　：　マップＩＤ。上記falseなら無指定
    
    changing_battle_back(true, 10)
    戦闘背景をマップＩＤ10に変更。
    
    「changing_battle_back(false)」
    元の戦闘背景に戻す。

=end
# ★　設定　★
# マップ設定。
# マップ ID、戦闘背景表示マップＩＤの順に必要なだけ並べます。
EXBTL_BACKGR_MAP = {
  1 => 2,
}

# エリア設定。
# エリア ID、戦闘背景表示マップＩＤの順に必要なだけ並べます。
EXBTL_BACKGR_AREA = {
  01 => 3,
}

# タイル設定。(KGC様「タイルセット拡張」で地形IDを取得する必要があります)
TILE_ID = 1 #地形IDを格納する変数番号。(KGC様タイルセット拡張の地形ID取得先)

# タイル ID、戦闘背景表示マップＩＤの順に必要なだけ並べます。
EXBTL_BACKGR_TILE = {
  1 => 4, 
  2 => 4,
  4 => 6,
  6 => 5,
}

# バトルフロア描画の有無
EXBTL_FLOOR = false

module ED
#==============================================================================
# ■ Command
#------------------------------------------------------------------------------
# 　イベントコマンド「スクリプト」で呼び出されるコマンドです。
#==============================================================================
  module Command
    module_function
    #--------------------------------------------------------------------------
    # ● 背景変更
    #--------------------------------------------------------------------------
    def changing_battle_back(value=true, map_id=nil)
      return unless $game_temp.in_battle
      map_id = nil if value == false
      $game_temp.changing_battle_back = [value, map_id]
    end
  end
end
#==============================================================================
# ■ Game_Temp
#------------------------------------------------------------------------------
# 　セーブデータに含まれない、一時的なデータを扱うクラスです。このクラスのイン
# スタンスは $game_temp で参照されます。
#==============================================================================

class Game_Temp
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias ed_map_battle_back_initialize initialize
  def initialize
    @changing_battle_back = [false, nil]
    ed_map_battle_back_initialize
  end
  #--------------------------------------------------------------------------
  # ● 戦闘背景変更フラグ
  #--------------------------------------------------------------------------
  def changing_battle_back
    return @changing_battle_back
  end
  #--------------------------------------------------------------------------
  # ● 戦闘背景変更フラグ
  #    valueは[真偽,マップＩＤ]で入力される。
  #--------------------------------------------------------------------------
  def changing_battle_back=(value)
    @changing_battle_back = [value[0], value[1]]
  end
end
#==============================================================================
# ■ Game_Interpreter
#------------------------------------------------------------------------------
# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、
# Game_Troop クラス、Game_Event クラスの内部で使用されます。
#==============================================================================
class Game_Interpreter
  # イベントコマンド「スクリプト」にモジュール「Command」のメソッドを反映。
  include ED::Command
end
#==============================================================================
# ■ Spriteset_Battle
#------------------------------------------------------------------------------
# 　バトル画面のスプライトをまとめたクラスです。このクラスは Scene_Battle クラ
# スの内部で使用されます。
#==============================================================================

class Spriteset_Battle

#--------------------------------------------------------------------------
  # ● バトルバックスプライトの作成(タイルマップの作成含み)
  #--------------------------------------------------------------------------
  alias ed_map_battle_back_create_battleback create_battleback
  def create_battleback    
    # 元の処理との競合対策にスプライトを作成しておく。
    @battleback_sprite = Sprite.new(@viewport1)
    @battleback_sprite.bitmap = Bitmap.new(1, 1)
    # 独自に戦闘背景用のビューポート作成。
    # @viewport1ではマップのＺ座標も設定されてしまうのでキャラの前に背景が出る。
    @viewport0 = Viewport.new(0, 0, 544, 416)
    @viewport0.z = -10
    # 設定からマップＩＤの読み込み
    fixed = false
    unless $BTEST
      #地形タグから戦闘背景
      unless fixed
        if EXBTL_BACKGR_TILE.has_key?($game_variables[TILE_ID])
          map_id = EXBTL_BACKGR_TILE[$game_variables[TILE_ID]]
          fixed = true
        end
      end
      # エリアから
      for area in $data_areas.values
        if $game_player.in_area?(area) and EXBTL_BACKGR_AREA.has_key?(area.id)
          map_id = EXBTL_BACKGR_AREA[area.id]
          fixed = true
        end
      end
      # マップＩＤから
      unless fixed
        if EXBTL_BACKGR_MAP.has_key?($game_map.map_id)
          map_id = EXBTL_BACKGR_MAP[$game_map.map_id]
          fixed = true
        end
      end
    end
    unless fixed
      # どれにも該当しない場合は元の処理を行なう。
      ed_map_battle_back_create_battleback
      return
    end
    @map = load_data(sprintf("Data/Map%03d.rvdata", map_id))
    @now_map = Marshal.load(Marshal.dump($game_map)) 
    $game_map.setup(map_id)
    @battle_map_id = map_id
    # 設定マップＩＤが存在すればマップデータを読み込む。
    @tilemap = Tilemap.new(@viewport0)
    @tilemap.bitmaps[0] = Cache.system("TileA1")
    @tilemap.bitmaps[1] = Cache.system("TileA2")
    @tilemap.bitmaps[2] = Cache.system("TileA3")
    @tilemap.bitmaps[3] = Cache.system("TileA4")
    @tilemap.bitmaps[4] = Cache.system("TileA5")
    @tilemap.bitmaps[5] = Cache.system("TileB")
    @tilemap.bitmaps[6] = Cache.system("TileC")
    @tilemap.bitmaps[7] = Cache.system("TileD")
    @tilemap.bitmaps[8] = Cache.system("TileE")
    @tilemap.map_data = @map.data
    @tilemap.passages = $data_system.passages
    
    create_parallax
    create_weather
    create_characters(map_id)
  end
  #--------------------------------------------------------------------------
  # ● バトルフロアスプライトの変更
  #--------------------------------------------------------------------------
  def in_battle_change_battle_back(map_id)
    # 今のＩＤと変更ＩＤが同じ場合は戻る。
    return if @now_map_id == map_id
    Graphics.fadeout(20)
    #Graphics.wait(60)
    @now_map_id = map_id
    @map = load_data(sprintf("Data/Map%03d.rvdata", map_id))
    #@now_map = Marshal.load(Marshal.dump($game_map)) 
    $game_map.setup(map_id)
    # 設定マップＩＤが存在すればマップデータを読み込む。
    @tilemap.dispose
    @tilemap = Tilemap.new(@viewport0)
    @tilemap.bitmaps[0] = Cache.system("TileA1")
    @tilemap.bitmaps[1] = Cache.system("TileA2")
    @tilemap.bitmaps[2] = Cache.system("TileA3")
    @tilemap.bitmaps[3] = Cache.system("TileA4")
    @tilemap.bitmaps[4] = Cache.system("TileA5")
    @tilemap.bitmaps[5] = Cache.system("TileB")
    @tilemap.bitmaps[6] = Cache.system("TileC")
    @tilemap.bitmaps[7] = Cache.system("TileD")
    @tilemap.bitmaps[8] = Cache.system("TileE")
    @tilemap.map_data = @map.data
    @tilemap.passages = $data_system.passages
    create_parallax
    create_weather
    create_characters(map_id)
    Graphics.fadein(20)
    #Graphics.wait(60)
  end
  #--------------------------------------------------------------------------
  # ● バトルフロアスプライトを元に戻す
  #--------------------------------------------------------------------------
  def in_battle_return_battle_back
    return if @now_map_id == nil
    Graphics.fadeout(20)
    #Graphics.wait(60)
    map_id = @battle_map_id 
    @map = load_data(sprintf("Data/Map%03d.rvdata", map_id))
    #@now_map = Marshal.load(Marshal.dump($game_map)) 
    $game_map.setup(map_id)
    # 設定マップＩＤが存在すればマップデータを読み込む。
    @tilemap.dispose
    @tilemap = Tilemap.new(@viewport0)
    @tilemap.bitmaps[0] = Cache.system("TileA1")
    @tilemap.bitmaps[1] = Cache.system("TileA2")
    @tilemap.bitmaps[2] = Cache.system("TileA3")
    @tilemap.bitmaps[3] = Cache.system("TileA4")
    @tilemap.bitmaps[4] = Cache.system("TileA5")
    @tilemap.bitmaps[5] = Cache.system("TileB")
    @tilemap.bitmaps[6] = Cache.system("TileC")
    @tilemap.bitmaps[7] = Cache.system("TileD")
    @tilemap.bitmaps[8] = Cache.system("TileE")
    @tilemap.map_data = @map.data
    @tilemap.passages = $data_system.passages
    create_parallax
    create_weather
    create_characters(map_id)
    Graphics.fadein(20)
    #Graphics.wait(60)
    
    # 変更判定変数初期化
    @now_map_id = nil
    $game_temp.changing_battle_back = [false, nil]
  end
  #--------------------------------------------------------------------------
  # ● バトルフロアスプライトの作成
  #--------------------------------------------------------------------------
  alias ed_map_battle_create_battlefloor create_battlefloor
  def create_battlefloor
    ed_map_battle_create_battlefloor
    @battlefloor_sprite.visible = EXBTL_FLOOR
  end
  #--------------------------------------------------------------------------
  # ● タイルマップの解放
  #--------------------------------------------------------------------------
  def dispose_tilemap
    return if @tilemap == nil
    $game_temp.changing_battle_back = [false, nil]
    @now_map_id = nil
    @tilemap.dispose
    @viewport0.dispose
  end
  #--------------------------------------------------------------------------
  # ● タイルマップの更新
  #--------------------------------------------------------------------------
  def update_tilemap
    return if @tilemap == nil
    if $game_temp.changing_battle_back[0]
      # イベントコマンドから背景変更が有効の場合
      in_battle_change_battle_back($game_temp.changing_battle_back[1])
    else
      in_battle_return_battle_back
    end
    @tilemap.update
  end
  #--------------------------------------------------------------------------
  # ● 天候の作成
  #--------------------------------------------------------------------------
  def create_weather
    @weather = Spriteset_Weather.new(@viewport2)
  end
  #--------------------------------------------------------------------------
  # ● 天候の更新
  #--------------------------------------------------------------------------
  def update_weather
    return if @weather == nil
    @weather.type = $game_map.screen.weather_type
    @weather.max = $game_map.screen.weather_max
    @weather.update
  end
  #--------------------------------------------------------------------------
  # ● 天候の解放
  #--------------------------------------------------------------------------
  def dispose_weather
    return if @weather == nil
    @weather.dispose
  end
  #--------------------------------------------------------------------------
  # ● 遠景の作成
  #--------------------------------------------------------------------------
  def create_parallax
    @parallax = Plane.new(@viewport0)
    @parallax.z = -100
    setup_parallax
  end
  #--------------------------------------------------------------------------
  # ● 遠景の更新
  #--------------------------------------------------------------------------
  def update_parallax
    return if @parallax == nil
    @parallax_x += @parallax_sx * 4 if @parallax_loop_x
    @parallax_y += @parallax_sy * 4 if @parallax_loop_y
    
    @parallax.ox = self.calc_parallax_x(@parallax.bitmap)
    @parallax.oy = self.calc_parallax_y(@parallax.bitmap)
  end
  #--------------------------------------------------------------------------
  # ● 遠景のセットアップ
  #--------------------------------------------------------------------------
  def setup_parallax
    @parallax_name = @map.parallax_name
    if @parallax.bitmap != nil
      @parallax.bitmap.dispose
      @parallax.bitmap = nil
    end
    if @parallax_name != ""
      @parallax.bitmap = Cache.parallax(@parallax_name)
    end
    @parallax_loop_x = @map.parallax_loop_x
    @parallax_loop_y = @map.parallax_loop_y
    @parallax_sx = @map.parallax_sx
    @parallax_sy = @map.parallax_sy
    @parallax_x = 0
    @parallax_y = 0
    Graphics.frame_reset
  end
  #--------------------------------------------------------------------------
  # ● 横方向にループするか？
  #--------------------------------------------------------------------------
  def loop_horizontal?
    return (@map.scroll_type == 2 or @map.scroll_type == 3)
  end
  #--------------------------------------------------------------------------
  # ● 縦方向にループするか？
  #--------------------------------------------------------------------------
  def loop_vertical?
    return (@map.scroll_type == 1 or @map.scroll_type == 3)
  end
  #--------------------------------------------------------------------------
  # ● 遠景表示 X 座標の計算
  #     bitmap : 遠景ビットマップ
  #--------------------------------------------------------------------------
  def calc_parallax_x(bitmap)
    if bitmap == nil
      return 0
    elsif @parallax_loop_x
      return @parallax_x / 16
    elsif loop_horizontal?
      return 0
    else
      w1 = bitmap.width - 544
      w2 = @map.width * 32 - 544
      if w1 <= 0 or w2 <= 0
        return 0
      else
        return @parallax_x * w1 / w2 / 8
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 遠景表示 Y 座標の計算
  #     bitmap : 遠景ビットマップ
  #--------------------------------------------------------------------------
  def calc_parallax_y(bitmap)
    if bitmap == nil
      return 0
    elsif @parallax_loop_y
      return @parallax_y / 16
    elsif loop_vertical?
      return 0
    else
      h1 = bitmap.height - 416
      h2 = @map.height * 32 - 416
      if h1 <= 0 or h2 <= 0
        return 0
      else
        return @parallax_y * h1 / h2 / 8
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 遠景の解放
  #--------------------------------------------------------------------------
  def dispose_parallax
    return if @parallax == nil
    @parallax.dispose
  end
  #--------------------------------------------------------------------------
  # ● キャラクタースプライトの作成
  #--------------------------------------------------------------------------
  def create_characters(map_id)
    @character_sprites = []
    setup_events(map_id)
    for i in @events.keys.sort
      sprite = Sprite_Character.new(@viewport0, @events[i])
      @character_sprites.push(sprite)
    end
  end
  #--------------------------------------------------------------------------
  # ● イベントのセットアップ
  #--------------------------------------------------------------------------
  def setup_events(map_id)
    @events = {}          # マップイベント
    for i in @map.events.keys
      @events[i] = Game_Event.new(map_id, @map.events[i])
    end
  end
  #--------------------------------------------------------------------------
  # ● キャラクタースプライトの更新
  #--------------------------------------------------------------------------
  def update_characters
    return if @events == nil
    for event in @events.values
      event.update
    end
    for sprite in @character_sprites
      sprite.update
    end
  end
  #--------------------------------------------------------------------------
  # ● キャラクタースプライトの解放
  #--------------------------------------------------------------------------
  def dispose_characters
    return if @character_sprites == nil
    for sprite in @character_sprites
      next if sprite == nil
      sprite.dispose
    end
  end
  #--------------------------------------------------------------------------
  # ● 解放
  #--------------------------------------------------------------------------
  alias ed_map_battle_back_dispose dispose
  def dispose
    $game_map = @now_map unless @now_map == nil
    dispose_characters
    dispose_weather
    dispose_parallax
    dispose_tilemap
    ed_map_battle_back_dispose
  end
  #--------------------------------------------------------------------------
  # ● ビューポートの更新
  #--------------------------------------------------------------------------
  alias ed_map_battle_update_viewports update_viewports
  def update_viewports
    #@viewport0.tone = $game_troop.screen.tone
    #@viewport0.ox = $game_troop.screen.shake
    @viewport0.update
    ed_map_battle_update_viewports
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  alias ed_map_battle_back_update update
  def update
    ed_map_battle_back_update
    update_characters
    update_weather
    update_parallax
    update_tilemap
    
    $game_map.update
  end
end

テンプレートのpondt