如何使某一事件页的发动条件为使用某物品 - Project1

module Event_Trigger_Object
LAST_USE_ITEM = 1
end
class Game_Battler
alias tig_eto_skill_can_use? skill_can_use?
def skill_can_use?(skill)
return false unless skill.is_a?(RPG::Skill)
return false unless movable?
return false if silent? and skill.spi_f > 0
return false if calc_mp_cost(skill) > mp
unless $game_temp.in_battle
id = 1000 + skill.id
if $game_player.check_event_trigger_object(id, true)
return true
end
if skill.scope == 0
return skill.common_event_id > 0
end
end
return tig_eto_skill_can_use?(skill)
end
end
class Game_Party < Game_Unit
attr_accessor :use_skill
attr_accessor :skill_user
alias tig_eto_initialize initialize
def initialize
tig_eto_initialize
@use_skill_id = nil
@skill_user_id = nil
end
alias tig_eto_item_can_use? item_can_use?
def item_can_use?(item)
return false unless item.is_a?(RPG::Item)
return false if item_number(item) == 0
unless $game_temp.in_battle
if $game_player.check_event_trigger_object(item.id, true)
return true
end
if item.scope == 0
return item.common_event_id > 0
end
end
return tig_eto_item_can_use?(item)
end
end
class Game_Event < Game_Character
attr_reader :erased
alias tig_eto_initialize initialize
def initialize(map_id, event)
@event_trigger_all_items = false
@event_trigger_all_skills = false
@event_trigger_all_weapons = false
@event_trigger_all_armors = false
@event_trigger_type = []
@event_trigger_id = []
tig_eto_initialize(map_id, event)
end
alias tig_eto_conditions_met? conditions_met?
def conditions_met?(page)
return if @erased
if set_event_object_trigger(page)
return false if $game_player.trigger_object_id == nil
return object_trigger?($game_player.trigger_object_id)
end
return tig_eto_conditions_met?(page)
end
def object_trigger?(object_id)
if object_id < 1000
return true if @event_trigger_all_items
object = $data_items[object_id]
elsif object_id < 2000
return true if @event_trigger_all_skills
object = $data_skills[object_id - 1000]
elsif object_id < 3000
return true if @event_trigger_all_weapons
object = $data_weapons[object_id - 2000]
elsif object_id < 4000
return true if @event_trigger_all_armors
object = $data_armors[object_id - 3000]
end
return true if @event_trigger_id.include?(object_id)
if object != nil
return true if @event_trigger_type.include?(object.event_trigger_type)
end
return false
end
def set_event_object_trigger(page)
if page.list.size > 0
command = page.list[0]
if command.code == 108
if /^启动条件[<＜]/ =~ command.parameters[0]
@event_trigger_all_items = /[<＜\s\/／]items[>＞\s\/／]/ =~ command.parameters[0]
@event_trigger_all_skills = /[<＜\s\/／]skills[>＞\s\/／]/ =~ command.parameters[0]
@event_trigger_all_weapons = /[<＜\s\/／]weapons[>＞\s\/／]/ =~ command.parameters[0]
@event_trigger_all_armors = /[<＜\s\/／]armors[>＞\s\/／]/ =~ command.parameters[0]
if /[<＜\s]all[>＞\s]/ =~ command.parameters[0]
@event_trigger_all_items = true ; @event_trigger_all_skills = true
@event_trigger_all_weapons = true ; @event_trigger_all_armors = true
end
@event_trigger_id = []
if /[<＜\s\/／]item[-_]id:\d+[>＞\s\/／]/ =~ command.parameters[0]
item_id = command.parameters[0].scan(/[<＜\s\/／]item[-_]id:(\d+)[>＞\s\/／]/)
item_id = item_id.flatten
item_id.size.times {|n|item_id[n] = item_id[n].to_i}
@event_trigger_id += item_id.compact
end
if /[<＜\s\/／]skill[-_]id:\d+[>＞\s\/／]/ =~ command.parameters[0]
skill_id = command.parameters[0].scan(/[<＜\s\/／]skill[-_]id:(\d+)[>＞\s\/／]/)
skill_id = skill_id.flatten
skill_id.size.times { |n|
skill_id[n] = skill_id[n].to_i
skill_id[n] += 1000
}
@event_trigger_id += skill_id.compact
end
if /[<＜\s\/／]weapon[-_]id:\d+[>＞\s\/／]/ =~ command.parameters[0]
weapon_id = command.parameters[0].scan(/[<＜\s\/／]weapon[-_]id:(\d+)[>＞\s\/／]/)
weapon_id = weapon_id.flatten
weapon_id.size.times { |n|
weapon_id[n] = weapon_id[n].to_i
weapon_id[n] += 2000
}
@event_trigger_id += weapon_id.compact
end
if /[<＜\s\/／]armor[-_]id:\d+[>＞\s\/／]/ =~ command.parameters[0]
armor_id = command.parameters[0].scan(/[<＜\s\/／]armor[-_]id:(\d+)[>＞\s\/／]/)
armor_id = armor_id.flatten
armor_id.size.times { |n|
armor_id[n] = armorl_id[n].to_i
armor_id[n] += 3000
}
@event_trigger_id += armor_id.compact
end
words = command.parameters[0].scan(/[<＜\s\/／]type:(\S+)[>＞\s\/／]/)
words = words.flatten
words = [] if words == nil
@event_trigger_type = words
return true
end
end
end
return false
end
end
class Game_Player < Game_Character
attr_accessor :trigger_object_id
attr_reader :last_trigger_object_id
alias tig_eto_initialize initialize
def initialize
tig_eto_initialize
@trigger_object_id = nil
@last_trigger_object_id = nil
end
def check_event_trigger_object(object_id, test = false)
return false if $game_map.interpreter.running?
result = false
$game_variables[Event_Trigger_Object::LAST_USE_ITEM] = object_id
@trigger_object_id = object_id
@last_trigger_object_id = object_id
for event in $game_map.events_xy(@x, @y)
event.refresh
next if event.erased
next unless event.object_trigger?(object_id)
next if event.priority_type == 1
event.start unless test
result = true
end
if result == false
front_x = $game_map.x_with_direction(@x, @direction)
front_y = $game_map.y_with_direction(@y, @direction)
for event in $game_map.events_xy(front_x, front_y)
event.refresh
next if event.erased
next unless event.object_trigger?(object_id)
next if event.priority_type != 1
event.start unless test
result = true
end
end
@trigger_object_id = nil
return result
end
end
class Game_Interpreter
alias tig_eto_command_end command_end
def command_end
tig_eto_command_end
$game_variables[Event_Trigger_Object::LAST_USE_ITEM] = 0
end
def event_trigger_type?(type)
id = $game_player.last_trigger_object_id
object = nil
if id < 1000
object = $data_items[id]
elsif id < 2000
object = $data_skills[id - 1000]
elsif id < 3000
object = $data_weapons[id - 2000]
elsif id < 4000
object = $data_armors[id - 3000]
end
return false if object == nil
if /启动条件[<＜]type[:：](\S+)[>＞]/ =~ object.note
return type == $1
else
return false
end
end
def event_trigger_item_type?(type)
object = $data_items[$game_player.last_trigger_object_id]
return false if object == nil
if /启动条件[<＜]type[:：](\S+)[>＞]/ =~ object.note
return type == $1
else
return false
end
end
def event_trigger_skill_type?(type)
object = $data_skills[$game_player.last_trigger_object_id - 1000]
return false if object == nil
if /启动条件[<＜]type[:：](\S+)[>＞]/ =~ object.note
return type == $1
else
return false
end
end
def event_trigger_weapon_type?(type)
object = $data_weapons[$game_player.last_trigger_object_id - 2000]
return false if object == nil
if /启动条件[<＜]type[:：](\S+)[>＞]/ =~ object.note
return type == $1
else
return false
end
end
def event_trigger_armor_type?(type)
object = $data_armors[$game_player.last_trigger_object_id - 3000]
return false if object == nil
if /启动条件[<＜]type[:：](\S+)[>＞]/ =~ object.note
return type == $1
else
return false
end
end
def consume_skill_cost
skill = $game_party.use_skill
user = $game_party.skill_user
return if $game_party.use_skill == nil
user.mp -= user.calc_mp_cost(skill)
end
end
class Window_Message < Window_Selectable
alias tig_eto_convert_special_characters convert_special_characters
def convert_special_characters
object_id = $game_player.last_trigger_object_id
if object_id != nil
if object_id < 1000
object = $data_items[object_id]
elsif object_id < 2000
object = $data_skills[object_id - 1000]
elsif object_id < 3000
object = $data_weapons[object_id - 2000]
elsif object_id < 4000
object = $data_armors[object_id - 3000]
end
if object != nil
@text.gsub!(/\\N\[启动条件オブジェクト\]/i) { object.name }
end
end
tig_eto_convert_special_characters
end
end
class Scene_Item < Scene_Base
alias tig_eto_determine_item determine_item
def determine_item
if $game_player.check_event_trigger_object(@item.id)
$scene = Scene_Map.new
return
end
tig_eto_determine_item
end
end
class Scene_Skill < Scene_Base
alias tig_eto_determine_skill determine_skill
def determine_skill
id = 1000 + @skill.id
if $game_player.check_event_trigger_object(id)
$game_party.use_skill = @skill
$game_party.skill_user = @actor
$scene = Scene_Map.new
return
end
tig_eto_determine_skill
end
end
class RPG::BaseItem
def event_trigger_type
if /启动条件[<＜]type[:：](\S+)[>＞]/ =~ self.note
return $1
else
return ""
end
end
end

复制代码