YFK Project OFFICIAL SITE

適当なRGSS3置き場

※RGSSのリクエストは受け付けていません。
気が向いたら息抜き程度に更新しています。
RGSSに関するサポートは終了しました。
お問い合わせ頂いても一切お答えすることが出来ませんのでご了承ください。
利用報告、著作権表記は任意です。
著作権表記はして頂ける場合、ご都合の良い場所の片隅に記載ください。
商業向け等、何にでもご利用ください。利用報告不要。

BGM管理

BGMを管理するプロセスを追加します。
マップにBGM設定がされていると、すぐにBGMを切り替えたい時に一瞬設定されているBGMが演奏されるのを未然に防ぎます。
他、ゲーム変数で選曲式なので場所移動直後に即座にBGMが指定したBGMで反映されます。

#==============================================================================
# ■ BGM管理
#------------------------------------------------------------------------------
# 　指定スイッチがONの時変数に応じてBGMを強制的に演奏する機能を追加します。
#------------------------------------------------------------------------------
# ☆ カスタマイズポイント
#------------------------------------------------------------------------------
class RPG::BGM < RPG::AudioFile
  # 指定スイッチ番号 / BGM変更の許可番号
  SW = 1
  # 選曲用変数 / この値で演奏させるBGMを管理
  VL = 1
=begin
# 使用例と選曲方法
  case $game_variables[VL]
  when 0; @name = "曲名"
    追加手順
    変数の数値を変更すると選曲が変動する
  when 1; @name = "曲名" 二番目のBGM
  when 2; @name = "曲名" 三番目のBGM
    
  end
# "" を指定するとBGMを停止します。
=end

  def play(pos = 0)
    if @name.empty?
      Audio.bgm_stop
      @@last = RPG::BGM.new
    else
      if $game_switches[SW]
        case $game_variables[VL]
        when 0; @name = ""
        when 1; @name = ""
          
        end
        if @name.empty?
          Audio.bgm_stop
          @@last = RPG::BGM.new
        else
          Audio.bgm_play('Audio/BGM/' + @name, @volume, @pitch, pos)
        end
      else
        Audio.bgm_play('Audio/BGM/' + @name, @volume, @pitch, pos)
      end
      @@last = self.clone
    end
  end
end
#==============================================================================
# ■ Game_Player
#==============================================================================

class Game_Player < Game_Character
  #--------------------------------------------------------------------------
  # ● 場所移動の実行
  #--------------------------------------------------------------------------
  def perform_transfer
    if transfer?
      set_direction(@new_direction)
      if @new_map_id != $game_map.map_id
        $game_map.setup(@new_map_id)
        $game_map.autoplay
      end
      if $game_switches[RPG::BGM::SW]
        $game_map.autoplay
      end
      moveto(@new_x, @new_y)
      clear_transfer_info
    end
  end
end

戦闘終了時BGM演奏

戦闘終了後、リザルトが長い素材や、
リザルトが細かくプレイヤーの目に渡るような場合に有効

#==============================================================================
# ■ BattleManager
#==============================================================================

module BattleManager
  #--------------------------------------------------------------------------
  # ★ ユーザーカスタム箇所
  #--------------------------------------------------------------------------
  # BGMフォルダに入れる戦闘終了時に演奏させるファイル名
  WIN_BGM_NAME = "Theme5"
  
  # 戦闘終了時にBGMを演奏させたくないときに使用するスイッチ番号 0 指定で無効
  NO_BGM_SWITCHES = 1
  #--------------------------------------------------------------------------
  # 以下システム処理
  #--------------------------------------------------------------------------
  # ● 勝利の処理
  #--------------------------------------------------------------------------
  def self.process_victory
    play_battle_end_me
    $game_message.add(sprintf(Vocab::Victory, $game_party.name))
    display_exp
    gain_gold
    gain_drop_items
    gain_exp
    SceneManager.return
    battle_end(0)
    return true
  end
  #--------------------------------------------------------------------------
  # ● 戦闘終了 BGM の演奏 / 再定義 / 元は ME 演奏
  #--------------------------------------------------------------------------
  def self.play_battle_end_me
    # ゲームスイッチ2番が ON の時は 勝利BGM を演奏しない
    Audio.bgm_play("Audio/BGM/" + WIN_BGM_NAME, 75) unless $game_switches[NO_BGM_SWITCHES]
  end
end
#==============================================================================
# ■ Scene_Battle
#------------------------------------------------------------------------------
# 　バトル画面の処理を行うクラスです。
#==============================================================================

class Scene_Battle < Scene_Base
  #--------------------------------------------------------------------------
  # ● 終了処理
  #--------------------------------------------------------------------------
  alias bgm_terminate terminate
  def terminate
    BattleManager.replay_bgm_and_bgs
    bgm_terminate
  end
end

消費TP100以上設定可能

スキルのメモに以下のように記述してください。

TP:n
※n には消費TPに加算したい数値

これで100以上のTP消費スキルを設定できます。
また、最大TPの変更もこのRGSS内部で行えます。

#==============================================================================
# ■ Game_BattlerBase
#==============================================================================

class Game_BattlerBase
  #--------------------------------------------------------------------------
  # ● 最大TPの設定
  #--------------------------------------------------------------------------
  MAXTP = 999
  #--------------------------------------------------------------------------
  # ● スキルの消費 TP 計算
  #--------------------------------------------------------------------------
  def skill_tp_cost(skill)
    words = skill.note
    for note in [words]
      memo = note.scan(/TP:(\S+)/)
      unless memo[0].nil?
        result = memo[0][0].to_i
      end
    end
    result.nil? ? skill.tp_cost : skill.tp_cost + result 
  end
  #--------------------------------------------------------------------------
  # ● TP の最大値を取得
  #--------------------------------------------------------------------------
  def max_tp
    return MAXTP
  end
end

ダメージリミッターRGSS3

ダメージリミッターを追加します。

  HP_MIN　→　ダメージの最小値の設定
  HP_MAX　→　ダメージの最大値の設定
  MP_MIN　→　省略
  MP_MAX　→　省略

#==============================================================================
# ■ Game_ActionResult
#==============================================================================

class Game_ActionResult
  HP_MIN = -9999
  HP_MAX = 9999
  MP_MIN = -999
  MP_MAX = 999
  #--------------------------------------------------------------------------
  # ● ダメージの作成
  #--------------------------------------------------------------------------
  def make_damage(value, item)
    @critical = false if value == 0
    if item.damage.to_hp?
      @hp_damage = [[value, HP_MIN].max, HP_MAX].min
    end
    if item.damage.to_mp?
      @mp_damage = [[value, MP_MIN].max, MP_MAX].min
    end
    @mp_damage = [@battler.mp, @mp_damage].min
    @hp_drain = @hp_damage if item.damage.drain?
    @mp_drain = @mp_damage if item.damage.drain?
    @hp_drain = [@battler.hp, @hp_drain].min
    @success = true if item.damage.to_hp? || @mp_damage != 0
  end
end

スキル全般使用条件導入

神獣とその血族にも同封中

#==============================================================================
# ■ Game_Skill_Restriction / 新規クラス
#------------------------------------------------------------------------------
# 　スキル全般の使用制約クラスです。
#   このスクリプトは中級者向けです。
#==============================================================================

class Game_Skill_Restriction
  #--------------------------------------------------------------------------
  # ● オブジェクトの初期化
  #--------------------------------------------------------------------------
  def initialize(actor)
    @actor = actor
  end
  #--------------------------------------------------------------------------
  # ● 全スキル有効判定 / カスタマイズ可能部分
  #--------------------------------------------------------------------------
  def judge(item)
    # セットされているのはデフォルトの状態のスキルデータベース番号の一部
    # @actorに戦闘行動者のオブジェクトが渡されているため、
    # Game_BattlerBaseからの各種メソッドを使用制限として条件化可能
    # いわゆる何でも使用条件にできる制御クラス
    
    # 追加するには、以下の文法のように記述(例)
    
    # when 27   # ヒールⅡ / 魔法力が101以上で使用可能
    #  return if @actor.mat > 100 ? true : false
    # when 28   # ヒールⅢ / 魔法力が201以上で使用可能
    #  return if @actor.mat > 200 ? true : false
    # end
    
  #--------------------------------------------------------------------------
  # ● スクリプト下部へコピー文や応用講座が記載されているので、
  # より深みのあるスキル演出のご参考にして下さい。
  # RGSS 初心者向きに記述されています。
  #--------------------------------------------------------------------------

    # 以下カスタマイズ
    case item.id
    when 1   # 攻撃の制御 / 攻撃行動自体に制限がかかるので注意
      return true 
    when 2   # 防御の制御 / 防御行動自体に制限がかかるので注意
      return true
    when 62   # スパークⅡ
      
      # パーティーに瀕死の者がいる場合のみ使用可能
      
      for i in 0...$game_party.battle_members.size
        member = $game_party.battle_members[i]
        if @actor.id != member.id
          
          # dying?は Game_BattlerBase に追加定義したものです
          
          if member.dying?
            return true
          else
            return false
          end
        end
      end
    end
    return true
  end
