マップイベント指定分の確保

マップイベント指定分の確保

コンセプト	全マップ共通で使用される指定IDのマップイベント作成を自動で行ないたい
挿入位置	「▼ 素材」のすぐ下辺りに。
完成すると	どのマップでもイベントID1～指定値まで自動で作成される。既に作成済みのマップでも自動で挿入して空きイベントを確保する。
更新履歴	5/23：追加してイベントが一部消えてしまうバグ修正。

★　概要　★

・指定個数分イベントを新規作成してイベントスペースを空ける。
・使い方として、コモンイベントで各マップの指定イベントIDの動作を
　統一して動作させたい時などに使用する。

★　使い方　★

・設定項目にて設定を行なう。
・ゲームを実行してマップを表示する。
・表示された時に自動的に空きイベントが設定数だけ作成されて
　マップデータに自動的に保存される。
・プロジェクトを閉じて再度開けば空きイベントが配置されている。
・設定に応じてアクター名をイベント名に付与できる。
・コモンイベントにて「全マップ統一」で「指定IDのマップイベント」の
　動作などを管理できる。
・下記例のように、どのマップでも同じイベントIDで動作管理が可能。

例：主人公の仲間表示。
　・コモンイベントでプレイヤーから仲間を出現させる。
　・イベントの内容は仲間がいれば前後左右へ出現。
　・その際にどのマップでもイベントIDを指定して動作を組む必要がある。
　　既にマップを作成していた場合はエディタ上でイベントを削除したりして
　　イベントIDを編集する必要がある。
・このスクリプトがあればマップ移動時に必要に応じて自動的に
　新規イベントが作成されてコモンイベントから動作を実行する。
・既にそのマップでイベントが作られた場合には作成を実行しない。
・エディタにも反映されている。

#==============================================================================
#    ?VX RGSS2 「マップイベント指定分のスペース」?
#　　　　　　EnDlEss DREamER
#     URL:http://mitsu-evo.6.ql.bz/
#     製作者 mitsu-evo
#     Last:2011/5/23
#　　 マップID指定値以下の分だけ新規作成イベント配置でスペースを空ける素材。
#     ▼ 素材よりも下に。
#==============================================================================
$ed_rgss2 = {} if $ed_rgss2 == nil
$ed_rgss2["ed_map_event_space"] = true
=begin

5/23：追加してイベントが一部消えてしまうバグ修正。

★　概要　★
    
    ・指定個数分イベントを新規作成してイベントスペースを空ける。
    ・使い方として、コモンイベントで各マップの指定イベントIDの動作を
    　統一して動作させたい時などに使用する。
    
    ★　使い方　★
    
    ・設定項目にて設定を行なう。
    ・ゲームを実行してマップを表示する。
    ・表示された時に自動的に空きイベントが設定数だけ作成されて
    　マップデータに自動的に保存される。
    ・プロジェクトを閉じて再度開けば空きイベントが配置されている。
    ・設定に応じてアクター名をイベント名に付与できる。
    ・コモンイベントにて「全マップ統一」で「指定IDのマップイベント」の
    　動作などを管理できる。
    ・下記例のように、どのマップでも同じイベントIDで動作管理が可能。
    
    
    例：主人公の仲間表示。
    　・コモンイベントでプレイヤーから仲間を出現させる。
    　・イベントの内容は仲間がいれば前後左右へ出現。
    　・その際にどのマップでもイベントIDを指定して動作を組む必要がある。
    　　既にマップを作成していた場合はエディタ上でイベントを削除したりして
    　　イベントIDを編集する必要がある。
      ・このスクリプトがあればマップ移動時に必要に応じて自動的に
      　新規イベントが作成されてコモンイベントから動作を実行する。
      ・既にそのマップでイベントが作られた場合には作成を実行しない。
      ・エディタにも反映されている。

=end

# ★　設定項目　★
    
    # 各マップに確保する「空きイベント」の数。
    # イベントID「1～指定値」までを新規イベント作成してIDとイベントを確保。
    SPACE_EVENTS_SIZE = 20
    
    # 空きイベントに「アクター名」を付けるかどうか？
    # アクターが空きイベント指定値よりも少ない場合はイベントIDが名前に付与される。
    SPACE_EVENT_NAME_ACTOR = true

