レベルアップ装備(RGSS2) | BMSP(スクリプト)

サイトマップ :

レベルアップ装備(RGSS2)
Ver1.20(2012/08/11)

|前のページへ|

どういったものに需要があるかなど
スクリプト製作の参考にしたいので，
いいね！と思ったスクリプトにクリックお願いします．

web拍手

概要

装備をするとレベルが変動する武器・防具が作成できます．
もちろん外すと戻ります．

|ページトップへ|

位置

特に指定はありません．

|ページトップへ|

スクリプト

中身をすべてコピーして，ツクールのスクリプトに新たなセクションを作成し，貼り付けてください．

#==============================================================================
# ■ BMSP レベルアップ装備[LEVELUPEQUIPMENT] Ver1.20 2012/08/11
#------------------------------------------------------------------------------
# 　レベルが変動する装備が作成できます．
#==============================================================================
#------------------------------------------------------------------------------
# ■内容
# 装備をするとレベルが変動する武器・防具が作成できます．
# もちろん外すと戻ります．
#
# 位置：特に指定はありません
#
# ■使用方法
# スクリプトに丸ごと貼り付けていただければ使用できます．
#
# 装備するとレベルが変動する武器・防具を作ることが出来ます．
# 武器・防具のメモ欄に以下の様に記述してください．
#   ==レベルアップ%flag%%var%%value%==
# 
# %flag%  : 「+」か「-」を書きます．省略すると「+」として扱います．
# %var%   : 「V」と書くと変数\V[%value%]の値でレベルを変動させます．
#           省略すると直接指定になります．
# %value% : 整数を書きます．
#
# また，この記述は複数書くことが出来ます
#
# 例
# ・レベルが4上がる
# ==レベルアップ4==
# または
# ==レベルアップ+4==
#
# ・レベルが1下がる
# ==レベルアップ-1==
#
# ・レベルが\V[002]の値だけ上がる(\V[002]がマイナスの値なら下がる)
# ==レベルアップV2==
#
# ・レベルが基本的に5上がるが変数の値によっては
#   もっと上がったり，逆に下がったりする
# ==レベルアップ+5==
# ==レベルアップ+V2==
#
# 2012/08/11追記
# 詳細設定のFORGET_TEMPUP_SKILLをtrueにすると，レベルアップ装備によって
# 上昇していたレベルが減ったときに本来覚えてないスキルを忘れることができます．
# falseにすると一度覚えたスキルは覚えたままになります．
# FORGET_TEMPDOWN_SKILLをtrueにすると，レベルアップ装備によってレベルが本来より下降
# したときに覚えていたスキルを忘れさせることができます．
# falseにするとレベルが下がっても覚えたスキルはそのまま使用可能です．
# また，FORGET_TEMPUP_SKILLがfalseのときはFORGET_TEMPDOWN_SKILLは常にfalse扱いとなります．
# 
# 詳細設定の欄では、
# ○FORGET_TEMPUP_SKILL : レベルアップ装備によって上昇していたレベルが減ったときに
#                         本来覚えてないスキルを忘れさせるかどうか
# ○FORGET_TEMPDOWN_SKILL : レベルアップ装備によってレベルが本来より下降したときに
#                           覚えていたスキルを忘れさせるかどうか
# が設定できます．
#
# ■注意
# このスクリプトでは
# 「RPG::Weapon」「RPG::Armor」「Game_Actor」
# のメソッドを改変しています。
# ■情報
# このスクリプトはgentlawkによって作られたものです。
# 利用規約はhttp://blueredzone.comをご覧ください。
#------------------------------------------------------------------------------
$bmsp_include = {} if $bmsp_include == nil
$bmsp_include["LEVELUPEQUIPMENT"] = true
module BMSP
module LevelUpEquipment
  #▲▽▲▽▲▽▲▽▲▽▲▽▲▽▲▽
  #詳細設定
  FORGET_TEMPUP_SKILL = true # 上がっていたレベルが減少したときに覚えたスキルを忘れるか
  FORGET_TEMPDOWN_SKILL = false # レベルが減少したときに覚えていたスキルを忘れるか
  #▲▽▲▽▲▽▲▽▲▽▲▽▲▽▲▽
  
  # レベルアップ装備の正規表現
  MATCH = /==レベルアップ([+-]?)(V?)([0-9]+)==/o
  
  module_function
  #--------------------------------------------------------------------------
  # ● 正規表現とのマッチ
  #--------------------------------------------------------------------------
  def match(str)
    # レベル設定のマッチ
    settings = []
    str.scan(MATCH).each do |flag, var, value|
      settings << {
        :variable => !var.empty?,
        :minus => flag == "-",
        :value => value.to_i
      }
    end
    return settings
  end