end

# 以下、カスタマイズを適用する構造部分なのでRGSS初心者はいじらないこと推奨
#
#==============================================================================
# ■ Game_Actor
#------------------------------------------------------------------------------
# 　アクターを扱うクラスです。このクラスは Game_Actors クラス（$game_actors）
# の内部で使用され、Game_Party クラス（$game_party）からも参照されます。
#==============================================================================

class Game_Actor < Game_Battler
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化 / エイリアス
  #--------------------------------------------------------------------------
  alias kuro_initialize initialize
  def initialize(actor_id)
    @sk_judge = Game_Skill_Restriction.new(self)
    kuro_initialize(actor_id)
  end
  #--------------------------------------------------------------------------
  # ● スキルの使用可能条件チェック 2 / 追加定義
  #--------------------------------------------------------------------------
  def skill_available(item)
    # 既存セーブデータに対応
    if !defined?(@sk_judge)
      @sk_judge = Game_Skill_Restriction.new(self)
    end
    return @sk_judge.judge(item)
  end
end
#==============================================================================
# ■ Game_BattlerBase
#------------------------------------------------------------------------------
# 　バトラーを扱う基本のクラスです。主に能力値計算のメソッドを含んでいます。こ
# のクラスは Game_Battler クラスのスーパークラスとして使用されます。
#==============================================================================

class Game_BattlerBase
  #--------------------------------------------------------------------------
  # ● スキル／アイテムの使用可能判定 / 再定義
  #--------------------------------------------------------------------------
  def usable?(item)
    if self.is_a?(Game_Actor) && item.is_a?(RPG::Skill)
      return skill_conditions_met?(item) && self.skill_available(item)
    end
    return skill_conditions_met?(item) if item.is_a?(RPG::Skill)
    return item_conditions_met?(item)  if item.is_a?(RPG::Item)
    return false
  end
  #--------------------------------------------------------------------------
  # ● 瀕死判定 / 追加定義
  #--------------------------------------------------------------------------
  def dying?
    self.hp < self.mhp / 4
  end
end

  #--------------------------------------------------------------------------
  # ● スクリプト下部へコピー応用コメント集
  #--------------------------------------------------------------------------
  # ● 基礎アクター能力対応アクセスメソッド表
  #--------------------------------------------------------------------------
#   @actor.level            => レベル         / Character Level
#   @actor.class_id         => 職業           / Character Class
#   @actor.mhp              => 最大HP         / Maximum Hit Point
#   @actor.mmp              => 最大MP         / Maximum Magic Point
#   @actor.atk              => 攻撃力         / ATtacK power
#   @actor.def              => 防御力         / DEFense power
#   @actor.mat              => 魔法力         / Magic ATtack power
#   @actor.mdf              => 魔法防御       / Magic DeFense power
#   @actor.agi              => 敏捷性         / AGIlity
#   @actor.luk              => 運             / LUcK
#   @actor.hit              => 命中率         / HIT rate
#   @actor.eva              => 回避率         / EVAsion rate
#   @actor.cri              => 会心率         / CRItical rate
#   @actor.cev              => 会心回避率     / Critical EVasion rate
#   @actor.mev              => 魔法回避率     / Magic EVasion rate
#   @actor.mrf              => 魔法反射率     / Magic ReFlection rate
#   @actor.cnt              => 反撃率         / CouNTer attack rate
#   @actor.hrg              => HP再生率       / Hp ReGeneration rate
#   @actor.mrg              => MP再生率       / Mp ReGeneration rate
#   @actor.trg              => TP再生率       / Tp ReGeneration rate
#   @actor.tgr              => 狙われ率       / TarGet Rate
#   @actor.grd              => 防御効果率     / GuaRD effect rate
#   @actor.rec              => 回復効果率     / RECovery effect rate
#   @actor.pha              => 薬の知識       / PHArmacology
#   @actor.mcr              => MP消費率       / Mp Cost Rate
#   @actor.tcr              => TPチャージ率   / Tp Charge Rate
#   @actor.pdr              => 物理ダメージ率 / Physical Damage Rate
#   @actor.mdr              => 魔法ダメージ率 / Magical Damage Rate
#   @actor.exr              => 経験獲得率     / EXperience Rate
#   @actor.hp_rate          => HP割合         / HP Rate
#   @actor.mp_rate          => MP割合         / MP Rate
#   @actor.tp_rate          => TP割合         / TP Rate
#   @actor.dead?            => 戦闘不能       / Character Dead
#   @actor.state?(state_id) => ステート検査   / Character Inspection State
# 追加定義用
#   @actor.dying?           => 最大HP1/4以下  / Dying Hit Point Below 1/4 

  #--------------------------------------------------------------------------
  # ● 基礎アクター能力対応アクセスメソッドコピー参考用
  # when n の"n"はスキルの番号を入力
  # >= n の"n"は、その能力が指定した数値以上のときに使えるようになります。
  # 他の素材等で、職業チェンジ後にスキルを継承するが、
  # このスキルはその職業でしか使用させたくないときは、
  # @actor.class_id == 職業番号 を指定します。
  # こうすることで、覚えていても職業が違う場合はスキルに使用制限をかけます。
  #--------------------------------------------------------------------------
#~   case item.id
#~   when n
#~     return if @actor.level >= n ? true : false 
#~   when n
#~     return if @actor.class_id == n ? true : false 
#~   when n
#~     return if @actor.mhp >= n ? true : false 
#~   when 11
#~     return if @actor.mmp >= 100 ? true : false 
#~   when 12
#~     return if @actor.atk >= 100 ? true : false 
#~   when 13
#~     return if @actor.def >= 100 ? true : false 
#~   when 14
#~     return if @actor.mat >= 100 ? true : false 
#~   when 15
#~     return if @actor.mdf >= 100 ? true : false 
#~   when 16
#~     return if @actor.agi >= 100 ? true : false 
#~   when 17
#~     return if @actor.luk >= 100 ? true : false 
#~   when 18
#~     return if @actor.hit >= 100 ? true : false 
#~   when 19
#~     return if @actor.eva >= 100 ? true : false 
#~   when 20
#~     return if @actor.cri >= 100 ? true : false 
#~   when 21
#~     return if @actor.cev >= 100 ? true : false 
#~   when 22
#~     return if @actor.mev >= 100 ? true : false 
#~   when 23
#~     return if @actor.mrf >= 100 ? true : false 
#~   when 24
#~     return if @actor.cnt >= 100 ? true : false 
#~   when 25
#~     return if @actor.hrg >= 100 ? true : false 
#~   when 26
#~     return if @actor.mrg >= 100 ? true : false 
#~   when 27
#~     return if @actor.trg >= 100 ? true : false 
#~   when 28
#~     return if @actor.tgr >= 100 ? true : false 
#~   when 29
#~     return if @actor.grd >= 100 ? true : false 
#~   when 30
#~     return if @actor.rec >= 100 ? true : false 
#~   when 31
#~     return if @actor.pha >= 100 ? true : false 
#~   when 32
#~     return if @actor.mcr >= 100 ? true : false 
#~   when 33
#~     return if @actor.tcr >= 100 ? true : false 
#~   when 34
#~     return if @actor.pdr >= 100 ? true : false 
#~   when 35
#~     return if @actor.mdr >= 100 ? true : false 
#~   when 36
#~     return if @actor.exr >= 100 ? true : false 
#~   end
#------------------------------------------------------------------------------
# ☆ また、記述は以下のように省略できます。
#==============================================================================
#~   case item.id
#~   when n  ; return @actor.hp_rate <= 30 / 残りHPが30%以下の場合使用可能
#~   when n  ; return @actor.mp_rate >= 50 / 残りMPが50%以上の場合使用可能
#~   end
#------------------------------------------------------------------------------
# ● 基礎アクター能力対応アクセスメソッドコピー応用
# RES_SK_CLASES1 = [1, 2]の[]に含まれた職業のみ使用を許可する仕組みの構造
#==============================================================================
# ■ DataManager
#------------------------------------------------------------------------------
# 　データベースとゲームオブジェクトを管理するモジュールです。ゲームで使用する
# ほぼ全てのグローバル変数はこのモジュールで初期化されます。
#==============================================================================

module DataManager
  RES_SK_CLASES1 = [1, 2]  # ここに含まれない職業は使用を規制する / パターン1
  RES_SK_CLASES2 = [3, 4]  # ここに含まれない職業は使用を規制する / パターン2
