コード: 全て選択
#==============================================================================
# ★ RGSS3_スキル習得システム Ver1.0
#==============================================================================
=begin
作者：tomoaky
webサイト：ひきも記 (http://hikimoki.sakura.ne.jp/)
経験値やお金を消費してスキルを習得するシステムを追加します。
職業の習得スキルのメモ欄に以下のタグを書き込んで設定します。
<習得 E 50>
経験値を５０消費して習得することができる
<習得 G 100>
お金を１００消費して習得することができる
タグを書き込んだスキルは通常のレベルアップによる習得ができなくなります。
習得コストは経験値とお金のどちらか一方しか設定できません。
2011.12.19 Ver1.0
公開
=end
#==============================================================================
# □ 設定項目
#==============================================================================
module TMSKLEARN
COMMAND_SKLEARN = "スキル習得" # メニューに表示するコマンド名
end
#==============================================================================
# ■ RPG::Class
#==============================================================================
class RPG::Class
#--------------------------------------------------------------------------
# ○ 習得するスキルを返す（スキル習得システム用のものを除外）
#--------------------------------------------------------------------------
def learnings
result = []
@learnings.each do |learning|
result.push(learning) unless /<習得\s+([EGIWA])\s+(.+)>/ =~ learning.note
end
result
end
#--------------------------------------------------------------------------
# ○ 習得するスキルを返す（スキル習得システム用のもののみ）
#--------------------------------------------------------------------------
def learnings_ex
@learnings - self.learnings
end
end
#==============================================================================
# ■ Window_MenuCommand
#==============================================================================
class Window_MenuCommand
#--------------------------------------------------------------------------
# ● 主要コマンドをリストに追加
#--------------------------------------------------------------------------
alias tmsklearn_window_menucommand_add_main_commands add_main_commands
def add_main_commands
tmsklearn_window_menucommand_add_main_commands
add_command(TMSKLEARN::COMMAND_SKLEARN, :skill_learn, main_commands_enabled)
end
end
#==============================================================================
# □ Window_SkillLearn
#==============================================================================
class Window_SkillLearn < Window_SkillList
#--------------------------------------------------------------------------
# ● 桁数の取得
#--------------------------------------------------------------------------
def col_max
return 1
end
#--------------------------------------------------------------------------
# ● 選択項目の有効状態を取得
#--------------------------------------------------------------------------
def current_item_enabled?
enable?(@data[index])
end
#--------------------------------------------------------------------------
# ● スキルを許可状態で表示するかどうか
#--------------------------------------------------------------------------
def enable?(item)
@actor && !@actor.skill_learn?(item) && cost_ok?(item)
end
#--------------------------------------------------------------------------
# ○ スキル習得のコスト条件を満たしているかどうか
#--------------------------------------------------------------------------
def cost_ok?(item)
if item
@actor.class.learnings_ex.each do |learning|
if learning.skill_id == item.id
/<習得\s+([EGIWA])\s+(.+)>/ =~ learning.note
case $1
when "E"; return true if $2.to_i <= @actor.exp
when "G"; return true if $2.to_i <= $game_party.gold
when "I"
ary = $2.split(/\s+/)
item = $data_items[ary[0].to_i]
return true if ary[1].to_i <= $game_party.item_number(item)
when "W"
ary = $2.split(/\s+/)
item = $data_weapons[ary[0].to_i]
return true if ary[1].to_i <= $game_party.item_number(item)
when "A"
ary = $2.split(/\s+/)
item = $data_armors[ary[0].to_i]
return true if ary[1].to_i <= $game_party.item_number(item)
end
end
end
end
false
end
#--------------------------------------------------------------------------
# ● スキルリストの作成
#--------------------------------------------------------------------------
def make_item_list
@data = []
if @actor
@actor.class.learnings_ex.each do |learning|
skill = $data_skills[learning.skill_id]
@data.push(skill) if include?(skill)
end
end
end
#--------------------------------------------------------------------------
# ● 項目の描画
#--------------------------------------------------------------------------
def draw_item(index)
skill = @data[index]
if skill
rect = item_rect(index)
rect.width -= 4
if @actor.skill_learn?(skill)
self.contents.font.out_color.set(128, 0, 0)
draw_item_name(skill, rect.x, rect.y, true)
else
self.contents.font.out_color.set(0, 0, 0)
draw_item_name(skill, rect.x, rect.y, enable?(skill))
end
draw_skill_cost(rect, skill)
end
end
#--------------------------------------------------------------------------
# ● スキルの使用コストを描画
#--------------------------------------------------------------------------
def draw_skill_cost(rect, skill)
@actor.class.learnings_ex.each do |learning|
if learning.skill_id == skill.id
/<習得\s+([EGIWA])\s+(.+)>/ =~ learning.note
case $1
when "E"
text = sprintf("%s / %d %s", $2, @actor.exp, "EXP")
when "G"
text = sprintf("%s / %d %s", $2, $game_party.gold,
Vocab::currency_unit)
when "I"
ary = $2.split(/\s+/)
item = $data_items[ary[0].to_i]
text = sprintf("%s / %d", ary[1], $game_party.item_number(item))
ix = rect.x + rect.width - text_size(text).width - 36
draw_icon(item.icon_index, ix, rect.y,
enable?(skill) || @actor.skill_learn?(skill))
when "W"
ary = $2.split(/\s+/)
item = $data_weapons[ary[0].to_i]
text = sprintf("%s / %d", ary[1], $game_party.item_number(item))
ix = rect.x + rect.width - text_size(text).width - 36
draw_icon(item.icon_index, ix, rect.y,
enable?(skill) || @actor.skill_learn?(skill))
when "A"
ary = $2.split(/\s+/)
item = $data_armors[ary[0].to_i]
text = sprintf("%s / %d", ary[1], $game_party.item_number(item))
ix = rect.x + rect.width - text_size(text).width - 36
draw_icon(item.icon_index, ix, rect.y,
enable?(skill) || @actor.skill_learn?(skill))
end
change_color(normal_color, enable?(skill) || @actor.skill_learn?(skill))
draw_text(rect, text, 2)
break
end
end
end
end
#==============================================================================
# ■ Scene_Menu
#==============================================================================
class Scene_Menu
#--------------------------------------------------------------------------
# ● コマンドウィンドウの作成
#--------------------------------------------------------------------------
alias tmsklearn_scene_menu_create_command_window create_command_window
def create_command_window
tmsklearn_scene_menu_create_command_window
@command_window.set_handler(:skill_learn, method(:command_personal))
end
#--------------------------------------------------------------------------
# ● 個人コマンド［決定］
#--------------------------------------------------------------------------
alias tmsklearn_scene_menu_on_personal_ok on_personal_ok
def on_personal_ok
if @command_window.current_symbol == :skill_learn
SceneManager.call(Scene_SkillLearn)
else
tmsklearn_scene_menu_on_personal_ok
end
end
end
#==============================================================================
# □ Scene_SkillLearn
#==============================================================================
class Scene_SkillLearn < Scene_Skill
#--------------------------------------------------------------------------
# ● アイテムウィンドウの作成
#--------------------------------------------------------------------------
def create_item_window
wx = 0
wy = @status_window.y + @status_window.height
ww = Graphics.width
wh = Graphics.height - wy
@item_window = Window_SkillLearn.new(wx, wy, ww, wh)
@item_window.actor = @actor
@item_window.viewport = @viewport
@item_window.help_window = @help_window
@item_window.set_handler(:ok, method(:on_item_ok))
@item_window.set_handler(:cancel, method(:on_item_cancel))
@command_window.skill_window = @item_window
end
#--------------------------------------------------------------------------
# ● アイテム［決定］
#--------------------------------------------------------------------------
def on_item_ok
Sound.play_use_skill
@actor.learn_skill(item.id)
@actor.class.learnings_ex.each do |learning|
if learning.skill_id == item.id
/<習得\s+([EGIWA])\s+(.+)>/ =~ learning.note
case $1
when "E"; @actor.change_exp(@actor.exp - $2.to_i, false)
when "G"; $game_party.lose_gold($2.to_i)
when "I"
ary = $2.split(/\s+/)
item = $data_items[ary[0].to_i]
$game_party.lose_item(item, ary[1].to_i)
when "W"
ary = $2.split(/\s+/)
item = $data_weapons[ary[0].to_i]
$game_party.lose_item(item, ary[1].to_i)
when "A"
ary = $2.split(/\s+/)
item = $data_armors[ary[0].to_i]
$game_party.lose_item(item, ary[1].to_i)
end
end
end
@status_window.refresh
@item_window.refresh
@item_window.activate
end
end