end
end
#==============================================================================
# ■ RPG::Weapon
#==============================================================================
class RPG::Weapon < RPG::BaseItem
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias bmsp_levelupequipment_initialize initialize
  def initialize
    bmsp_levelupequipment_initialize
    @bmsp_levelup_equipment_settings = nil
  end
  #--------------------------------------------------------------------------
  # ● レベルアップ装備のセットを取得
  #--------------------------------------------------------------------------
  def bmsp_levelup_equipment_settings
    return @bmsp_levelup_equipment_settings if @bmsp_levelup_equipment_settings != nil
    return @bmsp_levelup_equipment_settings = BMSP::LevelUpEquipment.match(self.note)
  end
end
#==============================================================================
# ■ RPG::Armor
#==============================================================================
class RPG::Armor < RPG::BaseItem
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias bmsp_levelupequipment_initialize initialize
  def initialize
    bmsp_levelupequipment_initialize
    @bmsp_levelup_equipment_settings = nil
  end
  #--------------------------------------------------------------------------
  # ● レベルアップ装備のセットを取得
  #--------------------------------------------------------------------------
  def bmsp_levelup_equipment_settings
    return @bmsp_levelup_equipment_settings if @bmsp_levelup_equipment_settings != nil
    return @bmsp_levelup_equipment_settings = BMSP::LevelUpEquipment.match(self.note)
  end