end
#--------------------------------------------------------------------------
# RES_SK_CLASES1という定数を個々に量産することで、
# 幅広くスキルの有無を指定できるようになります。
#--量産例--
# RES_SK_CLASES3 = [5, 6]         # パターン3
# RES_SK_CLASES4 = [7, 8, 9, 10]  # パターン4
#--------------------------------------------------------------------------
#~   case item.id
#~   when n
#~     return DataManager::RES_SK_CLASES1.include?(@actor.class_id)
#~   end
#------------------------------------------------------------------------------
# ● include?は、その変数(定数)の配列([]の内のこと)に含まれていれば真(可)を、
#  なければ偽(不可)を返すので、
#  return DataManager::RES_SK_CLASES1.include?(@actor.class_id)と記述するだけで
#  その判断を簡単に評価してくれます。
#------------------------------------------------------------------------------

ComboSystem導入媒体RGSS3 Ver5.5.7

2015/12/11
コンボダメージマグニフィケーション追加。
2015/07/31
目視継続時間フレーム表示機能追加。
2015/05/29
最大HIT　DAMAGE　EXP　GOLDの指定が可能へ。
HIT数に応じたアイテムドロップ率変動機能追加。

上記作品のComboSystemの拡張版(※)です。
本システムを導入するには、ComboSystem実装のRGSS3が必要です。
※エルフの末裔-神獣とその血族-のComboSystem実装には不具合があるため、
以下のを導入することをオススメします。

コンボシステムを導入するとこのように表示されます

(敵コンボは別途必要です)。
(映像はVer5.00の物です)。

※ComboSystem導入前にこれもComboSystemのRGSSより上に導入してください。
マテリアルスプライト解放用Scene_BaseRGSS ComboSystem本体

#==============================================================================
# ■ Combo_System / 新規クラス
#----------------------------------------------------------------------------
# 作成者：黒崎 綾人
# システムバージョン：5.5.7
#----------------------------------------------------------------------------
# XPで作成したコンボスクリプトをVXACEで再現します。
# 構造が非常に適当なので、使用価値があるかないかは、導入して検討して下さい。
# 他の素材と競合を極限まで阻止するには、このRGSSを上の方へ配置してください。
#==============================================================================

