请求帮忙修改耐久度脚本

quess6506

大家好，我又厚颜无耻的来求教了。
由于不会脚本编程，所以希望有好心的大大可以帮忙修改一下？

这是XaiL大的耐久度脚本，
里头强制性的在商店里添加了修复功能。
我想把修复菜单独立出来，
需要用到的时候再呼叫。

请问是否可以把它从商店页去除呢？
谢谢
[pre lang="ruby" line="1"]
#==============================================================================
#   XaiL System - Item Durability
#   Author: Nicke
#   Created: 23/07/2012
#   Edited: 28/08/2012
#   Version: 1.0b
#==============================================================================
# Instructions
# -----------------------------------------------------------------------------
# To install this script, open up your script editor and copy/paste this script
# to an open slot below ? Materials but above ? Main. Remember to save.
#
# This script is pretty extensive which means you need to configure it to
# get it as you want it.
#
# To setup a durability/max durability value for an item do the following in the
# notetag:
# <durability: n>
# <max_durability: n>
# Where n is a floated value (2.3, 2.5 for example).
#
# You can also enable/disable repairing for an item:
# <repairable: bool>
# Where bool is true or false.
# This option will be true as default if you don't specify it.
#
# To check an item's current durability value, do the following in a script call:
# $game_party.durability?(item_id, item_type)
# $game_party.durability?(1, :weapon)
# $game_party.durability?(2, :armor)
# $game_party.durability?(3, :item)
#
# All of those calls above will return the current durability value for each item.
# You can also check the max durability value as well:
# $game_party.max_durability?(item_id, item_type)
# $game_party.max_durability?(3, :item)
#
# Althought the shop is intended for repairing you can force repair an item
# without it costing any gold by the following script call:
# $game_party.change_durability(nil, :repair, 2, :weapon)
# This will repair item_id 2 for weapons without it costing any gold.
#
# Using the same method but with a different option you can damage your item
# by doing the following instead:
# $game_party.change_durability(value, type, item, item_type)
# $game_party.change_durability(0.5, :damage, 2, :weapon)
# This will damage item_id 2 for weapons by a value of 0.5.
#
# You can also restore durability value for an item:
# $game_party.change_durability(2.0, :restore, 2, :weapon)
# This will restore 2.0 durability value to the current value.
#
# You can check if an item can be repaired:
# $game_party.repairable?(1, :item)
#
# You can alter the repair/damage formula in the settings.
# Default for repairing is half the item's price.
# Default for damaging an item is a randomized value by 0.1-0.5 with a
# probability chance at 1/5.
#
# Current durability status for items will be displayed at the end of battle.
# This will only work for the default battle system at the moment.
# A few settings is located below to setup up this.
#
# *** Only for RPG Maker VX Ace. ***
#==============================================================================
($imported ||= {})["XAIL-ITEM-DURABILITY"] = true

module XAIL
  module ITEM_DURABILITY
  #--------------------------------------------------------------------------#
  # * Settings
  #--------------------------------------------------------------------------#
    # FONT = [name, size, color, bold, shadow]
    FONT = [["Anklada™", "Verdana"], 16, Color.new(255,225,255), true, true]
   
    # Show/hide option for the ahop scene.
    # DISPLAY = [show_help_icon, show_name, show_description,
    # show_type, show_amount]
    DISPLAY = [true, true, true, true, true]
   
    # Set the name of repair in the shop scene.
    # REPAIR_COMMAND = string
    REPAIR_COMMAND = "Repair"
   
    # Set the repair cost forumla.
    def self.repair_price(item)
      return item.price / 2
    end
   
    # Set the damage formula.
    def self.durability_damage
      return rand(5) == 0 ? rand(5).to_f/10 + 0.1 : 0
    end
   
    # USE_BROKEN = true/false
    # Should you be able to equip broken items.
    USE_BROKEN = false
   
    # TEXT_BROKEN = string
    # Set the text for a broken item. (Used in battle)
    TEXT_BROKEN = "Broken:"
   
    # DURABILITY_LOG = true/false
    # Display durability status at scene battle. (Default battle system)
    DURABILITY_LOG = true
   
    # LOG_WAIT = number
    # How many times should the durability log wait.
    LOG_WAIT = 3
   
  end