end
#==============================================================================
# ■ Game_Actor
#==============================================================================
class Game_Actor < Game_Battler
  #--------------------------------------------------------------------------
  # ● clone(skillsのみ深いコピー)
  #--------------------------------------------------------------------------
  ############ 要注意 ########### cloneの定義を変えています #################
  def clone
    c = super
    c.instance_eval("@skills = @skills.clone")
    return c
  end
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias bmsp_levelupequipment_initialize initialize
  def initialize(actor_id)
    @bmsp_levelup_equipment_expdiff = 0
    @bmsp_levelup_equipment_change = 0
    @bmsp_levelup_equipment_changedlevel = $data_actors[actor_id].initial_level
    bmsp_levelupequipment_initialize(actor_id)
    # スキル調整用裸アクターの作成
    bmsp_levelup_equipment_setup_naked_actor
    bmsp_update_levelup_equipment
    self.recover_all
  end
  #--------------------------------------------------------------------------
  # ● スキル調整用裸アクターのセットアップ
  #--------------------------------------------------------------------------
  def bmsp_levelup_equipment_setup_naked_actor
    @bmsp_levelup_equipment_naked_actor = self.clone
    # 装備解除
    (0..4).each do |i|
      @bmsp_levelup_equipment_naked_actor.bmsp_levelupequipment_change_equip(i, nil)
    end
    # レベルを1にする
    @bmsp_levelup_equipment_naked_actor.change_level(1, false)
    # スキルを全部忘れとく
    @bmsp_levelup_equipment_naked_actor.instance_eval("@skills.clear")
  end
  #--------------------------------------------------------------------------
  # ● 経験値の変更
  #--------------------------------------------------------------------------
  alias bmsp_levelup_equipment_change_exp change_exp
  def change_exp(exp, show)
    last_lv = @level
    bmsp_levelup_equipment_change_exp(exp, show)
    # レベルアップ装備のレベル変動更新
    bmsp_update_levelup_equipment
  end
  #--------------------------------------------------------------------------
  # ● 装備の変更
  #--------------------------------------------------------------------------
  alias bmsp_levelupequipment_change_equip change_equip
  def change_equip(equip_type, item, test = false)
    bmsp_levelupequipment_change_equip(equip_type, item, test)
    # レベル変動の更新
    bmsp_update_levelup_equipment
  end
  #--------------------------------------------------------------------------
  # ● レベルアップ装備の更新
  #--------------------------------------------------------------------------
  def bmsp_update_levelup_equipment
    old_level = @level
    old_change = @bmsp_levelup_equipment_change
    # 一旦装備していたアイテムのレベル変動を戻す
    bmsp_rollback_level
    # レベル変動を適用
    bmsp_commit_level
    new_level = @level
    new_change = @bmsp_levelup_equipment_change
    change_diff = old_change - new_change
    return if change_diff <= 0
    # レベルが下がった
    if old_change > 0 # レベル上昇から
      if new_change >= 0 # まだ上昇中
        if BMSP::LevelUpEquipment::FORGET_TEMPUP_SKILL
          bmsp_levelup_equipment_forget_skills(old_level, new_level)
        end
      else # 下降も含む
        change_zero = new_level - new_change
        if BMSP::LevelUpEquipment::FORGET_TEMPUP_SKILL
          bmsp_levelup_equipment_forget_skills(old_level, change_zero)
        end
        if BMSP::LevelUpEquipment::FORGET_TEMPUP_SKILL and BMSP::LevelUpEquipment::FORGET_TEMPDOWN_SKILL
          bmsp_levelup_equipment_forget_skills(change_zero, new_level)
        end
      end
    else # レベル下降
      if BMSP::LevelUpEquipment::FORGET_TEMPUP_SKILL and BMSP::LevelUpEquipment::FORGET_TEMPDOWN_SKILL
        bmsp_levelup_equipment_forget_skills(old_level, new_level)
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● レベル変動によるスキルの忘却
  #--------------------------------------------------------------------------
  def bmsp_levelup_equipment_forget_skills(old, new)
    # 変動前のスキルと変動後のスキルの差分
    higher = @bmsp_levelup_equipment_naked_actor.clone
    higher.change_level(old, false)
    lower = @bmsp_levelup_equipment_naked_actor.clone
    lower.change_level(new, false)
    skilldiff = higher.skills - lower.skills
    # 差分のスキルを忘れる
    skilldiff.each do |skill|
      self.forget_skill(skill.id)
    end
  end
  #--------------------------------------------------------------------------
  # ● レベル変動を適用する
  #--------------------------------------------------------------------------
  def bmsp_commit_level
    # レベル変動値を計算
    change = 0
    equips.each do |equip|
      if equip.nil? # 素手
        setting = []
      else
        setting = equip.bmsp_levelup_equipment_settings
      end
      # 変動値を加算
      change += bmsp_get_level_change(setting)
    end
    new_level = [[@level + change, 99].min, 1].max
    levelchange = new_level - @level
    return if levelchange == 0
    # 現在のレベルとの差分経験値を保持してレベルを変動
    diff = @exp - @exp_list[@level]
    bmsp_levelup_equipment_change_exp(@exp_list[new_level], false)
    @bmsp_levelup_equipment_expdiff = diff
    @bmsp_levelup_equipment_change = levelchange
    @bmsp_levelup_equipment_changedlevel = new_level
  end
  #--------------------------------------------------------------------------
  # ● レベル変動を戻す
  #--------------------------------------------------------------------------
  def bmsp_rollback_level
    # 現在の経験値と変動時点における経験値の差
    diff = @exp - @exp_list[@bmsp_levelup_equipment_changedlevel]
    # 変動前の下のレベル
    base_level =
      @bmsp_levelup_equipment_changedlevel - @bmsp_levelup_equipment_change
    # 現在の実際のレベル(経験値)にセット
    bmsp_levelup_equipment_change_exp(@exp_list[base_level] + diff + @bmsp_levelup_equipment_expdiff,
      false)
    # レベル変動情報を初期化
    @bmsp_levelup_equipment_expdiff = 0
    @bmsp_levelup_equipment_change = 0
    @bmsp_levelup_equipment_changedlevel = @level
  end
  #--------------------------------------------------------------------------
  # ● レベル変動値の取得
  #     setting : セッティング
  #--------------------------------------------------------------------------
  def bmsp_get_level_change(setting)
    change = 0
    setting.each do |set|
      if set[:variable] # 変数で指定
        value = $game_variables[set[:value]]
      else # 直接指定
        value = set[:value]
      end
      if set[:minus] # マイナス
        change -= value
      else # プラス
        change += value
      end
    end
    return change
  end
