ホーム
>
RPGツクール
>
テクニック集
>
XP一覧
>
テクニック

リザルト画面２

ResultScene2

概要

Summary

独自の機能を持ったリザルト画面を作成します。

表示する画面の種類・順番は、自由に変更することができます。

↑目次

スクリーンショット

Screen Shot

ScreenShot
戦闘結果。

ScreenShot
レベルアップ。

ScreenShot
能力値上昇確認。

↑目次

更新履歴

History

2007/03/22

専用ページ作成。

2006/09/26

新規作成。

↑目次

スクリプト

Script

#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
#_/    ◆ リザルト画面２ - KGC_ResultScene2 ◆
#_/    ◇ Last update : 2007/03/16 ◇
#_/----------------------------------------------------------------------------
#_/  独自の機能を持ったリザルト画面を作成します。
#_/   ※「リザルト画面２追加スクリプト」より上に導入してください。
#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

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

module KGC
module ResultScene2
  # ◆リザルト画面リスト
  #  表示する画面に対応する画面コードを "表示する順" に格納。
  SCENE_LIST = ["KGC[Rewards]", "KGC[Growth]"]

# ◆リザルト画面BGM
  #  バトル終了MEの後に演奏。
  # (バトル終了MEを設定しなければ即演奏)
  #  使用しないときは、
  #   RESULT_BGM = nil
  # とする。
  RESULT_BGM = RPG::AudioFile.new("045-Positive03", 100, 150)
end
end

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

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

module KGC::ResultScene2
  # 画面コード
  SCENE_CODE = {}
  # Game_Actor#learned_skills 定義済みフラグ
  def self.defined_learned_skills
    return Game_Actor.defined_learned_skills
  end
end

class Game_Actor
  # learned_skills 定義済み確認
  def self.defined_learned_skills
    return method_defined?(:learned_skills)
  end
end

# ▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼
#  ここから下には、リザルト画面を自作する際に使用するスクリプトがあります。
#  ここの情報をもとにして、独自の画面を設計してください。
#
#  自作したリザルト画面スクリプトの著作権は、その画面の作成者に帰属します。
#  したがって、開発者自身のWebサイト上で配布することができます。
#  その際、混乱を防ぐために、本スクリプト≪リザルト画面２≫が必要であることを
# 明記してください。
#   ※≪リザルト画面２≫自体を再配布するときは、事前に許可が必要です。
# ▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼△▼

# ○画面コードを定義
#  ここでは、画面コード:SuperClass にシーンの基本クラスを設定しています。
#  これと同様にして、自作のシーンに対する画面コードを定義してください。
#  画面コードには数値なども使用できますが、文字列を推奨します。
#  標準シーン(KGC Software SDR で配布するシーン)と画面コードが重複しない
# ように、自作の画面コードには自分しか付けないような値を使用してください。
module KGC::ResultScene2
  SCENE_CODE["SuperClass"] = Proc.new { Scene_RS2.new }
end

#==============================================================================
# ■ Scene_RS2
#------------------------------------------------------------------------------
#   リザルト画面の各種シーンを扱うクラスです。
#   独自のシーンは、このクラスを継承して作成します。
#   シーンを終えるときは、exit_scene メソッドを呼び出してください。
#==============================================================================

class Scene_RS2
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
    # このメソッドをオーバーライドして、初期化処理を記述します。
    # ウィンドウの作成などは、ここで行ってください。
    #  ※後々の拡張のため、メソッド先頭で super を呼び出してください。
  end
  #--------------------------------------------------------------------------
  # ● メインルーチン (オーバーライドする必要はありません)
  #--------------------------------------------------------------------------
  def main
    @_exit_flag = false
    Graphics.transition
    while !@_exit_flag
      Graphics.update
      Input.update
      update
    end
    Graphics.freeze
  end
  #--------------------------------------------------------------------------
  # ● シーン終了 (オーバーライドする必要はありません)
  #--------------------------------------------------------------------------
  def exit_scene
    @_exit_flag = true
  end
  #--------------------------------------------------------------------------
  # ● 破棄
  #--------------------------------------------------------------------------
  def dispose
    # このメソッドをオーバーライドし、終了処理を記述します。
    # 作成したウィンドウの破棄などは、ここで行ってください。
    #  ※後々の拡張のため、メソッド先頭で super を呼び出してください。
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  def update
    # このメソッドをオーバーライドし、処理を記述します。
    #  ※後々の拡張のため、メソッド先頭で super を呼び出してください。
  end