class Combo_System
  #--------------------------------------------------------------------------
  # ☆ ユーザー設定項目
  #--------------------------------------------------------------------------
  # コンボシステム起動時のゲームスイッチ番号
  # 0 を指定すると即時起動
  SW = 0
  
  # 各種システムネーム
  # [コンボ数、総合ダメージ、ボーナス経験値、ボーナスゴールド、継続時間ネーム]
  COMBO_NAME = ["Hits", "Damage", "Exp", "Gold", "Duration"]
  
  # フェードイン・アウト補正値
  SHOW_OPACITY = 20
  
  # 更新ズーム補正値(変更は推奨されない)
  ZOOM = 1.5
  
  # コンボ継続時間(60で1秒) イニシャル定数
  # -1 で指定するとただのカウンターとして使用可能
  DURATION = 120
  # クリティカル(会心)時のコンボ継続時間ボーナス アディング定数
  # 0 で指定すると、最終的な持続時間を倍へ引き上げる
  # -1 で指定すると、このボーナスを使用しない
  ADDING_DURATION = 0
  # コンボ継続時間 パーティー数とトループ数に依存の利用をするかどうか
  # true なら利用 false なら利用しない
  DEPENDANT = true
  
  # パーティー(バトルメンバー)数とトループ数に依存の場合の持続時間詳細を指定
  # 初期設定の場合、パーティー数×2 ＋ トループ数×2 を足した値を持続時間へ掛ける
  # 敵味方双方が戦闘不能になるたびにその総数が減少し、
  # 持続時間の減りが早くなっていく仕様
  # [味方, 敵]
  DUR_DEPEN = [2, 2]
  
  # システムをコンソールへ表示するデバッグを行うかどうか
  CON_SYSTEM_OK = false
  # 持続時間をリアルタイムでコンソールへ表示するデバッグを行うかどうか
  CON_DURATION_OK = false
  
  # 使用するシステムセレクト
  HIT_OK       = true
  DAMAGE_OK    = true
  EXP_OK       = true
  GOLD_OK      = true
  ITEM_DROP_OK = true
  # ダメージが 0 の場合はコンボをカウントしない
  D_ZERO = true
  
  # 文字の大きさ
  FONT_SIZE = 20
  # 文字の名前
  FONT_NAME = ["AR BLANCA", "Georgia"]
  
  # 表示位置補正定数一覧
  # HITのシステムネーム表示補正                # 数値表示位置補正
  HX  = 291 ; HY  = 64  ; HW  = 160 ; HH  = 32 ; NHX = 421 ; NHY = 64
  # DAMAGEのシステムネーム表示補正             # 数値表示位置補正
  DX  = 312 ; DY  = 80  ; DW  = 160 ; DH  = 32 ; NDX = 442 ; NDY = 80
  # EXPのシステムネーム表示補正                # 数値表示位置補正
  EX  = 333 ; EY  = 96  ; EW  = 160 ; EH  = 32 ; NEX = 463 ; NEY = 96
  # GOLDのシステムネーム表示補正               # 数値表示位置補正
  GX  = 354 ; GY  = 112 ; GW  = 160 ; GH  = 32 ; NGX = 484 ; NGY = 112
  # 全体の高さ補正 (※低くなると表示されなくなるので注意)
  DIS_Z = 1 # 標準は 1 で安定
  
  # コンボ継続時間ゲージを利用するかどうか
  # 開発便宜上 Window で作成
  GAUGE = true
  # 持続時間ゲージを表示する場合の位置補正(ウィンドウ)
  WIN_X = 482 ; WIN_Y = 134 ; WIN_W = 64 ; WIN_H = 28
  # 持続時間ゲージを表示する場合の位置補正(ゲージ)
  GAUGE_X = -4 ; GAUGE_Y = -16 ; GAUGE_W = 48 ; GAUGE_H = 6
  # 持続時間ゲージウィンドウ枠透明度 / 0 で枠消滅
  WIN_OPA = 0
  # 持続時間ゲージウィンドウバック枠透明度 / 0 で背景消滅
  # WIN_OPA が 0 の場合は意味は持たない
  WIN_BACK_OPA = 96
  # ゲージカラー左端
  COLOR1 = Color.new(160, 128, 128)
  # ゲージカラー右端
  COLOR2 = Color.new(160, 128, 192)
  
  # コンボ継続時間の値表示を利用するかどうか
  COUNTER = true
  
  # 最大継続時間フレーム（60で１秒）
  MAX_FRAME = 9999
  
  # ボーナス獲得の表示
  EXP_MES  = "%s の追加経験値を獲得！"
  GOLD_MES = "さらにお金を %s\\G 手に入れた！"
    
  # EXP GOLDボーナスの時のHIT数による割合 ÷ 定数
  EXP_RATE_H1  = 5.5 ; EXP_RATE_H2  = 4.0
  GOLD_RATE_H1 = 5.5 ; GOLD_RATE_H2 = 4.0
  
  # EXP GOLDボーナスの時のDAMAGE数による割合 ÷ 定数
  EXP_RATE_D1  = 100.0 ; EXP_RATE_D2  = 50.0
  GOLD_RATE_D1 = 100.0 ; GOLD_RATE_D2 = 50.0
  
  # アイテムドロップ率ボーナス獲得のヒット数割合
  # ○HIT / DROP_ITEM_RATE
  DROP_ITEM_RATE = 5
  
  # EXP GOLDボーナスの時の最終補正値
  # EXP(GOLD)_RATE / EXP(GOLD)_RATE で計算後
  # さらに割る値を設定
  # 0 の場合何も行わない
  LAST_RATE = 2
  
  # 成績格納ゲーム変数番号
  # [HIT, DAMAGE, EXP, GOLD]
  VARIABLES_ID = [1, 2, 3, 4]
  
  # ヒット、ダメージ、獲得経験値、お金の最大値
  # [ヒット, ダメージ, 経験値, お金]
  MAX_COMBO = [999, 999999999, 9999, 9999]
  
  # リザルトウィンドウ表示位置
  WINDOW_X = 0
  WINDOW_Y = 144
    
  # コンボダメージのマグニフィケーション
  # 倍率補正 1.1 または 2.5 など、小数点で記述
  # 1 HITあたり、1.1倍のダメージ補正が乗るなどの計算に使われます
  # 式：(value * (100 + 1HIT * magnification) / 100).to_i - value => 加算値
  # 0 指定で無効
  MAGNI = 2.0
  
  #--------------------------------------------------------------------------
  # ● カスタムはここまで 以下実行スクリプト
  #--------------------------------------------------------------------------
  #--------------------------------------------------------------------------
  # ● RECT
  #--------------------------------------------------------------------------
  HIT    = [Rect.new(HX, HY, HW, HH), Rect.new(NHX, HY, HW, HH)]
  DAMAGE = [Rect.new(DX, DY, DW, DH), Rect.new(NDX, DY, DW, DH)]
  EXP    = [Rect.new(EX, EY, EW, EH), Rect.new(NEX, EY, EW, EH)]
  GOLD   = [Rect.new(GX, GY, GW, GH), Rect.new(NGX, GY, GW, GH)]
  #--------------------------------------------------------------------------
  # ● システムコンソール
  #--------------------------------------------------------------------------
  def systems
    p "使用中のシステム => [H:#{@system[0]} D:#{@system[1]} E:#{@system[2]} G:#{@system[3]} I:#{ITEM_DROP_OK}]"
    p "各種システムネーム => #{COMBO_NAME}"
    p "コンボシステム起動時のゲームスイッチ番号      => #{SW}"
    p "フェードイン・アウト補正値                    => #{SHOW_OPACITY}"
    p "更新ズーム補正値                              => #{ZOOM}"
    p "コンボ継続時間イニシャル定数                  => #{DURATION}"
    p "コンボ継続時間ボーナス アディング定数         => #{ADDING_DURATION}"
    p "コンボ継続時間 パーティー数とトループ数に依存 => #{DEPENDANT}"
    p "コンボ継続時間ゲージを利用するかどうか        => #{GAUGE}"
    p "パーティー数とトループ数に依存持続時間詳細    => #{DUR_DEPEN}"
    p "システム表示                                  => #{CON_SYSTEM_OK}"
    p "持続時間をリアルタイム表示                    => #{CON_DURATION_OK}"
    p "ダメージが 0 の場合はコンボをカウントしない   => #{D_ZERO}"
    p "文字の大きさ => #{FONT_SIZE}"
    p "文字の名前   => #{FONT_NAME}"
    p "HITのシステム表示位置情報    => (#{HX}, #{HY}, #{HW}, #{HH}, #{NHX}, #{NHY})"
    p "DAMAGEのシステム表示位置情報 => (#{DX}, #{DY}, #{DW}, #{DH}, #{NDX}, #{NDY})"
    p "EXPのシステム表示位置情報    => (#{EX}, #{EY}, #{EW}, #{EH}, #{NEX}, #{NEY})"
    p "GOLDのシステム表示位置情報   => (#{GX}, #{GY}, #{GW}, #{GH}, #{NGX}, #{NGY})"
    p "ゲージウィンドウ位置情報     => (#{WIN_X}, #{WIN_Y}, #{WIN_W}, #{WIN_H})"
    p "ゲージ表示位置情報           => (#{GAUGE_X}, #{GAUGE_Y}, #{GAUGE_W}, #{GAUGE_H})"
    p "持続時間ゲージウィンドウ枠透明度       => #{WIN_OPA}"
    p "持続時間ゲージウィンドウバック枠透明度 => #{WIN_BACK_OPA}"
    p "ゲージカラー左端 => #{COLOR1}"
    p "ゲージカラー右端 => #{COLOR2}"
    p "高さ補正 => #{DIS_Z}"
    p "成績格納ゲーム変数番号           => #{VARIABLES_ID}"
    p "ボーナス獲得の表示EXP            => #{EXP_MES}"
    p "ボーナス獲得の表示GOLD           => #{GOLD_MES}"
    p "EXP GOLDボーナスの時の最終補正値 => #{LAST_RATE}"
    p "HIT EXP上昇式     (敵のEXP  × (HIT    ÷ #{EXP_RATE_H1})    ÷ #{EXP_RATE_H2})"
    p "HIT GOLD上昇式    (敵のGOLD × (HIT    ÷ #{GOLD_RATE_H1})    ÷ #{GOLD_RATE_H2})"
    p "DAMAGE EXP上昇式  (敵のEXP  × (DAMAGE ÷ #{EXP_RATE_D1}) ÷ #{EXP_RATE_D2})"
    p "DAMAGE GOLD上昇式 (敵のGOLD × (DAMAGE ÷ #{GOLD_RATE_D1}) ÷ #{GOLD_RATE_D2})"
    p "戦闘開始時のMAX持続時間 => #{@combo_duration}"
    p "MAXHIT => #{MAX_COMBO[0]}"
    p "MAXDAMEGE => #{MAX_COMBO[1]}"
    p "MAXEXP => #{MAX_COMBO[2]}"
    p "MAXGOLD => #{MAX_COMBO[3]}"
    p "アイテムドロップ率割合の値 => #{DROP_ITEM_RATE}"
  end
  #--------------------------------------------------------------------------
  # ● 公開インスタンス
  #--------------------------------------------------------------------------
  attr_reader   :combo_hit_count_max   # 最大HIT数
  attr_reader   :combo_damage_max      # 最大DAMAGE数
  attr_reader   :combo_exp_max         # 最大獲得EXP
  attr_reader   :combo_gold_max        # 最大獲得GOLD
  attr_accessor :combo_hit_count       # HIT数
  attr_accessor :combo_damage          # DAMAGE数
  attr_accessor :combo_exp             # EXP数
  attr_accessor :combo_gold            # GOLD数
  attr_accessor :combo_duration        # コンボの持続時間
  attr_accessor :combo_cri_duration    # コンボのボーナス持続時間
  attr_accessor :combo_duration_max    # コンボの最大持続時間
  #--------------------------------------------------------------------------
  # ● OKリーダー
  #--------------------------------------------------------------------------
  def h_ok?        ; HIT_OK    ; end
  def d_ok?        ; DAMAGE_OK ; end
  def e_ok?        ; EXP_OK    ; end
  def g_ok?        ; GOLD_OK   ; end
  def window_ok?   ; GAUGE     ; end
  def critical_ok? ; @critical ; end
  #--------------------------------------------------------------------------
  # ● 表示サイズ
  #--------------------------------------------------------------------------
  def view_size ; 8 ; end
  #--------------------------------------------------------------------------
  # ● ウィンドウ情報
  #--------------------------------------------------------------------------
  def window_info ; [WIN_X, WIN_Y, WIN_W, WIN_H, WIN_OPA, WIN_BACK_OPA] ; end
  #--------------------------------------------------------------------------
  # ● ゲージ情報
  #--------------------------------------------------------------------------
  def gauge_info ; [GAUGE_X, GAUGE_Y, GAUGE_W, GAUGE_H] ; end
  #--------------------------------------------------------------------------
  # ● ゲージカラー情報
  #--------------------------------------------------------------------------
  def gauge_color ; [COLOR1, COLOR2] ; end
  #--------------------------------------------------------------------------
  # ● ゲージウィンドウの関連メソッド
  #--------------------------------------------------------------------------
  def gauge=(obj) ; @gauge = obj ; end
  #--------------------------------------------------------------------------
  # ● エネミーコンボの関連メソッド
  #--------------------------------------------------------------------------
  def enemy_combo=(obj) ; @enemy_combo = obj ; end
  #--------------------------------------------------------------------------
  # ● 倍率
  #--------------------------------------------------------------------------
  def magni ; MAGNI ; end
  #--------------------------------------------------------------------------
  # ● 初期化
  #--------------------------------------------------------------------------
  def initialize
    @viewport = []
    @info_view = []
    @system = [HIT_OK, DAMAGE_OK, EXP_OK, GOLD_OK]
    if HIT_OK
      @viewport[0] = Viewport.new(HIT[0])
      @viewport[1] = Viewport.new(HIT[1])
    end
    if DAMAGE_OK
      @viewport[2] = Viewport.new(DAMAGE[0])
      @viewport[3] = Viewport.new(DAMAGE[1])
    end
    if EXP_OK
      @viewport[4] = Viewport.new(EXP[0])
      @viewport[5] = Viewport.new(EXP[1])
    end
    if GOLD_OK
      @viewport[6] = Viewport.new(GOLD[0])
      @viewport[7] = Viewport.new(GOLD[1])
    end
    @bitmap = nil
    @bitmap2 = nil
    combo_clear
    @combo_hit_count_max = 0
    @combo_damage_max = 0
    @combo_exp_max = 0
    @combo_gold_max = 0
    @dividing = 1
    @initial_duration = DURATION
    if DEPENDANT
      actor_count = 0
      for actor in $game_party.battle_members
        actor_count += 1 unless actor.dead?
      end
      enemy_count = 0
      for enemy in $game_troop.members
        enemy_count += 1 unless enemy.dead?
      end
      n = actor_count * DUR_DEPEN[0]
      n += enemy_count * DUR_DEPEN[1]
    end
    @combo_duration = @initial_duration * n
    @combo_duration_max = @combo_duration
    if COUNTER
      @duration_str = @combo_duration
      @duration_bit = Bitmap.new(99, 12)
      @duration_bit.font.size = 12
      @duration_bit.font.color = normal_color
      @duration_bit.draw_text(0, 0, 99, 12, COMBO_NAME[4])
      @duration_sp = Sprite.new
      @duration_sp.bitmap = @duration_bit
      @duration_sp.x = window_info[0] - 12
      @duration_sp.y = window_info[1]
      @duration_sp.z = 9999
      @duration_sp.opacity = 0
      @time_bit = Bitmap.new(22, 12)
      @time_bit.font.size = 10
      @time_bit.font.color = normal_color
      @time_bit.draw_text(0, 0, 22, 12, @duration_str.to_s, 2)
      @duration_action_sp = Sprite.new
      @duration_action_sp.bitmap = @time_bit
      @duration_action_sp.x = 3 + @duration_sp.x + @duration_bit.text_size(COMBO_NAME[4]).width
      @duration_action_sp.y = @duration_sp.y
      @duration_action_sp.z = @duration_sp.z
      @duration_action_sp.opacity = 0
    end
    if CON_SYSTEM_OK
      systems
    end
    @combo_sprite = []
    combo_sprites
    @combo_bitmap = []
    combo_bitmaps
    display_z
  end
  #--------------------------------------------------------------------------
  # ● 獲得メッセージ
  #--------------------------------------------------------------------------
  def message
    [EXP_MES, GOLD_MES]
  end
  #--------------------------------------------------------------------------
  # ● クリア
  #--------------------------------------------------------------------------
  def combo_clear
    @combo_hit_count = 0
    @combo_damage = 0
    @combo_exp = 0
    @combo_gold = 0
    @combo_duration = 0
    @combo_cri_duration = 0
    @combo_duration_max = 0
    @dividing = 1
    @update_hit = false
    @update_damage = false
    @update_exp = false
    @update_gold = false
    @max_update_hit = false
    @max_update_damage = false
    @max_update_exp = false
    @max_update_gold = false
    @critical = false
  end
  #--------------------------------------------------------------------------
  # ● 通常文字色の取得
  #--------------------------------------------------------------------------
  def normal_color
    return Color.new(192, 255, 255, 255)
  end
  #--------------------------------------------------------------------------
  # ● 毎戦更新文字色の取得
  #--------------------------------------------------------------------------
  def crisis_color
    return Color.new(128, 255, 160, 255)
  end
  #--------------------------------------------------------------------------
  # ● 最大更新文字色の取得
  #--------------------------------------------------------------------------
  def update_color
    return Color.new(192, 255, 192, 255)
  end
  #--------------------------------------------------------------------------
  # ● 影文字の取得
  #--------------------------------------------------------------------------
  def back_color
    return Color.new(96, 160, 160, 192)
  end
  #--------------------------------------------------------------------------
  # ● ボーナスカラーの取得
  #--------------------------------------------------------------------------
  def bonus_color
    if @combo_bonus_duration > 0
      color = Color.new(192, 64, 192, 160)
    elsif @combo_bonus_duration < 0
      color = Color.new(192, 96, 96, 160)
    else
      color = back_color
    end
    return color
  end
  #--------------------------------------------------------------------------
  # ● 影文字
  #--------------------------------------------------------------------------
  def font_shadow_text(text, bitmap, cx)
    @bitmap = bitmap
    @bitmap.font.color = back_color
    @bitmap.draw_text(-1, -1, cx, 32, text, 2)
    @bitmap.draw_text(-1,  1, cx, 32, text, 2)
    @bitmap.draw_text( 1, -1, cx, 32, text, 2)
    @bitmap.draw_text( 1,  1, cx, 32, text, 2)
  end
  #--------------------------------------------------------------------------
  # ● 影文字2
  #--------------------------------------------------------------------------
  def font_shadow_text2(text, bitmap, cx)
    @bitmap2 = bitmap
    @bitmap2.font.color = back_color
    @bitmap2.draw_text(-1, -1, cx, 32, text)
    @bitmap2.draw_text(-1,  1, cx, 32, text)
    @bitmap2.draw_text( 1, -1, cx, 32, text)
    @bitmap2.draw_text( 1,  1, cx, 32, text)
  end
  #--------------------------------------------------------------------------
  # ● タイム更新
  #--------------------------------------------------------------------------
  def duration_time(duration)
    @duration_str = [[duration.to_i, 0].max, MAX_FRAME].min
    @duration_action_sp.bitmap.dispose
    @time_bit = Bitmap.new(22, 12)
    @time_bit.font.size = 11
    if @critical
      @time_bit.font.color = crisis_color
    else
      @time_bit.font.color = normal_color
    end
    @time_bit.draw_text(0, 0, 22, 12, @duration_str.to_s, 2)
    @duration_action_sp.bitmap = @time_bit
  end
  #--------------------------------------------------------------------------
  # ● 戦闘終了時の最終戦績の取得
  #--------------------------------------------------------------------------
  def combo_backup
    if @combo_hit_count > @combo_hit_count_max
      @combo_hit_count_max = @combo_hit_count
      @update_hit = true
      if @combo_hit_count_max > $game_variables[VARIABLES_ID[0]]
        $game_variables[VARIABLES_ID[0]] = @combo_hit_count_max
        @max_update_hit = true
      end
    end
    if @combo_damage > @combo_damage_max
      @combo_damage_max = @combo_damage
      @update_damage = true
      if @combo_damage_max > $game_variables[VARIABLES_ID[1]]
        $game_variables[VARIABLES_ID[1]] = @combo_damage_max
        @max_update_damage = true
      end
    end
    if @combo_exp > @combo_exp_max
      @combo_exp_max = @combo_exp
      @update_exp = true
      if @combo_exp_max > $game_variables[VARIABLES_ID[2]]
        $game_variables[VARIABLES_ID[2]] = @combo_exp_max
        @max_update_exp = true
      end
    end
    if @combo_gold > @combo_gold_max
      @combo_gold_max = @combo_gold
      @update_gold = true
      if @combo_gold_max > $game_variables[VARIABLES_ID[3]]
        $game_variables[VARIABLES_ID[3]] = @combo_gold_max
        @max_update_gold = true
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● コンボカウント
  #--------------------------------------------------------------------------
  def combo_counts(hit, damage, exp, gold, critical)
    unless SW.zero?
      return unless $game_switches[SW]
    end
    return if damage.is_a?(String)
    return if damage.nil?
    if damage < 0
      @combo_duration = 1 if @combo_duration > 1
      return
    end
    return if hit.nil? || (damage.zero? && D_ZERO)
    @combo_hit_count += hit
    @combo_damage += damage
    if @combo_hit_count > MAX_COMBO[0]
      @combo_hit_count = MAX_COMBO[0]
    end
    if @combo_damage > MAX_COMBO[1]
      @combo_damage = MAX_COMBO[1]
    end
    exp_zero  = true if exp.zero?
    gold_zero = true if gold.zero?
    if @combo_hit_count > 0
      ert = EXP_RATE_H1
      era = EXP_RATE_H2
      grt = GOLD_RATE_H1
      gra = GOLD_RATE_H2
      if @system[2]
        if exp_zero.nil?
          n = Integer(exp  * (Integer(@combo_hit_count / ert)) / era)
          unless @enemy_combo.nil?
            @enemy_combo.combo_exp -= n
            n = n - @enemy_combo.combo_exp
          end
          @combo_exp += [n, 0].max
        end
      end
      if @system[3]
        if gold_zero.nil?
          n = Integer(gold * (Integer(@combo_hit_count / grt)) / gra)
          unless @enemy_combo.nil?
            @enemy_combo.combo_gold -= n
            n = n - @enemy_combo.combo_gold
          end
          @combo_gold += [n, 0].max
        end
      end
      if CON_SYSTEM_OK
        p "#{@combo_hit_count}HIT目で足されたEXP  => #{Integer(exp  * (Integer(@combo_hit_count / ert)) / era)}"
        p "#{@combo_hit_count}HIT目で足されたGOLD => #{Integer(gold  * (Integer(@combo_hit_count / grt)) / gra)}"
      end
    end
    if @combo_damage > 0
      ertd = EXP_RATE_D1
      erad = EXP_RATE_D2
      grtd = GOLD_RATE_D1
      grad = GOLD_RATE_D2
      if @system[2]
        if exp_zero.nil?
          n = Integer(exp * (Integer(@combo_damage / ertd)) / erad)
          unless @enemy_combo.nil?
            @enemy_combo.combo_exp -= n
            n = n - @enemy_combo.combo_exp
          end
          @combo_exp += [n, 0].max
        end
      end
      if @system[3]
        if gold_zero.nil?
          n = Integer(gold * (Integer(@combo_damage / grtd)) / grad)
          unless @enemy_combo.nil?
            @enemy_combo.combo_gold -= n
            n = n - @enemy_combo.combo_gold
          end
          @combo_gold += [n, 0].max
        end
      end
      if CON_SYSTEM_OK
        p "#{@combo_damage}DAMAGEで足されたEXP  => #{Integer(exp  * (Integer(@combo_damage / ertd)) / erad)}"
        p "#{@combo_damage}DAMAGEで足されたGOLD => #{Integer(exp  * (Integer(@combo_damage / grtd)) / grad)}"
      end
    end
    if @combo_exp < 0
      @combo_exp = 0
    end
    if @combo_gold < 0
      @combo_gold = 0
    end
    unless @enemy_combo.nil?
      if @enemy_combo.combo_exp < 0
        @enemy_combo.combo_exp = 0
      end
      if @enemy_combo.combo_gold < 0
        @enemy_combo.combo_gold = 0
      end
    end
    if LAST_RATE > 0
      @combo_exp  /= LAST_RATE if @combo_exp > 0
      @combo_gold /= LAST_RATE if @combo_gold > 0
    end
    @combo_exp = [[@combo_exp, 0].max, MAX_COMBO[2]].min
    @combo_gold = [[@combo_gold, 0].max, MAX_COMBO[3]].min
    if DEPENDANT
      actor_count = 0
      for actor in $game_party.battle_members
        actor_count += 1 unless actor.dead?
      end
      enemy_count = 0
      for enemy in $game_troop.members
        enemy_count += 1 unless enemy.dead?
      end
      n = actor_count * 2
      n += enemy_count * 2
      @combo_duration = @initial_duration * n
    else
      @combo_duration = @initial_duration
    end
    if critical && !@critical
      if ADDING_DURATION > 0
        @combo_cri_duration = @combo_duration + ADDING_DURATION
        @critical = true
      elsif ADDING_DURATION.zero?
        @combo_cri_duration = @combo_duration * 2
        @critical = true
      end
      @combo_duration_max = @combo_cri_duration
    else
      @combo_duration_max = @combo_duration if @combo_cri_duration <= 0
    end
    reset2
    combo_backup
    combo_info_update
    @enemy_combo.combo_refresh unless @enemy_combo.nil?
    @gauge.visible = true if window_ok?
    if CON_SYSTEM_OK
      p "クリティカル           => #{@critical}"
      p "持続時間RATE           => #{n}"
      p "ボーナス時間           => #{@combo_cri_duration}"
      p "MAX持続時間            => #{@combo_duration}"
      p "最終的な獲得EXP        => #{@combo_exp}"
      p "最終的な獲得GOLD       => #{@combo_gold}"
      p "この戦闘の最大獲得EXP  => #{@combo_exp_max}"
      p "この戦闘の最大獲得GOLD => #{@combo_gold_max}"
    end
  end
  #--------------------------------------------------------------------------
  # ● コンボカウント / リフレッシュ
  #--------------------------------------------------------------------------
  def combo_refresh
    return unless combo?
    unless SW.zero?
      return unless $game_switches[SW]
    end
    reset2
    combo_backup
    combo_info_update
    @gauge.visible = true if window_ok?
    if CON_SYSTEM_OK
      p "クリティカル           => #{@critical}"
      p "ボーナス時間           => #{@combo_cri_duration}"
      p "MAX持続時間            => #{@combo_duration}"
      p "最終的な獲得EXP        => #{@combo_exp}"
      p "最終的な獲得GOLD       => #{@combo_gold}"
      p "この戦闘の最大獲得EXP  => #{@combo_exp_max}"
      p "この戦闘の最大獲得GOLD => #{@combo_gold_max}"
    end
  end
  #--------------------------------------------------------------------------
  # ● コンボスプライト作成
  #--------------------------------------------------------------------------
  def combo_sprites
    for i in 0...view_size
      @combo_sprite.push(Sprite.new(@viewport[i]))
      @combo_sprite[i].opacity = 0
    end
  end
  #--------------------------------------------------------------------------
  # ● 高さの補正
  #--------------------------------------------------------------------------
  def display_z
    for i in 0...view_size
      unless @combo_sprite[i].viewport.nil?
        @combo_sprite[i].viewport.z = DIS_Z
        @combo_sprite[i].z = DIS_Z
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● コンボビットマップ作成
  #--------------------------------------------------------------------------
  def combo_bitmaps
    for i in 0...view_size
      @combo_bitmap.push(Bitmap.new(128, 96))
      @combo_bitmap[i].font.name = FONT_NAME
      @combo_bitmap[i].font.size = FONT_SIZE
    end
    if @system[0]
      font_shadow_text2(COMBO_NAME[0], @combo_bitmap[1], 128)
      @combo_bitmap[1].font.color = normal_color
      @combo_bitmap[1].draw_text(0,0,128,32,COMBO_NAME[0])
      @combo_sprite[0].bitmap = @combo_bitmap[0]
      @combo_sprite[1].bitmap = @combo_bitmap[1]
    end
    if @system[1]
      font_shadow_text2(COMBO_NAME[1], @combo_bitmap[3], 128)
      @combo_bitmap[3].font.color = normal_color
      @combo_bitmap[3].draw_text(0,0,128,32,COMBO_NAME[1])
      @combo_sprite[2].bitmap = @combo_bitmap[2]
      @combo_sprite[3].bitmap = @combo_bitmap[3]
    end
    if @system[2]
      font_shadow_text2(COMBO_NAME[2], @combo_bitmap[5], 128)
      @combo_bitmap[5].font.color = normal_color
      @combo_bitmap[5].draw_text(0,0,128,32,COMBO_NAME[2])
      @combo_sprite[4].bitmap = @combo_bitmap[4]
      @combo_sprite[5].bitmap = @combo_bitmap[5]
    end
    if @system[3]
      font_shadow_text2(COMBO_NAME[3], @combo_bitmap[7], 128)
      @combo_bitmap[7].font.color = normal_color
      @combo_bitmap[7].draw_text(0,0,128,32,COMBO_NAME[3])
      @combo_sprite[6].bitmap = @combo_bitmap[6]
      @combo_sprite[7].bitmap = @combo_bitmap[7]
    end
  end
  #--------------------------------------------------------------------------
  # ● コンボビットマップ作成 / カウントのみ
  #--------------------------------------------------------------------------
  def combo_bitmap_counts
    for i in 0...view_size
      if @combo_bitmap[i].disposed?
        @combo_bitmap[i] = Bitmap.new(128, 96)
        @combo_bitmap[i].font.size = FONT_SIZE
      end
      if @combo_sprite[i].disposed?
        @combo_sprite[i] = Sprite.new(@viewport[i])
        @combo_sprite[i].bitmap = @combo_bitmap[i]
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 継続ビットマップ作成
  #--------------------------------------------------------------------------
  def duration_bitmap
    @duration_str = @combo_duration
    @duration_bit = Bitmap.new(99, 12)
    @duration_bit.font.size = 12
    @duration_bit.font.color = normal_color
    @duration_bit.draw_text(0, 0, 99, 12, COMBO_NAME[4])
    @duration_sp = Sprite.new
    @duration_sp.bitmap = @duration_bit
    @duration_sp.x = window_info[0] - 12
    @duration_sp.y = window_info[1]
    @duration_sp.z = 9999
    @duration_sp.opacity = 0
    @time_bit = Bitmap.new(22, 12)
    @time_bit.font.size = 10
    if @critical
      @time_bit.font.color = crisis_color
    else
      @time_bit.font.color = normal_color
    end
    @time_bit.draw_text(0, 0, 22, 12, @duration_str.to_s, 2)
    @duration_action_sp = Sprite.new
    @duration_action_sp.bitmap = @time_bit
    @duration_action_sp.x = 3 + @duration_sp.x + @duration_bit.text_size(COMBO_NAME[4]).width
    @duration_action_sp.y = @duration_sp.y
    @duration_action_sp.z = @duration_sp.z
    @duration_action_sp.opacity = 0
  end
  #--------------------------------------------------------------------------
  # ● コンボ情報更新
  #--------------------------------------------------------------------------
  def combo_info_update
    cx = 126
    if @system[0]
      font_shadow_text(@combo_hit_count.to_s, @combo_bitmap[0], cx)
      @combo_bitmap[0].font.color = @max_update_hit ? update_color :
                                    @update_hit ? crisis_color : normal_color
      @combo_bitmap[0].draw_text(0, 0, cx, 32, @combo_hit_count.to_s, 2)
      @combo_sprite[0].bitmap = @combo_bitmap[0]
      if @update_hit
        @combo_sprite[0].zoom_x = ZOOM
        @combo_sprite[0].zoom_y = ZOOM
      end
    end
    if @system[1]
      font_shadow_text(@combo_damage.to_s, @combo_bitmap[2], cx)
      @combo_bitmap[2].font.color = @max_update_damage ? update_color :
                                    @update_damage ? crisis_color : normal_color
      @combo_bitmap[2].draw_text(0, 0, cx, 32, @combo_damage.to_s, 2)
      @combo_sprite[2].bitmap = @combo_bitmap[2]
      if @update_damage
        @combo_sprite[2].zoom_x = ZOOM
        @combo_sprite[2].zoom_y = ZOOM
      end
    end
    if @system[2]
      font_shadow_text(@combo_exp.to_s, @combo_bitmap[4], cx)
      @combo_bitmap[4].font.color = @max_update_exp ? update_color : 
                                    @update_exp ? crisis_color : normal_color
      @combo_bitmap[4].draw_text(0, 0, cx, 32, @combo_exp.to_s, 2)
      @combo_sprite[4].bitmap = @combo_bitmap[4]
      if @update_exp
        @combo_sprite[4].zoom_x = ZOOM
        @combo_sprite[4].zoom_y = ZOOM
      end
    end
    if @system[3]
      font_shadow_text(@combo_gold.to_s, @combo_bitmap[6], cx)
      @combo_bitmap[6].font.color = @max_update_gold ? update_color :
                                    @update_gold ? crisis_color : normal_color
      @combo_bitmap[6].draw_text(0, 0, cx, 32, @combo_gold.to_s, 2)
      @combo_sprite[6].bitmap = @combo_bitmap[6]
      if @update_gold
        @combo_sprite[6].zoom_x = ZOOM
        @combo_sprite[6].zoom_y = ZOOM
      end
    end
    if CON_SYSTEM_OK
      p "全戦闘コンボHIT更新       => #{@max_update_hit}"
      p "今回の戦闘コンボHIT更新   => #{@update_hit}"
      p "全戦闘コンボDAMAGE更新    => #{@max_update_damage}"
      p "今回の戦闘コンボDAMGE更新 => #{@update_damage}"
      p "全戦闘コンボEXP更新       => #{@max_update_exp}"
      p "今回の戦闘コンボEXP更新   => #{@update_exp}"
      p "全戦闘コンボGOLD更新      => #{@max_update_gold}"
      p "今回の戦闘コンボGOLD更新  => #{@update_gold}"
    end
  end
  #--------------------------------------------------------------------------
  # ● コンボ判定
  #--------------------------------------------------------------------------
  def combo?
    return @bitmap.nil? ? false : @bitmap.disposed? ? false : 
           @bitmap2.disposed? ? false : true
  end
  #--------------------------------------------------------------------------
  # ● コンボフレーム更新
  #--------------------------------------------------------------------------
  def update
    return if $game_troop.interpreter.running?
    return unless combo?
    if @critical
      p "ボーナス減少処理中 => #{@combo_cri_duration}" if CON_DURATION_OK
      @combo_cri_duration -= 1
      duration_time(@combo_cri_duration) if COUNTER
      if @combo_cri_duration <= 0
        @critical = false
        @combo_duration_max = @combo_duration if @combo_cri_duration <= 0
      end
    end
    if @combo_duration > 0
      if !@critical
        p "減少処理中 => #{@combo_duration}" if CON_DURATION_OK
        @combo_duration -= 1
        duration_time(@combo_duration) if COUNTER
      end
      for i in 0...@combo_sprite.size
        @combo_sprite[i].opacity += SHOW_OPACITY
      end
      if COUNTER
        @duration_action_sp.opacity += SHOW_OPACITY
        @duration_sp.opacity += SHOW_OPACITY
      end
      if @update_hit && @system[0]
        if @combo_sprite[0].zoom_x >=1
          @combo_sprite[0].zoom_x -= 0.1
        end
        if @combo_sprite[0].zoom_y > 1
          @combo_sprite[0].zoom_y -= 0.1
        end
      end
      if @update_damage && @system[1]
        if @combo_sprite[2].zoom_x > 1
          @combo_sprite[2].zoom_x -= 0.1
        end
        if @combo_sprite[2].zoom_y > 1
          @combo_sprite[2].zoom_y -= 0.1
        end
      end
      if @update_exp && @system[2] 
        if @combo_sprite[4].zoom_x > 1
          @combo_sprite[4].zoom_x -= 0.1
        end
        if @combo_sprite[4].zoom_y > 1
          @combo_sprite[4].zoom_y -= 0.1
        end
      end
      if @update_gold && @system[3]
        if @combo_sprite[6].zoom_x > 1
          @combo_sprite[6].zoom_x -= 0.1
        end
        if @combo_sprite[6].zoom_y > 1
          @combo_sprite[6].zoom_y -= 0.1
        end
      end
    elsif @combo_duration.zero?
      for i in 0...@combo_sprite.size
        @combo_sprite[i].opacity -= SHOW_OPACITY
      end
      if @combo_sprite[@combo_sprite.size-1].opacity <= 0
        reset
      end
    elsif @combo_duration < 0
      for i in 0...@combo_sprite.size
        @combo_sprite[i].opacity += SHOW_OPACITY
      end
      if COUNTER
        @duration_action_sp.opacity += SHOW_OPACITY
        @duration_sp.opacity += SHOW_OPACITY
      end
      if @update_hit && @system[0]
        if @combo_sprite[0].zoom_x >=1
          @combo_sprite[0].zoom_x -= 0.1
        end
        if @combo_sprite[0].zoom_y > 1
          @combo_sprite[0].zoom_y -= 0.1
        end
      end
      if @update_damage && @system[1]
        if @combo_sprite[2].zoom_x > 1
          @combo_sprite[2].zoom_x -= 0.1
        end
        if @combo_sprite[2].zoom_y > 1
          @combo_sprite[2].zoom_y -= 0.1
        end
      end
      if @update_exp && @system[2] 
        if @combo_sprite[4].zoom_x > 1
          @combo_sprite[4].zoom_x -= 0.1
        end
        if @combo_sprite[4].zoom_y > 1
          @combo_sprite[4].zoom_y -= 0.1
        end
      end
      if @update_gold && @system[3]
        if @combo_sprite[6].zoom_x > 1
          @combo_sprite[6].zoom_x -= 0.1
        end
        if @combo_sprite[6].zoom_y > 1
          @combo_sprite[6].zoom_y -= 0.1
        end
      end
    end
    if window_ok? && (@combo_cri_duration > 0 || @combo_duration > 0)
      @gauge.refresh
    end
  end
  #--------------------------------------------------------------------------
  # ● コンボリセット
  #--------------------------------------------------------------------------
  def reset
    combo_clear
    for i in 0...view_size
      next if @combo_sprite[i].bitmap.nil?
      @combo_sprite[i].bitmap.dispose
      @combo_sprite[i].dispose
    end
    font_shadow_dispose2
    if COUNTER
      unless @duration_sp.disposed?
        @duration_sp.bitmap.dispose
        @duration_sp.dispose
        @duration_sp = []
        @duration_action_sp.bitmap.dispose
        @duration_action_sp.dispose
        @duration_action_sp = []
        duration_bitmap
      end
    end
    @combo_sprite = []
    combo_sprites
    @combo_bitmap = []
    combo_bitmaps
    font_shadow_dispose
    @gauge.visible = false if window_ok?
  end
  #--------------------------------------------------------------------------
  # ● コンボリセット2
  #--------------------------------------------------------------------------
  def reset2
    unless @combo_sprite[0].bitmap.nil?
      @combo_sprite[0].bitmap.dispose
      @combo_sprite[0].dispose
    end
    unless @combo_sprite[2].bitmap.nil?
      @combo_sprite[2].bitmap.dispose
      @combo_sprite[2].dispose
    end
    unless @combo_sprite[4].bitmap.nil?
      @combo_sprite[4].bitmap.dispose
      @combo_sprite[4].dispose
    end
    unless @combo_sprite[6].bitmap.nil?
      @combo_sprite[6].bitmap.dispose
      @combo_sprite[6].dispose
    end
    combo_bitmap_counts
    font_shadow_dispose
  end
  #--------------------------------------------------------------------------
  # ● 影文字を解放
  #--------------------------------------------------------------------------
  def font_shadow_dispose
    @bitmap.dispose unless @bitmap.nil?
  end
  #--------------------------------------------------------------------------
  # ● 影文字2を解放
  #--------------------------------------------------------------------------
  def font_shadow_dispose2
    @bitmap2.dispose unless @bitmap2.nil?
  end
  #--------------------------------------------------------------------------
  # ● コンボ解放
  #--------------------------------------------------------------------------
  def dispose
    combo_clear
    for i in 0...view_size
      next if @combo_sprite[i].bitmap.nil?
      @combo_sprite[i].bitmap.dispose unless @combo_sprite[i].bitmap.disposed?
      @combo_sprite[i].dispose unless @combo_sprite[i].bitmap.disposed?
    end
    return if @bitmap.nil?
    font_shadow_dispose unless @bitmap.disposed?
    return if @bitmap2.nil?
    font_shadow_dispose2 unless @bitmap2.disposed?
    if COUNTER
      @duration_sp.dispose unless @duration_sp.disposed?
      @duration_action_sp.dispose unless @duration_action_sp.disposed?
    end
  end