end

|ページトップへ|

更新履歴

2012/08/11…レベルアップ装備によってレベルが変動したときにスキルを忘れるかどうかを設定可能に
2012/01/24…ver1.10 KAMESOFT様の装備拡張（VX専用）2009/08/18現在との競合を解決
2011/12/21…公開

|ページトップへ|

使用方法

スクリプトに丸ごと貼り付けていただければ使用できます．
装備するとレベルが変動する武器・防具を作ることが出来ます．
武器・防具のメモ欄に以下の様に記述してください．
==レベルアップ%flag%%var%%value%==

レベルアップ装備のフォーマット
変換文字	変換候補	説明
%flag%	なし	+と同じ
	+	レベルが加算されます
	-	レベルが減算されます
%var%	なし	%value%の値を直接使います
%var%	V	変数\V[%value%]の値を使います
%value%	整数	この値を使ってレベルを変動したり変数を参照します

また，この記述は複数書くことが出来ます．

例
レベルが4上がる

==レベルアップ4==
または
==レベルアップ+4==

レベルが1下がる

==レベルアップ-1==

レベルが\V[002]の値だけ上がる(\V[002]がマイナスの値なら下がる)

==レベルアップV2==

レベルが基本的に5上がるが変数の値によってはもっと上がったり，逆に下がったりする

==レベルアップ+5==
==レベルアップ+V2==

2012/08/11追記
詳細設定のFORGET_TEMPUP_SKILLをtrueにすると，レベルアップ装備によって上昇していたレベルが減ったときに本来覚えてないスキルを忘れることができます．
falseにすると一度覚えたスキルは覚えたままになります．
FORGET_TEMPDOWN_SKILLをtrueにすると，レベルアップ装備によってレベルが本来より下降したときに覚えていたスキルを忘れさせることができます．
falseにするとレベルが下がっても覚えたスキルはそのまま使用可能です．

また，FORGET_TEMPUP_SKILLがfalseのときはFORGET_TEMPDOWN_SKILLは常にfalse扱いとなります．

詳細設定の欄では以下の項目が設定できます．

FORGET_TEMPUP_SKILL: レベルアップ装備によって上昇していたレベルが減ったときに本来覚えてないスキルを忘れさせるかどうか
FORGET_TEMPDOWN_SKILL: レベルアップ装備によってレベルが本来より下降したときに覚えていたスキルを忘れさせるかどうか

注意

このスクリプトでは「RPG::Weapon」「RPG::Armor」「Game_Actor」のメソッドを改変しています．

|ページトップへ|

|前のページへ|

BlueRedZone

パンくずリスト

コンテンツ

レベルアップ装備(RGSS2)
Ver1.20(2012/08/11)

メニュー

概要

位置

スクリプト

更新履歴

使用方法

注意

BlueRedZone

パンくずリスト

コンテンツ

レベルアップ装備(RGSS2) Ver1.20(2012/08/11)

メニュー

概要

位置

スクリプト

更新履歴

使用方法

注意

レベルアップ装備(RGSS2)
Ver1.20(2012/08/11)