end
# *** Don't edit below unless you know what you are doing. ***
#==============================================================================#
# ** RPG::BaseItem
#==============================================================================#
class RPG::BaseItem
  
  attr_accessor :durability
  
  alias xail_item_durability_baseitem_init initialize
  def initialize(*args, &block)
    # // Method to initialize.
    xail_item_durability_baseitem_init(*args, &block)
    @durability = 0
  end
  
  def durability
    # // Method to check the item durability.
    @note.scan(/<(?:DURABILITY|durability):\s(\d+.\d+)>/i)
    return @durability unless @durability.nil?
    return ($1.to_f > 0.0 ? $1.to_f : 0.0)
  end
  
  def max_durability
    # // Method to check the item max durability.
    @note.scan(/<(?:MAX_DURABILITY|max_durability):\s(\d+.\d+)>/i)
    return ($1.to_f > 0.0 ? $1.to_f : 0.0)
  end
  
  def repairable
    # // Method to check if item is repairable.
    @note.scan(/<(?:REPAIRABLE|repairable):\s+(true|false)>/i)
    return false if durability == max_durability
    return true if $1.nil?
    return eval($1)
  end

end
#==============================================================================#
# ** Game_Party
#==============================================================================#
class Game_Party < Game_Unit
  
  def check_type(item_type)
    # // Method to check the item type.
    case item_type
    when :item   ; item_type = $data_items
    when :weapon ; item_type = $data_weapons
    when :armor  ; item_type = $data_armors
    end
    item_type
  end
  
  def durability?(item_id, item_type)
    # // Method to check the current durability of a specified id.
    item_type = check_type(item_type)
    item_type[item_id].durability unless item_type[item_id].nil?
  end
  
  def max_durability?(item_id, item_type)
    # // Method to check the maximum durability of a specified id.
    item_type = check_type(item_type)
    item_type[item_id].max_durability unless item_type[item_id].nil?
  end
  
  def change_durability(value, type, item_id, item_type)
    # // Method to change the durability value for an item.
    item_type = check_type(item_type)
    item = item_type[item_id]
    case type
    when :restore
      item.durability = (item.durability + value).clamp(0, item.max_durability)
    when :damage
      item.durability = (item.durability - value).clamp(0, item.max_durability)
    when :repair
      item.durability = item.max_durability
    end unless item.nil?
  end
  
  def repairable?(item_id, item_type)
    # // Method to check if an item can be repaired.
    item_type = check_type(item_type)
    item_type[item_id].repairable
  end
  
end
#==============================================================================#
# ** Game_Battler
#==============================================================================#
class Game_Battler < Game_BattlerBase
  
  alias xail_item_durability_gm_battler_execute_damage execute_damage
  def execute_damage(user)
    # // Method to execute damage.
    if user.is_a?(Game_Actor)
      r = Random.new
      r = r.rand(0..4)
      item = user.actor.equips[r]
      item_type = :armor ; item_type = :weapon if r == 0
      $game_party.change_durability(XAIL::ITEM_DURABILITY.durability_damage, :damage, item, item_type)
      if $game_party.durability?(item, item_type) == 0
        $game_actors[user.actor.id].change_equip(r, nil)
      end
    end
    xail_item_durability_gm_battler_execute_damage(user)
  end
  
end
#==============================================================================#
# ** Game_Actor
#==============================================================================#
class Game_Actor < Game_Battler
  
  def optimize_equipments
    # // Method override optimize equipments.
    clear_equipments
    equip_slots.size.times do |i|
      next if !equip_change_ok?(i)
      items = $game_party.equip_items.select do |item|
        item.etype_id == equip_slots &&
        equippable?(item) && item.performance >= 0 && item.durability != 0.0
      end
      change_equip(i, items.max_by {|item| item.performance })
    end
  end
  
end
#==============================================================================#
# ** Window_Help
#==============================================================================#
class Window_Help < Window_Base
  
  def set_durability_help(item)
    # // Method to set the item for window help.
    contents.font.name = XAIL::ITEM_DURABILITY::FONT[0]
    contents.font.bold = XAIL::ITEM_DURABILITY::FONT[3]
    contents.font.shadow = XAIL::ITEM_DURABILITY::FONT[4]
    contents.font.out_color = Color.new(0,0,0,255)
    if item
      icon = XAIL::ITEM_DURABILITY::DISPLAY[0] ? '\i[' + item.icon_index.to_s + ']' : ""
      name = XAIL::ITEM_DURABILITY::DISPLAY[1] ? '\c[2] »» ' + item.name + '\c[0]' : ""
      desc = XAIL::ITEM_DURABILITY::DISPLAY[2] ? item.description : ""
      weight = $imported["XAIL-INVENTORY-WEIGHT"] ? weight = " - Weight: #{item.weight}." : ""
      durability = " - Durability: #{item.durability} / #{item.max_durability}."
      if XAIL::ITEM_DURABILITY::DISPLAY[3]
        if item.is_a?(RPG::Weapon) ; item_type = " (" + $data_system.weapon_types[item.wtype_id] + ")" end
        if item.is_a?(RPG::Armor) ; item_type = " (" + $data_system.armor_types[item.etype_id] + ")" end
      else
        item_type = ""
      end
      new_line = "\n"
      item_text = icon + name + item_type.to_s + weight + durability + new_line + desc
    else
      item_text = ""
    end
    set_text(item_text)
  end
  
