Cerca nel Forum

Nome Script: Save compresso Versione: 1.00 Autore/i: kaisouryouiki Informazioni: Lo script comprime i salvataggi in un unico file invece di dividerli ^^ Istruzioni: Inserite semplicemente lo script sopra Main. Script: =begin ★セーブデータ一括管理★ Save1.rvdata, Save2.rvdataのように通常セーブの数だけ生成されていく セーブファイルを、１つのセーブファイルにまとめて管理することができます。 ● 注意 ●========================================================== 再定義が非常に多いです。 -------------------------------------------------------------------- このスクリプトを導入する前のセーブデータは読み込めなくなります。 ==================================================================== ver1.00 Last Update : 2010/08/06 08/06 : 「セーブファイル破棄」に対応 07/30 : 新規(FSMにて。ver0.50) ろかん　　　http://kaisouryouiki.web.fc2.com/ =end $rsi = {} if $rsi == nil $rsi["セーブデータ一括管理"] = true class Window_SaveFile < Window_Base #-------------------------------------------------------------------------- # ● オブジェクト初期化 ※ 再定義 #-------------------------------------------------------------------------- def initialize(file_index, data) # 引数が変化しているので注意 super(0, 56 + file_index % 4 * 90, 544, 90) @time_stamp = Time.at(0) @file_index = file_index @file_data = data # 渡されたデータが空(empty)の際にセーブが存在しないとみなします。 @file_exist = ! @file_data.empty? load_gamedata refresh @selected = false end #-------------------------------------------------------------------------- # ● ゲームデータの一部をロード ※ 再定義 #-------------------------------------------------------------------------- def load_gamedata # データそのものが渡されてきているのでファイルをopenする必要なし。 if @file_exist @time_stamp = @file_data[0] @characters = @file_data[1] @frame_count = @file_data[2] @last_bgm = @file_data[3] @last_bgs = @file_data[4] @[member=GamerLog]_system = @file_data[5] @[member=GamerLog]_message = @file_data[6] @[member=GamerLog]_switches = @file_data[7] @[member=GamerLog]_variables = @file_data[8] @total_sec = @frame_count / Graphics.frame_rate end end end class Scene_Title < Scene_Base #-------------------------------------------------------------------------- # ● コンティニュー有効判定 ※ 再定義 #-------------------------------------------------------------------------- def check_continue @continue_enabled = false return unless File.exist?("Save.rvdata") file = File.open("Save.rvdata", "rb") for data in Marshal.load(file) @continue_enabled = ! data.empty? break if @continue_enabled end file.close end end class Scene_File < Scene_Base #-------------------------------------------------------------------------- # ● ファイル名の取得 #-------------------------------------------------------------------------- def filename return "Save.rvdata" end #-------------------------------------------------------------------------- # ● セーブファイルウィンドウの作成 ※ 再定義 #-------------------------------------------------------------------------- def create_savefile_windows @item_max = 4 @savefile_windows = [] load_data_list # この段階で全てのセーブデータを読み込む @item_max.times do |i| # ウィンドウ生成時にインデックスに該当するセーブデータを渡します。 @savefile_windows.push(Window_SaveFile.new(i, @dataList[i])) end end #-------------------------------------------------------------------------- # ● セーブの実行 ※ 再定義 #-------------------------------------------------------------------------- def do_save write_save_data return_scene end #-------------------------------------------------------------------------- # ● ロードの実行 ※ 再定義 #-------------------------------------------------------------------------- def do_load read_save_data $scene = Scene_Map.new RPG::BGM.fade(1500) Graphics.fadeout(60) Graphics.wait(40) @last_bgm.play @last_bgs.play end #-------------------------------------------------------------------------- # ● 全てのセーブが収まったデータを取得（ウィンドウ生成前に呼ばれるのみ） #-------------------------------------------------------------------------- def load_data_list # ファイルが存在しない場合はデータ取得前にファイルを生成する unless File.exist?(filename) @dataList = [] @item_max.times do @dataList << [] end save_data_list end file = File.open(filename, "rb") @dataList = Marshal.load(file) file.close end #-------------------------------------------------------------------------- # ● 全てのセーブが収まったデータを保存（@dataListの内容変更時に呼ばれる） #-------------------------------------------------------------------------- def save_data_list file = File.open(filename, "wb") Marshal.dump(@dataList, file) file.close end #-------------------------------------------------------------------------- # ● セーブデータの書き込み ※ 再定義 #-------------------------------------------------------------------------- def write_save_data characters = [] for actor in $game_party.members characters.push([actor.character_name, actor.character_index]) end $game_system.save_count += 1 $game_system.version_id = $data_system.version_id @dataList[@index] = [] # クリア @dataList[@index] << Time.now # セーブした時間:タイムスタンプとして利用 @dataList[@index] << characters @dataList[@index] << Graphics.frame_count @dataList[@index] << RPG::BGM::last @dataList[@index] << RPG::BGS::last @dataList[@index] << $game_system @dataList[@index] << $game_message @dataList[@index] << $game_switches @dataList[@index] << $game_variables @dataList[@index] << $game_self_switches @dataList[@index] << $game_actors @dataList[@index] << $game_party @dataList[@index] << $game_troop @dataList[@index] << $game_map @dataList[@index] << $game_player save_data_list # 保存 end #-------------------------------------------------------------------------- # ● セーブデータの読み込み ※ 再定義 #-------------------------------------------------------------------------- def read_save_data Graphics.frame_count = @dataList[@index][2] @last_bgm = @dataList[@index][3] @last_bgs = @dataList[@index][4] $game_system = @dataList[@index][5] $game_message = @dataList[@index][6] $game_switches = @dataList[@index][7] $game_variables = @dataList[@index][8] $game_self_switches = @dataList[@index][9] $game_actors = @dataList[@index][10] $game_party = @dataList[@index][11] $game_troop = @dataList[@index][12] $game_map = @dataList[@index][13] $game_player = @dataList[@index][14] if $game_system.version_id != $data_system.version_id $game_map.setup($game_map.map_id) $game_player.center($game_player.x, $game_player.y) end end #-------------------------------------------------------------------------- # ● ファイル破棄の実行 #-------------------------------------------------------------------------- def file_delete @dataList[@index] = [] # クリア save_data_list end end