end
#==============================================================================
# ■ Window_Combo_Gauge / 新規クラス
#==============================================================================

class Window_Combo_Gauge < Window_Base
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
    x = BattleManager.combo_sys.window_info[0]
    y = BattleManager.combo_sys.window_info[1]
    w = BattleManager.combo_sys.window_info[2]
    h = BattleManager.combo_sys.window_info[3]
    super(x, y, w, h)
    self.opacity = BattleManager.combo_sys.window_info[4]
    self.back_opacity = BattleManager.combo_sys.window_info[5]
    self.visible = false
    @color1 = BattleManager.combo_sys.gauge_color[0]
    @color2 = BattleManager.combo_sys.gauge_color[1]
    @max = BattleManager.combo_sys.combo_duration_max
    @rate = BattleManager.combo_sys.combo_duration.to_f / @max
    @_x  = BattleManager.combo_sys.gauge_info[0]
    @_y  = BattleManager.combo_sys.gauge_info[1]
    @_width  = BattleManager.combo_sys.gauge_info[2]
    @_height = BattleManager.combo_sys.gauge_info[3]
    refresh
  end
  #--------------------------------------------------------------------------
  # ● コンボゲージの作成 / 高さ補正可能
  #--------------------------------------------------------------------------
  def create_combo_gauge(x, y, width, height, rate, color1, color2)
    fill_w = (width * rate).to_i
    gauge_y = y + line_height - 8
    contents.fill_rect(x, gauge_y, width, height, gauge_back_color)
    contents.gradient_fill_rect(x, gauge_y, fill_w, height, color1, color2)
  end
  #--------------------------------------------------------------------------
  # ● コンボゲージの描画
  #--------------------------------------------------------------------------
  def draw_combo_gauge
    create_combo_gauge(@_x, @_y, @_width, @_height, @rate, @color1, @color2)
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    @max = BattleManager.combo_sys.combo_duration_max
    if BattleManager.combo_sys.critical_ok?
      @rate = BattleManager.combo_sys.combo_cri_duration.to_f / @max
    else
      if BattleManager.combo_sys.combo_cri_duration > 0
        @rate = BattleManager.combo_sys.combo_cri_duration.to_f / @max
      else
        @rate = BattleManager.combo_sys.combo_duration.to_f / @max
      end
    end
    draw_combo_gauge
  end