end
#==============================================================================
# ** Window_ShopCommand
#==============================================================================
class Window_ShopCommand < Window_HorzCommand
  
  def col_max
    # // Method to set col max.
    return 4
  end

  alias xail_item_durability_winshop_make_cmd_list make_command_list
  def make_command_list(*args, &block)
    # // Method to make command list.
    xail_item_durability_winshop_make_cmd_list(*args, &block)
    add_command(XAIL::ITEM_DURABILITY::REPAIR_COMMAND, :repair)
  end
  
end
#==============================================================================
# ** Window_ShopRepair
#==============================================================================
class Window_ShopRepair < Window_ItemList

  def initialize(x, y, width, height)
    # // Method to initialize.
    super(x, y, width, height)
  end
  
  def enable?(item)
    # // Method to check if a item is valid to be repair.
    item && XAIL::ITEM_DURABILITY.repair_price(item) <= $game_party.gold &&
    !$game_party.item_max?(item) && item.max_durability != item.durability
  end
  
  alias xail_item_durability_shop_update_help update_help
  def update_help(*args, &block)
    # // Method to check if a item is valid to be repair.
    xail_item_durability_shop_update_help(*args, &block)
    @help_window.set_durability_help(item) if @help_window
  end
  
end
#==============================================================================#
# ** Window_BattleLog
#==============================================================================#
class Window_BattleLog < Window_Selectable
  
  def display_durability(battler)
    # // Method to display durability status in battle.
    # i.e if a item has been broken.
    if battler.is_a?(Game_Actor)
      for i in 0..4
        item = battler.actor.equips
        item_type = :armor ; item_type = :weapon if i == 0
        if $game_party.durability?(item, item_type) == 0
          item_type = $game_party.check_type(item_type)
          item = item_type[item]
          item = XAIL::ITEM_DURABILITY::TEXT_BROKEN + " " + item.name
          add_text(sprintf(item))
          XAIL::ITEM_DURABILITY::LOG_WAIT.times do
            wait
          end
        end
      end
    end
  end
  
end
#==============================================================================#
# ** Window_EquipItem
#==============================================================================#
class Window_EquipItem < Window_ItemList
  
  alias xail_item_durability_win_equip_enable? enable?
  def enable?(item)
    # // Method to check if a item is enabled/disabled.
    return false if item.durability == 0 && !XAIL::ITEM_DURABILITY::USE_BROKEN unless item.nil?
    xail_item_durability_win_equip_enable?(item)
  end

