概要

特殊な条件下で価格が変動するアイテムを作成します。

更新履歴

2005/07/17

新規作成。

スクリプト

KGC_FluctuatingPrice

#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
#_/　　◆変動価格 － KGC_FluctuatingPrice◆
#_/----------------------------------------------------------------------------
#_/　特定の条件で価格が変動するアイテムを作成します。
#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

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

module KGC
  # ◆価格変動条件配列
  #  ≪タイプ, ID, 条件, 倍率≫
  #  【タイプ】アイテムのタイプ (0..アイテム  1..武器  2..防具)
  #  【  ID  】価格変動対象のID
  #  【 条件 】価格変動条件
  #  １文字目でタイプを指定し、２文字目以降でオプションを指定。
  #   "t"..プレイ時間
  #   ┗━ "h"..時間  "m"..分  "s"..秒
  #   "a"..アクター
  #   ┗━ "i[id]"..アクターID(id は数値)  "l[s]"..レベル(s は基準値)
  #   "p"..パーティ
  #   ┗━ "m[s]"..人数(s は基準値)  "l[s]"..平均レベル(s は基準値)
  #  【 倍率 】価格変動倍率。基本価格に対する割合 (負数も指定可能) 【単位：‰】
  #  配列なので、忘れずに末尾に , を付けてください。
  #  (最後の項目だけは付けても付けなくても良い)
  FP_CONDITION = [
    [0, 37, "ts", 10],  # 時は金なり
  ]  # ← この ] は消さないこと
end

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

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

#==============================================================================
# ■ アイテム・武器・防具 共用モジュール
#==============================================================================

module KGC_FluctuatingPrice_IWA
  #--------------------------------------------------------------------------
  # ● 価格の取得
  #--------------------------------------------------------------------------
  if method_defined?(:price) && !@price_fluctuatingprice
    alias price_KGC_FluctuatingPrice price
  else
    @price_fluctuatingprice = true
  end
  def price
    n = defined?(price_KGC_FluctuatingPrice) ?
      price_KGC_FluctuatingPrice : @price
    return n * self.fluctuation_rate / 100
  end
  #--------------------------------------------------------------------------
  # ● 変動率の取得
  #--------------------------------------------------------------------------
  def fluctuation_rate
    r = 100
    # 種別を取得
    case self
    when RPG::Item
      typ = 0
    when RPG::Weapon
      typ = 1
    when RPG::Armor
      typ = 2
    end
    # 条件を検索
    (KGC::FP_CONDITION.find_all { |c| c[0] == typ && c[1] == @id }).each { |c|
      cnd = c[2].downcase
      case cnd[0].chr
      when "t"  # プレイ時間
        case cnd[1].chr
        when "s"  # second
          n = Graphics.frame_count.to_f / Graphics.frame_rate
        when "m"  # minute
          n = Graphics.frame_count.to_f / (Graphics.frame_rate * 60)
        when "h"  # hour
          n = Graphics.frame_count.to_f / (Graphics.frame_rate * 3600)
        end
      when "a"  # アクター
        if cnd =~ /[i]\[(\d+)\]/i  # アクターID
          actor = $game_actors[$1.to_i]
          if cnd =~ /[l]\[(\d+)\]/i  # レベル
            n = actor.level.to_f / $1.to_i
          end
        end
      when "p"  # パーティ
        if cnd =~ /[m]\[(\d+)\]/i  # パーティ人数
          n = $game_party.actors.size.to_f / $1.to_i
        elsif cnd =~ /[l]\[(\d+)\]/i  # 平均レベル
          n = 0.0
          $game_party.actors.each { |a| n += a.level }
          n = n / $1.to_i
        end
      else
        n = 0.0
      end
      # 変動率を算出
      r += Integer((n - 1.0) * c[3]) / 10
    }
    return [r, 0].max
  end
end

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

#==============================================================================
# ■ RPG::Item
#==============================================================================

class RPG::Item
  include KGC_FluctuatingPrice_IWA
  def price
    return super
  end
end

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

#==============================================================================
# ■ RPG::Weapon
#==============================================================================

class RPG::Weapon
  include KGC_FluctuatingPrice_IWA
  def price
    return super
  end
end

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

#==============================================================================
# ■ RPG::Armor
#==============================================================================

class RPG::Armor
  include KGC_FluctuatingPrice_IWA
  def price
    return super
  end
end

使用法

カスタマイズ項目の

FP_CONDITION = [ ... ] を書き換えて、変動条件を追加します。
項目の書式は [タイプ, ID, 条件, 変動率] となっています。
「タイプ」は

TYPE	種別
0	アイテム
1	武器
2	防具

という対応になっています。

「条件」には、変動条件を示す文字列を設定します。
条件は「１文字目に種別」「２文字目以降にオプション」を記述します。
「１文字目」は

文字	種別
t	プレイ時間
a	アクター
p	パーティ

オプションは

種別	オプション	内容
t (プレイ時間)	s	秒(second)。値が大きくなるほど価格が高くなる。
	m	分(minute)。
	h	時間(hour)。
a (アクター)	i[id]	ID:idのアクター。
a (アクター)	l[s]	ID:idのアクターのレベル。 (sは基準値。この値を境界として価格が上下する) ※「i[id]」オプションを付けないと効果がありません。
p (パーティ)	m[s]	パーティメンバーの人数。 (sは基準値。この値を境界として価格が上下する)
p (パーティ)	l[s]	パーティ内のアクターの平均レベル。 (sは基準値。この値を境界として価格が上下する)

を使用することができます。
「変動率」では、変動条件に応じた価格の変動割合を「‰(千分率)」単位で指定します。
この値が大きいほど変動量が大きくなります。
(条件によっては効果が分かりにくいので、その場合は目安として考えてください)

<例> [0, 50, "ai[1]l[30]", 1000], という指定で、「アクターID:1のレベルが60」の場合、アイテムID:50の価格は２倍になる。

以下、いくつかの指定例を挙げておきます。

サンプルとして設定してある

FP_CONDITION = [
  [0, 37, "ts", 10],
]

は、「アイテムID:37の価格を、プレイ時間(秒)に応じて変動率10‰で変動させる」という意味を表わします。
その他、

# アイテム ID:20 の価格を、アクター ID:1 のレベル(基準値:10)に応じて変動率 100‰ で変動させる
  [0, 20, "ai[1]l[10]", 100],
# 武器 ID:16 の価格を、パーティ人数(基準値:3)に応じて変動率 500‰ で変動させる
  [1, 16, "pm[3]", 500],

等の設定が可能です。