end

ComboSystem実装
2015/12/11
コンボダメージマグニフィケーション追加。
2015/05/23
コンボリザルトウィンドウ表示に対応。

#==============================================================================
# ■ BattleManager
#==============================================================================

module BattleManager
  #--------------------------------------------------------------------------
  # ● セットアップ / 再定義
  #--------------------------------------------------------------------------
  def self.setup(troop_id, can_escape = true, can_lose = false)
    init_members
    $game_troop.setup(troop_id)
    @can_escape = can_escape
    @can_lose = can_lose
    make_escape_ratio
    @combo_sys = Combo_System.new
    @combo_gauge = Window_Combo_Gauge.new
    @combo_sys.gauge = @combo_gauge
    enemy_combo_set
    @combo_sys.enemy_combo = @combo_sys_e if defined?(@combo_sys_e)
    @combo_result = Window_Combo_Result.new
    @combo_result.visible = false
  end
  #--------------------------------------------------------------------------
  # ● フェイスシステム / 追加定義
  #--------------------------------------------------------------------------
  def self.face_sys
    return @action_face
  end
  #--------------------------------------------------------------------------
  # ● コンボシステム / 追加定義
  #--------------------------------------------------------------------------
  def self.combo_sys
    return @combo_sys
  end
  #--------------------------------------------------------------------------
  # ● コンボゲージ / 追加定義
  #--------------------------------------------------------------------------
  def self.combo_gauge
    return @combo_gauge
  end
  #--------------------------------------------------------------------------
  # ● コンボリザルトウィンドウ / 追加定義
  #--------------------------------------------------------------------------
  def self.combo_result
    return @combo_result
  end
  #--------------------------------------------------------------------------
  # ● エネミーコンボセット / 追加定義
  #--------------------------------------------------------------------------
  def self.enemy_combo_set
  end
  #--------------------------------------------------------------------------
  # ● 獲得した経験値の表示 / 再定義
  #--------------------------------------------------------------------------
  def self.display_exp
    if $game_troop.exp_total > 0
      text = sprintf(Vocab::ObtainExp, $game_troop.exp_total)
      $game_message.add('\.' + text)
      if @combo_sys.combo_exp_max > 0 && @combo_sys.e_ok?
        text = sprintf(@combo_sys.message[0], @combo_sys.combo_exp_max)
        $game_message.add('\.' + text)
      end
    end
    @combo_result.refresh
    @combo_result.visible = true
  end
  #--------------------------------------------------------------------------
  # ● お金の獲得と表示 / 再定義
  #--------------------------------------------------------------------------
  def self.gain_gold
    if $game_troop.gold_total > 0
      text = sprintf(Vocab::ObtainGold, $game_troop.gold_total)
      $game_message.add('\.' + text)
      $game_party.gain_gold($game_troop.gold_total)
      if @combo_sys.combo_gold_max > 0 && @combo_sys.g_ok?
        text = sprintf(@combo_sys.message[1], @combo_sys.combo_gold_max)
        $game_message.add('\.' + text)
        $game_party.gain_gold(@combo_sys.combo_gold_max)
      end
    end
    wait_for_message
  end
  #--------------------------------------------------------------------------
  # ● 経験値の獲得とレベルアップの表示 / 再定義
  #--------------------------------------------------------------------------
  def self.gain_exp
    $game_party.all_members.each do |actor|
      actor.gain_exp($game_troop.exp_total + 
         (@combo_sys.e_ok? ? @combo_sys.combo_exp_max : 0))
    end
    wait_for_message
  end