end
#==============================================================================#
# ** Scene_Shop
#==============================================================================#
class Scene_Shop < Scene_MenuBase
  
  alias xail_item_durability_shop_start start
  def start(*args, &block)
    # // Method to start the scene.
    xail_item_durability_shop_start(*args, &block)
    create_repair_window
  end
  
  alias xail_item_durability_shop_create_cmd_win create_command_window
  def create_command_window(*args, &block)
    # // Method to create command window.
    xail_item_durability_shop_create_cmd_win(*args, &block)
    @command_window.set_handler(:repair, method(:command_repair))
  end
  
  def create_repair_window
    # // Method to create repair window.
    wy = @category_window.y + @category_window.height
    wh = Graphics.height - wy
    @repair_window = Window_ShopRepair.new(0, wy, Graphics.width, wh)
    @repair_window.viewport = @viewport
    @repair_window.help_window = @help_window
    @repair_window.hide
    @repair_window.set_handler(:ok,     method(:on_repair_ok))
    @repair_window.set_handler(:cancel, method(:on_repair_cancel))
    @category_window.item_window = @repair_window
  end
  
  def command_repair
    # // Method for command repair.
    @dummy_window.hide
    @category_window.show.activate
    @repair_window.show
    @repair_window.unselect
    @repair_window.refresh
  end
  
  def activate_repair
    # // Method to active command options.
    @repair_window.select(0)
    @category_window.show
    @repair_window.refresh
    @repair_window.show.activate
    @status_window.hide
  end
  
  alias xail_item_durability_shop_on_cat_ok on_category_ok
  def on_category_ok(*args, &block)
    # // Method for category ok.
    case @command_window.current_symbol
    when :repair
      activate_repair
    when :sell
      xail_item_durability_shop_on_cat_ok(*args, &block)
    end
  end
  
  alias xail_item_durability_shop_on_cat_cancel on_category_cancel
  def on_category_cancel(*args, &block)
    # // Method for category cancel.
    xail_item_durability_shop_on_cat_cancel(*args, &block)
    @repair_window.hide
  end
  
  def on_repair_ok
    # // Method to repair item.
    @item = @repair_window.item
    @status_window.item = @item
    @category_window.hide
    @repair_window.hide
    @number_window.set(@item, max_item, repair_price, currency_unit)
    @number_window.show.activate
    @status_window.show
  end
  
  def on_repair_cancel
    # // Method to cancel repair.
    @repair_window.unselect
    @category_window.activate
    @status_window.item = nil
    @help_window.clear
  end
  
  alias xail_item_durability_shop_on_number_ok on_number_ok
  def on_number_ok(*args, &block)
    # // Method on number ok.
    if @command_window.current_symbol == :repair
      do_repair(@number_window.number)
    end
    xail_item_durability_shop_on_number_ok(*args, &block)
  end
  
  alias xail_item_durability_shop_end_number_input end_number_input
  def end_number_input(*args, &block)
    # // Method to check input number.
    if @command_window.current_symbol == :repair
      activate_repair
    end
    xail_item_durability_shop_end_number_input(*args, &block)
  end
  
  def do_repair(number)
    # // Method to do repair.
    if @item.is_a?(RPG::Item)   ; item_type = :item     end
    if @item.is_a?(RPG::Weapon) ; item_type = :weapon   end
    if @item.is_a?(RPG::Armor)  ; item_type = :armor    end
    $game_party.lose_gold(number * repair_price)
    $game_party.change_durability(nil, :repair, @item.id, item_type)
    @repair_window.refresh
    @gold_window.refresh
    @status_window.refresh
    @help_window.refresh
  end
  
  def max_item
    # // Method to determine max item.
    $game_party.item_number(@item)
  end
  
  def repair_price
    # // Method to set the repair price for the item.
    XAIL::ITEM_DURABILITY.repair_price(@item)
  end
  
end
#==============================================================================#
# ** Scene_Battle
#==============================================================================#
class Scene_Battle < Scene_Base
  
  alias xail_item_durability_scene_battle_process_action_end process_action_end
  def process_action_end(*args, &block)
    # // Method when process end at scene battle.
    if XAIL::ITEM_DURABILITY::DURABILITY_LOG
      @log_window.display_durability(@subject)
      @log_window.wait_and_clear
    end
    xail_item_durability_scene_battle_process_action_end(*args, &block)
  end

end # END OF FILE

#=*==========================================================================*=#
# ** END OF FILE
#=*==========================================================================*=#
[/pre]

上贺茂润

把这段去掉：

1. #==============================================================================#
   
2. # ** Scene_Shop
   
3. #==============================================================================#
   
4. class Scene_Shop < Scene_MenuBase
   
5.   
   
6.   alias xail_item_durability_shop_start start
   
7.   def start(*args, &block)
   
8.     # // Method to start the scene.
   
9.     xail_item_durability_shop_start(*args, &block)
   
10.     create_repair_window
    
11.   end
    
12.   
    
13.   alias xail_item_durability_shop_create_cmd_win create_command_window
    
14.   def create_command_window(*args, &block)
    
15.     # // Method to create command window.
    
16.     xail_item_durability_shop_create_cmd_win(*args, &block)
    
17.     @command_window.set_handler(:repair, method(:command_repair))
    
18.   end
    
19.   
    
20.   def create_repair_window
    
21.     # // Method to create repair window.
    
22.     wy = @category_window.y + @category_window.height
    
23.     wh = Graphics.height - wy
    
24.     @repair_window = Window_ShopRepair.new(0, wy, Graphics.width, wh)
    
25.     @repair_window.viewport = @viewport
    
26.     @repair_window.help_window = @help_window
    
27.     @repair_window.hide
    
28.     @repair_window.set_handler(:ok,     method(:on_repair_ok))
    
29.     @repair_window.set_handler(:cancel, method(:on_repair_cancel))
    
30.     @category_window.item_window = @repair_window
    
31.   end
    
32.   
    
33.   def command_repair
    