end

# ▼△▼△▼△▼△▼△▼△ 自作用クラスここまで ▼△▼△▼△▼△▼△▼△▼△▼△

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

class Game_Temp
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_accessor :battle_exp               # 戦闘での獲得経験値
  attr_accessor :battle_gold              # 戦闘での獲得金額
  attr_accessor :battle_treasures         # 戦闘での獲得アイテム

attr_accessor :battle_bp                # 戦闘での獲得BP [KGC_BattlePoint]
  attr_accessor :battle_ap                # 戦闘での獲得AP [KGC_EquipLearnSkill]

attr_accessor :actor_last_level         # 経験値獲得前のレベル
  attr_accessor :actor_last_parameter     # レベルアップ前のステータス
  attr_accessor :actor_last_skills        # 戦闘終了前のスキル
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias initialize_KGC_ResultScene2 initialize
  def initialize
    initialize_KGC_ResultScene2

@battle_exp  = 0
    @battle_gold = 0
    @battle_treasures  = []

@battle_bp = nil
    @battle_ap = nil

@actor_last_level     = {}
    @actor_last_parameter = {}
    @actor_last_skills    = {}
  end
end

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

#==============================================================================
# ■ Scene_Battle (分割定義 2)
#==============================================================================

class Scene_Battle
  #--------------------------------------------------------------------------
  # ● アフターバトルフェーズ開始
  #--------------------------------------------------------------------------
  alias start_phase5_KGC_ResultScene2 start_phase5
  def start_phase5
    reserve_previous_parameters

start_phase5_KGC_ResultScene2

reserve_spoils
    # 不要なウィンドウを破棄
    @result_window.dispose
    @result_window = nil
  end
  #--------------------------------------------------------------------------
  # ● 処理前のパラメータを保存
  #--------------------------------------------------------------------------
  def reserve_previous_parameters
    # 元のレベル・ステータス・スキルを保存
    level  = $game_temp.actor_last_level.clear
    params = $game_temp.actor_last_parameter.clear
    skills = $game_temp.actor_last_skills.clear
    $game_party.actors.each { |actor|
      level[actor.id]  = actor.level
      params[actor.id] = {
        "maxhp" => actor.maxhp,
        "maxsp" => actor.maxsp,
        "atk"   => actor.atk,
        "pdef"  => actor.pdef,
        "mdef"  => actor.mdef,
        "str"   => actor.str,
        "dex"   => actor.dex,
        "agi"   => actor.agi,
        "int"   => actor.int
      }
      if $imported["SkillCPSystem"]
        params[actor.id]["maxcp"] = actor.maxcp
      end
      if KGC::ResultScene2.defined_learned_skills
        skills[actor.id] = actor.learned_skills.clone
      else
        skills[actor.id] = actor.skills.clone
      end
    }
  end
  #--------------------------------------------------------------------------
  # ● 戦利品を保存
  #--------------------------------------------------------------------------
  def reserve_spoils
    # 戦利品を保存
    $game_temp.battle_exp  = @result_window.exp
    $game_temp.battle_gold = @result_window.gold
    $game_temp.battle_treasures = @result_window.treasures

# 機能に依存する戦利品を保存
    $game_temp.battle_bp = @got_bp
    $game_temp.battle_ap = @got_ap
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新 (アフターバトルフェーズ)
  #--------------------------------------------------------------------------
  def update_phase5
    $game_temp.battle_main_phase = false
    @status_window.refresh
    # リザルト BGM を演奏
    if KGC::ResultScene2::RESULT_BGM != nil
      $game_system.bgm_play(KGC::ResultScene2::RESULT_BGM)
    else
      $game_system.bgm_play($game_temp.map_bgm)
    end
    Graphics.freeze
    # シーン実行
    KGC::ResultScene2::SCENE_LIST.each { |code|
      if KGC::ResultScene2::SCENE_CODE[code] != nil
        scene = KGC::ResultScene2::SCENE_CODE[code].call
        scene.main
        scene.dispose
      end
    }
    # バトル開始前の BGM に戻す
    if KGC::ResultScene2::RESULT_BGM != nil
      $game_system.bgm_play($game_temp.map_bgm)
    end
    # 戦闘終了
    battle_end(0)
  end