module RPG
  class Map
    #----------------------------------------------------------------------
    # ● そのマップで空きイベントを作成したかどうか？
    #----------------------------------------------------------------------
    def add_space_events
      return @add_space_events
    end
    #----------------------------------------------------------------------
    # ● そのマップで空きイベントを作成したかどうかを設定する。
    #----------------------------------------------------------------------
    def add_space_events=(value)
      @add_space_events = value
    end
  end
  
  class Event
    class Page
      #----------------------------------------------------------------------
      # ● 新規作成イベントページかどうか？
      #----------------------------------------------------------------------
      def new_events?
        # 新規作成直後のイベントかどうかを判断。
        #@condition = RPG::Event::Page::Condition.new
        return false unless @graphic.character_name == ""
        return false unless @move_type == 0
        return false unless @move_speed == 3
        return false unless @move_frequency == 3
        return false unless @move_route == RPG::MoveRoute.new
        return false unless @walk_anime == true
        return false unless @step_anime == false
        return false unless @direction_fix == false
        return false unless @through == false
        return false unless @priority_type == 0
        return false unless @trigger == 0
        return false unless @list.indent == 0
        return true
      end
    end
  end
end

#==============================================================================
# ■ Game_Map
#------------------------------------------------------------------------------
# 　マップを扱うクラスです。スクロールや通行可能判定などの機能を持っています。
# このクラスのインスタンスは $game_map で参照されます。
#==============================================================================

class Game_Map
  #--------------------------------------------------------------------------
  # ● イベントのセットアップ
  #--------------------------------------------------------------------------
  alias ed_map_event_space_setup_events setup_events
  def setup_events
    # マップデータ戦闘背景なら元の処理を行い戻る。
    return ed_map_event_space_setup_events if $game_temp.in_battle
    
    # 既にスペースが空いていれば実行しない
    if @map.add_space_events
      ed_map_event_space_setup_events
      return
    end

space_flag = false
    @events = {}          # マップイベント
    temp_keys = @map.events.keys.clone     # マップイベントのID格納配列
    
    # マップイベント数が指定よりも少ない場合
    temp_keys = []
    # 指定までイベントを作成するために配列を作成
    for ev_id in 1..SPACE_EVENTS_SIZE
      temp_keys << ev_id
    end
    temp_keys += @map.events.keys.clone
    temp_keys.uniq! 
    temp_keys.sort!
    # イベントID配列からスペースを空ける処理。
    for i in temp_keys
      # イベントIDが指定よりも大きい場合は処理をしない
      next if i > SPACE_EVENTS_SIZE
      
      # イベントIDが指定以下の場合は実行。
      # イベントページが新規かどうかを判断。
      ev_page = true
      unless @map.events[i] == nil
        for ev_p in @map.events[i].pages
          # 指定イベントの内容が新規でない場合はフラグON
          ev_page = ev_p.new_events?
          break unless ev_page
        end
      else
        ev_page = false
      end
      
      # 新規イベントでなくてIDが指定より小さく、そのマップで挿入済みでない場合
      unless ev_page
        space_flag = true
        # 末尾に現在のイベントをディープコピーしてIDを補正
        unless @map.events[i] == nil
          size = @map.events.keys.size + SPACE_EVENTS_SIZE
          @map.events[size + 1] =  Marshal.load(Marshal.dump(@map.events[i]))
          @map.events[size + 1].id = size + 1
        end
        
        # 新規イベントを作成するための座標設定。
        # 0,0 を基準に右へ配置する。
        ev_x = i - 1
        ev_y = 0
        # マップ幅よりidが大きい場合は幅分のidを引いてyを加算。
        loop do
          if ev_x > @map.width
            ev_x -= @map.width
            ev_y += 1 
          else
            break
          end
        end
        # イベントの新規作成と座標・ID・名前設定
        event = RPG::Event.new(ev_x, ev_y)
        event.id = i
        
        # イベント名にアクターの名前を付けるか？
        # イベントIDを純正みたく「001」のように番号作成。
        if i < 10
          str = "00" + i.to_s
        elsif i < 100
          str = "0" + i.to_s
        else
          str = i.to_s
        end
        if SPACE_EVENT_NAME_ACTOR
          event.name = $data_actors[i] == nil ? "EV" + str : $data_actors[i].name
        else
          # 付けない場合はイベントIDを名前に付与
          event.name = "EV" + str
        end
        @map.events[i] = event
      end
    end
    
    # スペースを空けた処理を実行していて、add_space_evetsがnilかfalseなら実行
    if space_flag and not @map.add_space_events
      @map.add_space_events = true
      save_data(@map, sprintf("Data/Map%03d.rvdata", @map_id))
    end
    ed_map_event_space_setup_events
  end

end

テンプレートのpondt