#==============================================================================
# □ スクリプト・改 (for VX Ace)
#------------------------------------------------------------------------------
# Version : 1_20120219
# by サリサ・タイクーン
# http://www.tycoon812.com/rgss/
#==============================================================================

#==============================================================================
# □ 素材スイッチ
#==============================================================================
$rgsslab = {} if $rgsslab == nil
$rgsslab["スクリプト・改"] = true

if $rgsslab["スクリプト・改"]

#==============================================================================
# □ カスタマイズポイント
#==============================================================================
module RGSSLAB end
module RGSSLAB::Script_Alter
  #--------------------------------------------------------------------------
  # ○ 有効化スイッチの設定
  #    SWで指定したスイッチ番号がオンの時のみ
  #    スクリプト・改によるスクリプト延長を有効化にします。
  #    （オンでないからといって、この素材そのものが無効になる訳ではありません）
  #
  #    スイッチ拡張でのスイッチに指定する場合は
  #    + 10000の値を加えて下さい。
  #    （例：スイッチ拡張の1番の場合： SW = 1 + 10000 又は SW = 10001）
  #--------------------------------------------------------------------------
  SW = 1
end

# カスタマイズポイントは、ここまで

#==============================================================================
# □ RGSSLAB::Script_Alter [module]
#==============================================================================
module RGSSLAB::Script_Alter
  #--------------------------------------------------------------------------
  # ○ 素材設定用の定数定義
  #--------------------------------------------------------------------------
  MATERIAL_NAME = "スクリプト・改"
  VERSION       = 1
  RELEASE       = 20120219
end

#==============================================================================
# ■ Game_Interpreter [class]
#==============================================================================
class Game_Interpreter
  #--------------------------------------------------------------------------
  # ○ モジュールの設定
  #--------------------------------------------------------------------------
  RGSSLAB_101 = RGSSLAB::Script_Alter
  #--------------------------------------------------------------------------
  # ● スクリプト [再定義]
  #--------------------------------------------------------------------------
  def command_355
    script = @list[@index].parameters[0] + "\n"
    flag   = false
    if RGSSLAB_101::SW < 10000
      flag = $game_switches[RGSSLAB_101::SW]
    elsif RGSSLAB_101::SW > 10000 && $rgsslab["スイッチ拡張"]
      flag = $game_switches_ex[RGSSLAB_101::SW - 10000]
    end
    if flag
      while next_event_code == 655
        @index += 1
        script += @list[@index].parameters[0] + "\n"
      end
      loop do
        break unless next_event_code == 355 or next_event_code == 655
        @index += 1
        script += @list[@index].parameters[0] + "\n"
      end
    else
      while next_event_code == 655
        @index += 1
        script += @list[@index].parameters[0] + "\n"
      end
    end
    eval(script)
  end
end

end