34.     # // Method for command repair.
    
35.     @dummy_window.hide
    
36.     @category_window.show.activate
    
37.     @repair_window.show
    
38.     @repair_window.unselect
    
39.     @repair_window.refresh
    
40.   end
    
41.   
    
42.   def activate_repair
    
43.     # // Method to active command options.
    
44.     @repair_window.select(0)
    
45.     @category_window.show
    
46.     @repair_window.refresh
    
47.     @repair_window.show.activate
    
48.     @status_window.hide
    
49.   end
    
50.   
    
51.   alias xail_item_durability_shop_on_cat_ok on_category_ok
    
52.   def on_category_ok(*args, &block)
    
53.     # // Method for category ok.
    
54.     case @command_window.current_symbol
    
55.     when :repair
    
56.       activate_repair
    
57.     when :sell
    
58.       xail_item_durability_shop_on_cat_ok(*args, &block)
    
59.     end
    
60.   end
    
61.   
    
62.   alias xail_item_durability_shop_on_cat_cancel on_category_cancel
    
63.   def on_category_cancel(*args, &block)
    
64.     # // Method for category cancel.
    
65.     xail_item_durability_shop_on_cat_cancel(*args, &block)
    
66.     @repair_window.hide
    
67.   end
    
68.   
    
69.   def on_repair_ok
    
70.     # // Method to repair item.
    
71.     @item = @repair_window.item
    
72.     @status_window.item = @item
    
73.     @category_window.hide
    
74.     @repair_window.hide
    
75.     @number_window.set(@item, max_item, repair_price, currency_unit)
    
76.     @number_window.show.activate
    
77.     @status_window.show
    
78.   end
    
79.   
    
80.   def on_repair_cancel
    
81.     # // Method to cancel repair.
    
82.     @repair_window.unselect
    
83.     @category_window.activate
    
84.     @status_window.item = nil
    
85.     @help_window.clear
    
86.   end
    
87.   
    
88.   alias xail_item_durability_shop_on_number_ok on_number_ok
    
89.   def on_number_ok(*args, &block)
    
90.     # // Method on number ok.
    
91.     if @command_window.current_symbol == :repair
    
92.       do_repair(@number_window.number)
    
93.     end
    
94.     xail_item_durability_shop_on_number_ok(*args, &block)
    
95.   end
    
96.   
    
97.   alias xail_item_durability_shop_end_number_input end_number_input
    
98.   def end_number_input(*args, &block)
    
99.     # // Method to check input number.
    
100.     if @command_window.current_symbol == :repair
     
101.       activate_repair
     
102.     end
     
103.     xail_item_durability_shop_end_number_input(*args, &block)
     
104.   end
     
105.   
     
106.   def do_repair(number)
     
107.     # // Method to do repair.
     
108.     if @item.is_a?(RPG::Item)   ; item_type = :item     end
     
109.     if @item.is_a?(RPG::Weapon) ; item_type = :weapon   end
     
110.     if @item.is_a?(RPG::Armor)  ; item_type = :armor    end
     
111.     $game_party.lose_gold(number * repair_price)
     
112.     $game_party.change_durability(nil, :repair, @item.id, item_type)
     
113.     @repair_window.refresh
     
114.     @gold_window.refresh
     
115.     @status_window.refresh
     
116.     @help_window.refresh
     
117.   end
     
118.   
     
119.   def max_item
     
120.     # // Method to determine max item.
     
121.     $game_party.item_number(@item)
     
122.   end
     
123.   
     
124.   def repair_price
     
125.     # // Method to set the repair price for the item.
     
126.     XAIL::ITEM_DURABILITY.repair_price(@item)
     
127.   end
     
128.   
     
129. end

复制代码

quess6506

万分感谢~
请问如果仍然想保留维修的视窗，
只是想把它从商店去除，
是否只要修改 class Scene_Shop < Scene_MenuBase
或需要另写一个全新的视窗呢？

另外谢谢版主帮忙编辑，
因为第一次问关于脚本的问题，
所以不知道原来脚本也有格式，
造成不便，实在抱歉。

taroxd

quess6506 发表于 2014-6-19 20:22
万分感谢~
请问如果仍然想保留维修的视窗，
只是想把它从商店去除，

原来的修理界面是内置在商店的。
所以，如果要脱离商店的话，必须重写一个独立的场景来实现(或内置于其他现有场景)，脚本改动量应该不小。

作者强制在商店提供修理界面，正是因为只有这一个方式调出修理界面。

没有能实质性地帮上忙十分抱歉，期待有好心人吧。