end
#==============================================================================
# ■ Game_Battler
#==============================================================================

class Game_Battler < Game_BattlerBase
  #--------------------------------------------------------------------------
  # ● コンボの関連メソッド
  #--------------------------------------------------------------------------
  def combo ; BattleManager.combo_sys ; end
  #--------------------------------------------------------------------------
  # ● ダメージ計算
  #--------------------------------------------------------------------------
  def make_damage_value(user, item)
    value = item.damage.eval(user, self, $game_variables)
    value *= item_element_rate(user, item)
    value *= pdr if item.physical?
    value *= mdr if item.magical?
    value *= rec if item.damage.recover?
    value = apply_critical(value) if @result.critical
    value = apply_variance(value, item.damage.variance)
    value = apply_guard(value)
    if !BattleManager.combo_sys.magni.zero?
      n = (value * (100 + BattleManager.combo_sys.combo_hit_count *  
           BattleManager.combo_sys.magni) / 100).to_i - value
    end
    value += n.to_i if !n.nil?
    @result.make_damage(value.to_i, item)
  end
  #--------------------------------------------------------------------------
  # ● ダメージの処理 / 再定義
  #    呼び出し前に @result.hp_damage @result.mp_damage @result.hp_drain
  #    @result.mp_drain が設定されていること。
  #--------------------------------------------------------------------------
  def execute_damage(user)
    on_damage(@result.hp_damage) if @result.hp_damage > 0
    self.hp -= @result.hp_damage
    self.mp -= @result.mp_damage
    user.hp += @result.hp_drain
    user.mp += @result.mp_drain
    if self.is_a?(Game_Enemy)
      BattleManager.combo_sys.combo_counts(1, 
                                           @result.hp_damage, 
                                           self.exp, 
                                           self.gold, 
                                           @result.critical)
    end
  end