end

↑目次

追加スクリプト

Additional Script

↑目次

使用法

Usage

使用したい画面に対応した「追加スクリプト」を導入します。
追加スクリプトは、このスクリプトより下に導入してください。

追加スクリプトを導入したら、カスタマイズ項目の、

# ◆リザルト画面リスト
SCENE_LIST = ["KGC[Rewards]", "KGC[Growth]"]

この部分に、"表示する順番" で画面コードを記述します。

リザルト画面の自作

自作したリザルト画面スクリプトの著作権は、その画面の作成者に帰属します。したがって、開発者自身のWebサイト上で配布することができます。その際、混乱を防ぐために、本スクリプト≪リザルト画面２≫が必要であることを明記してください。
≪リザルト画面２≫自体を再配布するときは、事前に許可が必要です。

まず、画面のシーンクラスを作成します。クラス名には、特に規則はありませんが、分かりやすくするために [Scene_RS2_～] のような名前にすることをお勧めします。

# 定義例
class Scene_RS2_NazoTest
end

シーンクラスを定義したら、クラス内に次のメソッドを実装します。

initialize: このメソッドをオーバーライドして、初期化処理を記述します。
ウィンドウの作成などは、ここで行ってください。
後々の拡張のため、メソッド先頭で super を呼び出してください。
dispose: このメソッドをオーバーライドし、終了処理を記述します。
作成したウィンドウの破棄などは、ここで行ってください。
後々の拡張のため、メソッド先頭で super を呼び出してください。
update: このメソッドをオーバーライドし、処理を記述します。
後々の拡張のため、メソッド先頭で super を呼び出してください。

基本的には、以上のメソッドだけを実装すれば仕様を満たします。シーンを終えるときは、exit_sceneメソッドを呼び出してください。

# 実装例
class Scene_RS2_NazoTest
  def initialize
    super
    # ～ 何か作成 ～
  end
  def dispose
    super
    # ～ 後始末 ～
  end
  def update
    super
    # ～ 色々と処理 ～
    exit_scene  # 終了
  end
end

シーン以外のクラスは、自由に作成して構いません。

追加スクリプト内では、次の変数を使用することができます。

$game_temp.battle_exp            # 取得した経験値
$game_temp.battle_gold           # 取得した金
$game_temp.battle_treasures      # 取得したアイテム
$game_temp.battle_bp             # 取得したBP ≪バトルポイント≫
$game_temp.battle_ap             # 取得したAP ≪装備拡張≫
$game_temp.actor_last_level      # 戦闘終了前のレベル
$game_temp.actor_last_parameter  # 戦闘終了前の能力値
$game_temp.actor_last_skills     # 戦闘終了前に習得していたスキル

取得経験値や、以前のレベルなどを知る必要がある場合は、これらの変数を参照してください。
他の追加スクリプトに悪影響を与えるので、書き換えはしないでください。

$game_temp.actor_last_level, $game_temp.actor_last_parameter, $game_temp.actor_last_skillsは、アクターIDをキーとしたハッシュです。
さらに、$game_temp.actor_last_parameterの各要素は、アクターごとにパラメータ名をキーとしたハッシュになっています。パラメータ名は、maxhp, maxsp, atk, pdef, mdef, str, dex, agi, intです。

# -- 使用例 --
# アクター1 の以前のレベル
level = $game_temp.actor_last_level[1]
# アクター1 の以前のMAXHP
maxhp = $game_temp.actor_last_parameter[1]["maxhp"]
# アクター1 の以前のスキル
skill = $game_temp.actor_last_skills[1]

最後に、作成する画面の「画面コード」を定義します。画面コードの定義は、次の構文で行います。

module KGC::ResultScene2
  SCENE_CODE["Nazo[Test]"] = Proc.new { Scene_RS2_NazoTest.new }
end

"Nazo[Test]"が「画面コード」です。ユーザーは、これを用いて画面を使用します。したがって、このコードは他の追加スクリプトと重複してはいけません。コード中に作者名やサイト名を入れるなど、コードが重複しない工夫をしてください。

Scene_RS2_NazoTestは、追加スクリプトの画面のシーンクラス名です。

↑目次