end

#==============================================================================
# ■ Game_Enemy
#==============================================================================

class Game_Enemy < Game_Battler
  #--------------------------------------------------------------------------
  # ● ドロップアイテムの配列作成
  #--------------------------------------------------------------------------
  def make_drop_items
    n = 0
    drop_extension = Combo_System::ITEM_DROP_OK
    if BattleManager.combo_sys.combo_hit_count_max > 0 && drop_extension
      n = BattleManager.combo_sys.combo_hit_count_max / Combo_System::DROP_ITEM_RATE
    end
    enemy.drop_items.inject([]) do |r, di|
      if di.kind > 0 && rand * di.denominator - n < drop_item_rate
        r.push(item_object(di.kind, di.data_id))
      else
        r
      end
    end
  end
end

#==============================================================================
# ■ Scene_Battle
#==============================================================================

class Scene_Battle < Scene_Base
  #--------------------------------------------------------------------------
  # ● 素材スプライトの解放 / 追加定義 / エイリアス
  #--------------------------------------------------------------------------
  alias :mt_combo_dispose :mt_sp_dispose
  def mt_sp_dispose
    mt_combo_dispose
    BattleManager.combo_sys.dispose
    BattleManager.combo_gauge.dispose
    BattleManager.combo_result.dispose
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新（基本）/ エイリアス
  #--------------------------------------------------------------------------
  alias :combo_update :update_basic
  def update_basic
    combo_update
    BattleManager.combo_sys.update
  end
end

Pagetop