Project1

标题: xp整合系统（20项脚本）中的14合成物品使用出错 [打印本页]

---

作者: ccqtxwd    时间: 2014-7-1 22:21
标题: xp整合系统（20项脚本）中的14合成物品使用出错
系统见https://rpg.blue/forum.php?mo ... amp;authorid=298774
我使用$scene = Scene_Craft.new召唤界面时系统显示出错了，说是296行出错，范例中也不能召唤出界面，请问如何成功召唤出界面，如何改这个脚本？

脚本

RUBY 代码复制

#==============================================================================  
# Sample master list for crafting script
# written by Deke
#============================================================================================
# 简介：
# 这是一个很不错的合成物品系统，可以通过游戏的过程，不断学习可以合成的
# 物品方法。
#
# 使用方法：
# 1、召唤界面：使用脚本$scene = Scene_Craft.new
#
# 2、学习合成：$game_party.learn_recipe(合成项目)
# 
# 3、合成定义：
# 这个合成脚本可以定义两种合成物品。一种是预先定义好了的，就像下面这样,
# 直接写在这里就可以，另一种是在学习之前现场定义。
#
# 4、举例
#  4.1、学会recipe_list[1]定义的合成：$game_party.learn_recipe($game_temp.recipe_list[1])
#       注意，一行如果输入不下，在(的后面或[的后面按回车换行，否则可能出错
#
#  4.2、在游戏中临时定义一种合成，让玩家学会。使用事件中的脚本如下，   
#  脚本：
#    材料 = [$game_variables[1],$game_variables[2]]  #——材料编号是变量1、2的编号
#    材料种类 = [0,0]                                #——材料是物品
#    材料数量 = [$game_variables[3],$game_variables[4]]  #——需要材料数量是变量3、4的编号
#    成品 = $game_variables[5]                       #——获得结果编号是5
#    成品种类 = 1                                    #——成品是防具类
#    $game_party.learn_recipe(Game_Recipe.new(材料,材料种类, 材料数量,成品,成品种类))
#===========================================================================================
class Game_Temp
  attr_reader :recipe_list  
  alias crafting_temp_initialize initialize
  def initialize
    crafting_temp_initialize
    @recipe_list=[]
    get_recipe_list
  end  
  def get_recipe_list    
    ##########################################################################
    # 0 号合成物品设定 (物品小药水×2 + 中药水 ＝ 大药水)
    ##########################################################################
    材料 = [1, 2]             # 需要材料的数据库编号
    材料种类 = [0, 0]         # 需要材料的种类，0是普通物品，1是防具，2是武器
    材料数量 = [2, 1]         # 需要材料的数量
    成品 = 3                  # 获得物品编号
    成品种类 = 0              # 获得物品种类，0是普通物品，1是防具，2是武器
    @recipe_list[1] = Game_Recipe.new(材料,材料种类, 材料数量,成品,成品种类)
 
    ##########################################################################
    # 1 号合成物品设定 (武器铜剑、铁剑、钢剑各1 ＝ 密切斯特剑)
    ##########################################################################
    材料 = [1, 2, 3]          # 需要材料的数据库编号
    材料种类 = [2, 2, 2]      # 需要材料的种类，0是普通物品，1是防具，2是武器
    材料数量 = [3, 2, 1]      # 需要材料的数量
    成品 = 4                  # 获得物品编号
    成品种类 = 2              # 获得物品种类，0是普通物品，1是防具，2是武器
    @recipe_list[2] = Game_Recipe.new(材料,材料种类, 材料数量,成品,成品种类)
 
    ##########################################################################
    # 2 号合成物品设定 (物品力量之石×2 + 防具钢盾×1 ＝ 密切斯特盾)
    ##########################################################################
    材料 = [13, 3]            # 需要材料的数据库编号
    材料种类 = [0, 1]         # 需要材料的种类，0是普通物品，1是防具，2是武器
    材料数量 = [2, 1]         # 需要材料的数量
    成品 = 4                  # 获得物品编号
    成品种类 = 1              # 获得物品种类，0是普通物品，1是防具，2是武器
    @recipe_list[3] = Game_Recipe.new(材料,材料种类, 材料数量,成品,成品种类)
 
    ##########################################################################
    # 2 号合成物品设定 (金疮药×2 + 仙狐涎×1 ＝ 大粒丸)
    ##########################################################################
    材料 = [1, 2]             # 需要材料的数据库编号
    材料种类 = [0, 0]         # 需要材料的种类，0是普通物品，1是防具，2是武器
    材料数量 = [2, 1]         # 需要材料的数量
    成品 = 3                  # 获得物品编号
    成品种类 = 0              # 获得物品种类，0是普通物品，1是防具，2是武器
    @recipe_list[4] = Game_Recipe.new(材料,材料种类, 材料数量,成品,成品种类)
 
  end # of get_recipe_list method
end # of updates to Game_Temp Class
#================================
# CRAFTING PROGRAM
#----------------------------------------------------------------
#-written by Deke
#-yes_no window code created by Phsylomortis
#----------------------------------------------------------------
#================================
#updates to Game_Party class
class Game_Party
 
  attr_accessor       :recipes
 
  alias crafting_party_initialize initialize
 
  def initialize
    crafting_party_initialize
    @recipes=[]
  end
 
  #----------------------------------------------------------------------
  def know?(recipe, version = 1)
    unless recipe.is_a?(Game_Recipe)
      recipe = get_recipe_from_master_list(recipe, version)
    end
    return $game_party.recipes.include?(recipe)
  end
 
#----------------------------------------------------------------------
  def learn_recipe(recipe , version = 1)
    unless recipe.is_a?(Game_Recipe)
      recipe = get_recipe_from_master_list(recipe, version)
    end
    if recipe.is_a?(Game_Recipe)
      unless know?(recipe)
        @recipes.push(recipe)
      end
    end
  end
 
#----------------------------------------------------------------------
  def forget_recipe(recipe , version = 1)
    if !recipe.is_a?(Game_Recipe)
      recipe = get_recipe_from_master_list(recipe, version)
    end
    if recipe.is_a?(Game_Recipe)
      for i in [email]0...@recipes.size[/email]
        if recipe == @recipes
          index = i
          break
        end
      end
      if index != nil
        @recipes.delete(@recipes[index])
      end
    end
  end
 
#----------------------------------------------------------------------
  def get_recipe_from_master_list(item, version)
    index = nil
    for i in 0...$game_temp.recipe_list.size
      if item[0] == $game_temp.recipe_list.result and item[1] ==$game_temp.recipe_list.result_type
        version -= 1
        if version == 0
          index = i
          break
        end
      end
    end
    if index.is_a?(Integer)
      return ($game_temp.recipe_list[index])
    else
      return false
    end
  end
 
end # of Game_Party updates
#================================
class Game_Recipe
  attr_reader :ingredients
  attr_reader :quantities
  attr_reader :result
  attr_reader :result_type
  attr_reader :ingredient_types
 
#----------------------------------------------------------------------
  def initialize( ingredients, ingredient_types, quantities, result, result_type)
    @ingredients = ingredients
    @ingredient_types = ingredient_types
    @quantities = quantities
    @result = result
    @result_type = result_type
  end
 
#----------------------------------------------------------------------
  def name
    case @result_type
      when 0
        name = $data_items[@result].name
      when 1
        name = $data_armors[@result].name
      when 2
        name = $data_weapons[@result].name
    end
    return name
  end
 
#----------------------------------------------------------------------
  def have
    have_all = true
    for i in [email]0...@ingredients.size[/email]
      case @ingredient_types
        when 0
          if $game_party.item_number(@ingredients) < @quantities
            have_all=false
          end
        when 1
          if $game_party.armor_number(@ingredients) < @quantities
            have_all=false
          end
        when 2
          if $game_party.weapon_number(@ingredients) < @quantities
            have_all=false
          end
      end
    end
    return have_all
  end
#----------------------------------------------------------------------
  def decrement
    for i in [email]0...@ingredients.size[/email]
      case @ingredient_types
      when 0
        $game_party.lose_item(@ingredients, @quantities)
      when 1
        $game_party.lose_armor(@ingredients, @quantities)
      when 2
        $game_party.lose_weapon(@ingredients, @quantities)
      end
    end
  end
#----------------------------------------------------------------------
  def make
    if have
      case @result_type
      when 0
        $game_party.gain_item(@result, 1)
      when 1
        $game_party.gain_armor(@result, 1)
      when 2
        $game_party.gain_weapon(@result, 1)
      end
      decrement
    end
  end
 
#----------------------------------------------------------------------
  def == (recipe)
    if recipe.is_a?(Game_Recipe)
      equal = true
      if recipe.ingredients != self.ingredients
        equal = false
      end
      if recipe.ingredient_types != self.ingredient_types
        equal = false
      end
      if recipe.quantities != self.quantities
        equal = false
      end
      if recipe.result != self.result
        equal=false
      end
      if recipe.result_type != self.result_type
        equal = false
      end
    else
      equal = false
    end
    return equal
  end
 
end # of Game_Recipe class
#===================================
class Window_Craft < Window_Selectable
  #--------------------------------------------------------------------------
  def initialize
    super(0, 64 - 32 + 5, 240, 416 - 32 + 16 - 15)
    @column_max = 1
    refresh
    self.index = 0
  end
  #--------------------------------------------------------------------------
  def recipe
    return @data[self.index]
  end
  ############################################################################
  def item
    case @types[self.index]
    when 0
      return $data_items[@ingredients]
    when 1
      return $data_armors[@ingredients]
    when 2
      return $data_weapons[@ingredients]
    end
  end
  ############################################################################
  #--------------------------------------------------------------------------
  def refresh
    if self.contents != nil
      self.contents.dispose
      self.contents = nil
    end
    @data = []
    for i in 0...$game_party.recipes.size
        @data.push($game_party.recipes)
    end
    @item_max = @data.size
    if @item_max > 0
      self.contents = Bitmap.new(width - 32, row_max * 32)
      self.contents.font.name = "黑体" # = "黑体"
      self.contents.font.size = 18 # = 18
      for i in 0...@item_max
        draw_item(i)
      end
    end
  end
  #--------------------------------------------------------------------------
  def draw_item(index)
    recipe = @data[index]
    self.contents.font.color = recipe.have ? normal_color : disabled_color
    x = 16
    y = index * 32
    self.contents.draw_text(x , y, self.width-32, 32, recipe.name, 0)
  end
  #--------------------------------------------------------------------------
  def update_help
    current_recipe = recipe
    if current_recipe.is_a?(Game_Recipe)
    case current_recipe.result_type
      when 0
        description = $data_items[current_recipe.result].description
      when 1
        description = $data_armors[current_recipe.result].description
      when 2
        description = $data_weapons[current_recipe.result].description
      end
    else
      description = ""
    end
    @help_window.set_text(description)
    @help_window.update
  end
 
end # of Window_Craft
#=======================================
class Window_CraftResult < Window_Base
  #--------------------------------------------------------------------------
  def initialize
    super(240, 64 - 32 + 5, 400, 184)
    self.contents = Bitmap.new(width - 32, height - 32)
    self.contents.font.name = "黑体" # = $fontface.is_a?(String) ? $fontface : $defaultfonttype
    self.contents.font.size = 18 # = 20
    @result = nil
    @type = nil
  end
  #--------------------------------------------------------------------------
  def refresh
    self.contents.clear
    case @type
      when 0
        item = $data_items[@result]
        if item.recover_hp_rate > item.recover_hp
          hp_string = "HP回复率:"
          hp_stat = item.recover_hp_rate
        else
          hp_string = "HP回复量:"
          hp_stat = item.recover_hp
        end
        if item.recover_sp_rate > item.recover_sp
          sp_string = "SP回复率:"
          sp_stat = item.recover_sp_rate
        else
          sp_string = "SP回复量:"
          sp_stat = item.recover_sp
        end
        @strings = [hp_string, sp_string, "物理防御:" , "仙法防御:", "命中率:", "分散度:"]
        @stats = [hp_stat, sp_stat, item. pdef_f, item.mdef_f, item.hit, item.variance,
                       $game_party.item_number(@result)]
        @bitmap = RPG::Cache.icon(item.icon_name)
      when 1
        item = $data_armors[@result]
        @strings = ["物理防御:", "仙法防御:", "回避修正:", "力量增加:", "灵巧增加:", 
                       "速度增加:", "仙攻增加:"]
        @stats = [item.pdef, item.mdef, item.eva, item.str_plus, item.dex_plus,
                    item.agi_plus, item.int_plus, $game_party.armor_number(@result) ]
        @bitmap = RPG::Cache.icon(item.icon_name)
      when 2
        item = $data_weapons[@result]
        @strings =["攻击力:", "物理防御:", "仙法防御:", "力量增加:", "灵巧增加:",
                    "速度增加:", "仙攻增加:"]
        @stats = [item.atk, item.pdef, item.mdef, item.str_plus, item.dex_plus,
                    item.agi_plus, item.int_plus, $game_party.weapon_number(@result) ]
        @bitmap = RPG::Cache.icon(item.icon_name)
    end
    for i in [email]0...@strings.size[/email]
      x = i%2 * 184
      y = i /2 *28 +32
      self.contents.font.color = normal_color
      self.contents.draw_text(x,y,100, 28,@strings)
      self.contents.font.color = system_color
      self.contents.draw_text(x + 110, y, 45, 28, @stats.to_s)
    end
    self.contents.blt(0, 0, @bitmap, Rect.new(0, 0, 24, 24), 255)
    self.contents.font.color= normal_color
    self.contents.draw_text(40, 0, 300, 28, "待合成物品的现有数量:")
    self.contents.font.color = system_color
    count = @stats[@stats.size - 1].to_s
    self.contents.draw_text(294, 0, 45, 28, count )
  end
 
#----------------------------------------------------------------------
  def set_result(result , type)
    @result = result
    @type = type
    refresh
  end
end #of Window_CraftResult
#=======================================
class Window_CraftIngredients < Window_Base
  #--------------------------------------------------------------------------
  def initialize
    super(240, 248 - 32 + 5, 400, 232 - 32 + 16 - 15)
    self.contents = Bitmap.new(width - 32, height - 32)
    self.contents.font.name = "黑体" # = $fontface.is_a?(String) ? $fontface : $defaultfonttype
    self.contents.font.size = 18 # = 20
    @ingredients = []
    @types = []
    @quantities = []
    @item = nil
    @count = 0
  end
  #--------------------------------------------------------------------------
  def refresh
    self.contents.clear
    for i in [email]0...@ingredients.size[/email]
      case @types
      when 0
        @item = $data_items[@ingredients]
        @count = $game_party.item_number(@ingredients)
      when 1
        @item = $data_armors[@ingredients]
        @count = $game_party.armor_number(@ingredients)
      when 2
        @item = $data_weapons[@ingredients]
        @count = $game_party.weapon_number(@ingredients)
      end
      y = i *26
      self.contents.blt(0, y, RPG::Cache.icon(@item.icon_name), Rect.new(0, 0, 24, 24), 255)
      self.contents.font.color = @count >= @quantities ? normal_color : disabled_color
      self.contents.draw_text(30, y, 280, 28, @item.name)
      self.contents.draw_text(300, y, 45, 28, @quantities.to_s)
      self.contents.font.color = system_color
      self.contents.draw_text(245, y, 45, 28, @count.to_s )     
    end
  end
  #--------------------------------------------------------------------------
  def set_ingredients(ingredients , types, quantities)
    @ingredients = ingredients
    @types = types
    @quantities = quantities
    refresh
  end
end # of Window_CraftIngredients
#======================================
class Scene_Craft
  #--------------------------------------------------------------------------
  def initialize(craft_index=0)
    @craft_index=craft_index
  end
 
  #--------------------------------------------------------------------------
  def main
    @craft_window = Window_Craft.new
    @craft_window.index=@craft_index
    @confirm_window = Window_Base.new(120, 188, 400, 64)
    @confirm_window.contents = Bitmap.new(368, 32)
    @confirm_window.contents.font.name = "黑体"
    @confirm_window.contents.font.size = 20
    @help_window = Window_Help.new
    @craft_window.help_window = @help_window
    @result_window=Window_CraftResult.new
    @ingredients_window=Window_CraftIngredients.new
    @yes_no_window = Window_Command.new(100, ["确定", "放弃"])
    @confirm_window.visible = false
    @confirm_window.z = 1500
    @yes_no_window.visible = false
    @yes_no_window.active = false
    @yes_no_window.index = 1
    @yes_no_window.x = 270
    @yes_no_window.y = 252
    @yes_no_window.z = 1500
    @label_window = Window_Base.new(450,200,190,52)
    @label_window.contents=Bitmap.new(@label_window.width - 32,@label_window.height - 32)
    @label_window.contents.font.size=20
    @label_window.contents.font.color = @label_window.normal_color
    @label_window.contents.font.name = "黑体"
    @label_window.contents.draw_text(0, 0, @label_window.contents.width, 20, "  现有   需要")
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    Graphics.freeze
    @help_window.dispose
    @craft_window.dispose
    @result_window.dispose
    @ingredients_window.dispose
    @confirm_window.dispose
    @yes_no_window.dispose
    @label_window.dispose
  end
  #--------------------------------------------------------------------------
  def update
    @craft_window.update
    @ingredients_window.update
    if $game_party.recipes.size > 0
      @result_window.set_result(@craft_window.recipe.result, @craft_window.recipe.result_type)
      @ingredients_window.set_ingredients(@craft_window.recipe.ingredients,
                                                           @craft_window.recipe.ingredient_types,
                                                           @craft_window.recipe.quantities)
    end
    if @craft_window.active
      update_craft
      return
    end
    if @yes_no_window.active
      confirm_update
      return
    end
  end
  #--------------------------------------------------------------------------
  def update_craft
    if Input.trigger?(Input::B)
      $game_system.se_play($data_system.cancel_se)
      $scene = Scene_Menu.new(3)
      return
    end
    if Input.trigger?(Input::C) and $game_party.recipes.size != 0
      [url=home.php?mod=space&uid=2564094]@recipe[/url] = @craft_window.recipe
      if @recipe.have
        @yes_no_window.active = true
        @craft_window.active = false
      else
        $game_system.se_play($data_system.buzzer_se)
        return
      end
    end
  end
  #--------------------------------------------------------------------------
  def confirm_update
    @craft_index = @craft_window.index
    @confirm_window.visible = true
    @confirm_window.z = 1500
    @yes_no_window.visible = true
    @yes_no_window.active = true
    @yes_no_window.z = 1500
    @yes_no_window.update
    string = "合成 " + @recipe.name + "？"
    cw = @confirm_window.contents.text_size(string).width
    center = @confirm_window.contents.width/2 - cw /2
    unless @drawn
      @confirm_window.contents.draw_text(center, 0, cw, 30, string)
      @drawn = true
    end
    if Input.trigger?(Input::C)
      if @yes_no_window.index == 0
        $game_system.se_play($data_system.decision_se)
        @recipe.make
        $game_system.se_play($data_system.save_se)
        $scene=Scene_Craft.new(@craft_index)
      else
        $game_system.se_play($data_system.cancel_se)
        $scene=Scene_Craft.new(@craft_index)
      end
    end
    if Input.trigger?(Input::B)
      $game_system.se_play($data_system.cancel_se)
      $scene=Scene_Craft.new(@craft_index)
    end
  end
end # of Scene_Craft
#==============================================================================
# 本脚本来自[url]www.66RPG.com[/url]，使用和转载请保留此信息
#==============================================================================

#==============================================================================  


# Sample master list for crafting script


# written by Deke


#============================================================================================


# 简介：


# 这是一个很不错的合成物品系统，可以通过游戏的过程，不断学习可以合成的


# 物品方法。


#


# 使用方法：


# 1、召唤界面：使用脚本$scene = Scene_Craft.new


#


# 2、学习合成：$game_party.learn_recipe(合成项目)


# 


# 3、合成定义：


# 这个合成脚本可以定义两种合成物品。一种是预先定义好了的，就像下面这样,


# 直接写在这里就可以，另一种是在学习之前现场定义。


#


# 4、举例


#  4.1、学会recipe_list[1]定义的合成：$game_party.learn_recipe($game_temp.recipe_list[1])


#       注意，一行如果输入不下，在(的后面或[的后面按回车换行，否则可能出错


#


#  4.2、在游戏中临时定义一种合成，让玩家学会。使用事件中的脚本如下，   


#  脚本：


#    材料 = [$game_variables[1],$game_variables[2]]  #——材料编号是变量1、2的编号


#    材料种类 = [0,0]                                #——材料是物品


#    材料数量 = [$game_variables[3],$game_variables[4]]  #——需要材料数量是变量3、4的编号


#    成品 = $game_variables[5]                       #——获得结果编号是5


#    成品种类 = 1                                    #——成品是防具类


#    $game_party.learn_recipe(Game_Recipe.new(材料,材料种类, 材料数量,成品,成品种类))


#===========================================================================================


class Game_Temp


  attr_reader :recipe_list  


  alias crafting_temp_initialize initialize


  def initialize


    crafting_temp_initialize


    @recipe_list=[]


    get_recipe_list


  end  


  def get_recipe_list    


    ##########################################################################


    # 0 号合成物品设定 (物品小药水×2 + 中药水 ＝ 大药水)


    ##########################################################################


    材料 = [1, 2]             # 需要材料的数据库编号


    材料种类 = [0, 0]         # 需要材料的种类，0是普通物品，1是防具，2是武器


    材料数量 = [2, 1]         # 需要材料的数量


    成品 = 3                  # 获得物品编号


    成品种类 = 0              # 获得物品种类，0是普通物品，1是防具，2是武器


    @recipe_list[1] = Game_Recipe.new(材料,材料种类, 材料数量,成品,成品种类)


 


    ##########################################################################


    # 1 号合成物品设定 (武器铜剑、铁剑、钢剑各1 ＝ 密切斯特剑)


    ##########################################################################


    材料 = [1, 2, 3]          # 需要材料的数据库编号


    材料种类 = [2, 2, 2]      # 需要材料的种类，0是普通物品，1是防具，2是武器


    材料数量 = [3, 2, 1]      # 需要材料的数量


    成品 = 4                  # 获得物品编号


    成品种类 = 2              # 获得物品种类，0是普通物品，1是防具，2是武器


    @recipe_list[2] = Game_Recipe.new(材料,材料种类, 材料数量,成品,成品种类)


 


    ##########################################################################


    # 2 号合成物品设定 (物品力量之石×2 + 防具钢盾×1 ＝ 密切斯特盾)


    ##########################################################################


    材料 = [13, 3]            # 需要材料的数据库编号


    材料种类 = [0, 1]         # 需要材料的种类，0是普通物品，1是防具，2是武器


    材料数量 = [2, 1]         # 需要材料的数量


    成品 = 4                  # 获得物品编号


    成品种类 = 1              # 获得物品种类，0是普通物品，1是防具，2是武器


    @recipe_list[3] = Game_Recipe.new(材料,材料种类, 材料数量,成品,成品种类)


 


    ##########################################################################


    # 2 号合成物品设定 (金疮药×2 + 仙狐涎×1 ＝ 大粒丸)


    ##########################################################################


    材料 = [1, 2]             # 需要材料的数据库编号


    材料种类 = [0, 0]         # 需要材料的种类，0是普通物品，1是防具，2是武器


    材料数量 = [2, 1]         # 需要材料的数量


    成品 = 3                  # 获得物品编号


    成品种类 = 0              # 获得物品种类，0是普通物品，1是防具，2是武器


    @recipe_list[4] = Game_Recipe.new(材料,材料种类, 材料数量,成品,成品种类)


 


  end # of get_recipe_list method


end # of updates to Game_Temp Class


#================================


# CRAFTING PROGRAM


#----------------------------------------------------------------


#-written by Deke


#-yes_no window code created by Phsylomortis


#----------------------------------------------------------------


#================================


#updates to Game_Party class


class Game_Party


 


  attr_accessor       :recipes


 


  alias crafting_party_initialize initialize


 


  def initialize


    crafting_party_initialize


    @recipes=[]


  end


 


  #----------------------------------------------------------------------


  def know?(recipe, version = 1)


    unless recipe.is_a?(Game_Recipe)


      recipe = get_recipe_from_master_list(recipe, version)


    end


    return $game_party.recipes.include?(recipe)


  end


 


#----------------------------------------------------------------------


  def learn_recipe(recipe , version = 1)


    unless recipe.is_a?(Game_Recipe)


      recipe = get_recipe_from_master_list(recipe, version)


    end


    if recipe.is_a?(Game_Recipe)


      unless know?(recipe)


        @recipes.push(recipe)


      end


    end


  end


 


#----------------------------------------------------------------------


  def forget_recipe(recipe , version = 1)


    if !recipe.is_a?(Game_Recipe)


      recipe = get_recipe_from_master_list(recipe, version)


    end


    if recipe.is_a?(Game_Recipe)


      for i in [email]0...@recipes.size[/email]


        if recipe == @recipes


          index = i


          break


        end


      end


      if index != nil


        @recipes.delete(@recipes[index])


      end


    end


  end


 


#----------------------------------------------------------------------


  def get_recipe_from_master_list(item, version)


    index = nil


    for i in 0...$game_temp.recipe_list.size


      if item[0] == $game_temp.recipe_list.result and item[1] ==$game_temp.recipe_list.result_type


        version -= 1


        if version == 0


          index = i


          break


        end


      end


    end


    if index.is_a?(Integer)


      return ($game_temp.recipe_list[index])


    else


      return false


    end


  end


 


end # of Game_Party updates


#================================


class Game_Recipe


  attr_reader :ingredients


  attr_reader :quantities


  attr_reader :result


  attr_reader :result_type


  attr_reader :ingredient_types


 


#----------------------------------------------------------------------


  def initialize( ingredients, ingredient_types, quantities, result, result_type)


    @ingredients = ingredients


    @ingredient_types = ingredient_types


    @quantities = quantities


    @result = result


    @result_type = result_type


  end


 


#----------------------------------------------------------------------


  def name


    case @result_type


      when 0


        name = $data_items[@result].name


      when 1


        name = $data_armors[@result].name


      when 2


        name = $data_weapons[@result].name


    end


    return name


  end


 


#----------------------------------------------------------------------


  def have


    have_all = true


    for i in [email]0...@ingredients.size[/email]


      case @ingredient_types


        when 0


          if $game_party.item_number(@ingredients) < @quantities


            have_all=false


          end


        when 1


          if $game_party.armor_number(@ingredients) < @quantities


            have_all=false


          end


        when 2


          if $game_party.weapon_number(@ingredients) < @quantities


            have_all=false


          end


      end


    end


    return have_all


  end


#----------------------------------------------------------------------


  def decrement


    for i in [email]0...@ingredients.size[/email]


      case @ingredient_types


      when 0


        $game_party.lose_item(@ingredients, @quantities)


      when 1


        $game_party.lose_armor(@ingredients, @quantities)


      when 2


        $game_party.lose_weapon(@ingredients, @quantities)


      end


    end


  end


#----------------------------------------------------------------------


  def make


    if have


      case @result_type


      when 0


        $game_party.gain_item(@result, 1)


      when 1


        $game_party.gain_armor(@result, 1)


      when 2


        $game_party.gain_weapon(@result, 1)


      end


      decrement


    end


  end


 


#----------------------------------------------------------------------


  def == (recipe)


    if recipe.is_a?(Game_Recipe)


      equal = true


      if recipe.ingredients != self.ingredients


        equal = false


      end


      if recipe.ingredient_types != self.ingredient_types


        equal = false


      end


      if recipe.quantities != self.quantities


        equal = false


      end


      if recipe.result != self.result


        equal=false


      end


      if recipe.result_type != self.result_type


        equal = false


      end


    else


      equal = false


    end


    return equal


  end


 


end # of Game_Recipe class


#===================================


class Window_Craft < Window_Selectable


  #--------------------------------------------------------------------------


  def initialize


    super(0, 64 - 32 + 5, 240, 416 - 32 + 16 - 15)


    @column_max = 1


    refresh


    self.index = 0


  end


  #--------------------------------------------------------------------------


  def recipe


    return @data[self.index]


  end


  ############################################################################


  def item


    case @types[self.index]


    when 0


      return $data_items[@ingredients]


    when 1


      return $data_armors[@ingredients]


    when 2


      return $data_weapons[@ingredients]


    end


  end


  ############################################################################


  #--------------------------------------------------------------------------


  def refresh


    if self.contents != nil


      self.contents.dispose


      self.contents = nil


    end


    @data = []


    for i in 0...$game_party.recipes.size


        @data.push($game_party.recipes)


    end


    @item_max = @data.size


    if @item_max > 0


      self.contents = Bitmap.new(width - 32, row_max * 32)


      self.contents.font.name = "黑体" # = "黑体"


      self.contents.font.size = 18 # = 18


      for i in 0...@item_max


        draw_item(i)


      end


    end


  end


  #--------------------------------------------------------------------------


  def draw_item(index)


    recipe = @data[index]


    self.contents.font.color = recipe.have ? normal_color : disabled_color


    x = 16


    y = index * 32


    self.contents.draw_text(x , y, self.width-32, 32, recipe.name, 0)


  end


  #--------------------------------------------------------------------------


  def update_help


    current_recipe = recipe


    if current_recipe.is_a?(Game_Recipe)


    case current_recipe.result_type


      when 0


        description = $data_items[current_recipe.result].description


      when 1


        description = $data_armors[current_recipe.result].description


      when 2


        description = $data_weapons[current_recipe.result].description


      end


    else


      description = ""


    end


    @help_window.set_text(description)


    @help_window.update


  end


 


end # of Window_Craft


#=======================================


class Window_CraftResult < Window_Base


  #--------------------------------------------------------------------------


  def initialize


    super(240, 64 - 32 + 5, 400, 184)


    self.contents = Bitmap.new(width - 32, height - 32)


    self.contents.font.name = "黑体" # = $fontface.is_a?(String) ? $fontface : $defaultfonttype


    self.contents.font.size = 18 # = 20


    @result = nil


    @type = nil


  end


  #--------------------------------------------------------------------------


  def refresh


    self.contents.clear


    case @type


      when 0


        item = $data_items[@result]


        if item.recover_hp_rate > item.recover_hp


          hp_string = "HP回复率:"


          hp_stat = item.recover_hp_rate


        else


          hp_string = "HP回复量:"


          hp_stat = item.recover_hp


        end


        if item.recover_sp_rate > item.recover_sp


          sp_string = "SP回复率:"


          sp_stat = item.recover_sp_rate


        else


          sp_string = "SP回复量:"


          sp_stat = item.recover_sp


        end


        @strings = [hp_string, sp_string, "物理防御:" , "仙法防御:", "命中率:", "分散度:"]


        @stats = [hp_stat, sp_stat, item. pdef_f, item.mdef_f, item.hit, item.variance,


                       $game_party.item_number(@result)]


        @bitmap = RPG::Cache.icon(item.icon_name)


      when 1


        item = $data_armors[@result]


        @strings = ["物理防御:", "仙法防御:", "回避修正:", "力量增加:", "灵巧增加:", 


                       "速度增加:", "仙攻增加:"]


        @stats = [item.pdef, item.mdef, item.eva, item.str_plus, item.dex_plus,


                    item.agi_plus, item.int_plus, $game_party.armor_number(@result) ]


        @bitmap = RPG::Cache.icon(item.icon_name)


      when 2


        item = $data_weapons[@result]


        @strings =["攻击力:", "物理防御:", "仙法防御:", "力量增加:", "灵巧增加:",


                    "速度增加:", "仙攻增加:"]


        @stats = [item.atk, item.pdef, item.mdef, item.str_plus, item.dex_plus,


                    item.agi_plus, item.int_plus, $game_party.weapon_number(@result) ]


        @bitmap = RPG::Cache.icon(item.icon_name)


    end


    for i in [email]0...@strings.size[/email]


      x = i%2 * 184


      y = i /2 *28 +32


      self.contents.font.color = normal_color


      self.contents.draw_text(x,y,100, 28,@strings)


      self.contents.font.color = system_color


      self.contents.draw_text(x + 110, y, 45, 28, @stats.to_s)


    end


    self.contents.blt(0, 0, @bitmap, Rect.new(0, 0, 24, 24), 255)


    self.contents.font.color= normal_color


    self.contents.draw_text(40, 0, 300, 28, "待合成物品的现有数量:")


    self.contents.font.color = system_color


    count = @stats[@stats.size - 1].to_s


    self.contents.draw_text(294, 0, 45, 28, count )


  end


 


#----------------------------------------------------------------------


  def set_result(result , type)


    @result = result


    @type = type


    refresh


  end


end #of Window_CraftResult


#=======================================


class Window_CraftIngredients < Window_Base


  #--------------------------------------------------------------------------


  def initialize


    super(240, 248 - 32 + 5, 400, 232 - 32 + 16 - 15)


    self.contents = Bitmap.new(width - 32, height - 32)


    self.contents.font.name = "黑体" # = $fontface.is_a?(String) ? $fontface : $defaultfonttype


    self.contents.font.size = 18 # = 20


    @ingredients = []


    @types = []


    @quantities = []


    @item = nil


    @count = 0


  end


  #--------------------------------------------------------------------------


  def refresh


    self.contents.clear


    for i in [email]0...@ingredients.size[/email]


      case @types


      when 0


        @item = $data_items[@ingredients]


        @count = $game_party.item_number(@ingredients)


      when 1


        @item = $data_armors[@ingredients]


        @count = $game_party.armor_number(@ingredients)


      when 2


        @item = $data_weapons[@ingredients]


        @count = $game_party.weapon_number(@ingredients)


      end


      y = i *26


      self.contents.blt(0, y, RPG::Cache.icon(@item.icon_name), Rect.new(0, 0, 24, 24), 255)


      self.contents.font.color = @count >= @quantities ? normal_color : disabled_color


      self.contents.draw_text(30, y, 280, 28, @item.name)


      self.contents.draw_text(300, y, 45, 28, @quantities.to_s)


      self.contents.font.color = system_color


      self.contents.draw_text(245, y, 45, 28, @count.to_s )     


    end


  end


  #--------------------------------------------------------------------------


  def set_ingredients(ingredients , types, quantities)


    @ingredients = ingredients


    @types = types


    @quantities = quantities


    refresh


  end


end # of Window_CraftIngredients


#======================================


class Scene_Craft


  #--------------------------------------------------------------------------


  def initialize(craft_index=0)


    @craft_index=craft_index


  end


 


  #--------------------------------------------------------------------------


  def main


    @craft_window = Window_Craft.new


    @craft_window.index=@craft_index


    @confirm_window = Window_Base.new(120, 188, 400, 64)


    @confirm_window.contents = Bitmap.new(368, 32)


    @confirm_window.contents.font.name = "黑体"


    @confirm_window.contents.font.size = 20


    @help_window = Window_Help.new


    @craft_window.help_window = @help_window


    @result_window=Window_CraftResult.new


    @ingredients_window=Window_CraftIngredients.new


    @yes_no_window = Window_Command.new(100, ["确定", "放弃"])


    @confirm_window.visible = false


    @confirm_window.z = 1500


    @yes_no_window.visible = false


    @yes_no_window.active = false


    @yes_no_window.index = 1


    @yes_no_window.x = 270


    @yes_no_window.y = 252


    @yes_no_window.z = 1500


    @label_window = Window_Base.new(450,200,190,52)


    @label_window.contents=Bitmap.new(@label_window.width - 32,@label_window.height - 32)


    @label_window.contents.font.size=20


    @label_window.contents.font.color = @label_window.normal_color


    @label_window.contents.font.name = "黑体"


    @label_window.contents.draw_text(0, 0, @label_window.contents.width, 20, "  现有   需要")


    Graphics.transition


    loop do


      Graphics.update


      Input.update


      update


      if $scene != self


        break


      end


    end


    Graphics.freeze


    @help_window.dispose


    @craft_window.dispose


    @result_window.dispose


    @ingredients_window.dispose


    @confirm_window.dispose


    @yes_no_window.dispose


    @label_window.dispose


  end


  #--------------------------------------------------------------------------


  def update


    @craft_window.update


    @ingredients_window.update


    if $game_party.recipes.size > 0


      @result_window.set_result(@craft_window.recipe.result, @craft_window.recipe.result_type)


      @ingredients_window.set_ingredients(@craft_window.recipe.ingredients,


                                                           @craft_window.recipe.ingredient_types,


                                                           @craft_window.recipe.quantities)


    end


    if @craft_window.active


      update_craft


      return


    end


    if @yes_no_window.active


      confirm_update


      return


    end


  end


  #--------------------------------------------------------------------------


  def update_craft


    if Input.trigger?(Input::B)


      $game_system.se_play($data_system.cancel_se)


      $scene = Scene_Menu.new(3)


      return


    end


    if Input.trigger?(Input::C) and $game_party.recipes.size != 0


      [url=home.php?mod=space&uid=2564094]@recipe[/url] = @craft_window.recipe


      if @recipe.have


        @yes_no_window.active = true


        @craft_window.active = false


      else


        $game_system.se_play($data_system.buzzer_se)


        return


      end


    end


  end


  #--------------------------------------------------------------------------


  def confirm_update


    @craft_index = @craft_window.index


    @confirm_window.visible = true


    @confirm_window.z = 1500


    @yes_no_window.visible = true


    @yes_no_window.active = true


    @yes_no_window.z = 1500


    @yes_no_window.update


    string = "合成 " + @recipe.name + "？"


    cw = @confirm_window.contents.text_size(string).width


    center = @confirm_window.contents.width/2 - cw /2


    unless @drawn


      @confirm_window.contents.draw_text(center, 0, cw, 30, string)


      @drawn = true


    end


    if Input.trigger?(Input::C)


      if @yes_no_window.index == 0


        $game_system.se_play($data_system.decision_se)


        @recipe.make


        $game_system.se_play($data_system.save_se)


        $scene=Scene_Craft.new(@craft_index)


      else


        $game_system.se_play($data_system.cancel_se)


        $scene=Scene_Craft.new(@craft_index)


      end


    end


    if Input.trigger?(Input::B)


      $game_system.se_play($data_system.cancel_se)


      $scene=Scene_Craft.new(@craft_index)


    end


  end


end # of Scene_Craft


#==============================================================================


# 本脚本来自[url]www.66RPG.com[/url]，使用和转载请保留此信息


#==============================================================================

---

作者: 江户川洛奇    时间: 2014-7-1 23:14


测试了一下，没有LZ所说的问题，可能是脚本冲突吧
LZ可以试试这个
https://rpg.blue/thread-311885-1-1.html

---

作者: ccqtxwd    时间: 2014-7-2 10:06

江户川洛奇 发表于 2014-7-1 23:14
测试了一下，没有LZ所说的问题，可能是脚本冲突吧
LZ可以试试这个
https://rpg.blue/thread-311885-1-1. ...

我用了那个脚本，但是也出错了，我也就用了这些脚本，哪个冲突了？

---

作者: 我爱吴悦淇    时间: 2014-7-2 10:17
好像得先学会什么合成
然后你再召唤试试

---

作者: heiwang1997    时间: 2014-7-2 10:39
劝楼主还是不要用这个20项脚本整合了，错误太多，运行非常不稳定，而且画面拙劣，排版乱七八糟，做出来的游戏也不会好的。
如果非要使用的话，是任务系统把Game_Party重新定义了，可以把任务系统移到合成系统前面或是用alias重写任务系统的前几行。
不过，这样合成系统还是不能使用，里面有N多低级错误，而且运行效率极低，建议换用别的合成系统
附一张经过N处改动勉强能用的chaochao合成系统（想要的话告诉我）：

无标题.png (147.37 KB, 下载次数: 11)

下载附件  保存到相册

2014-7-2 10:39 上传

---

作者: chd114    时间: 2014-7-2 11:48

1. =begin
   
2. ==============================================================================
   
3. ★ Item_Transmute
   
4. ------------------------------------------------------------------------------
   
5.   配方不公开的物品合成(加强版)
   
6.   原作者 Summoner
   
7.   By Chd114
   
8. ------------------------------------------------------------------------------
   
9.   注：该脚本具有至高权威性，可以覆盖任何此脚本的前身脚本！
   
10. ==============================================================================
    
11. 本脚本以知识共享署名-非商业性使用 3.0 Unported 许可协议进行许可。
    
12. 详见 http://creativecommons.org/licenses/by-nc/3.0/
    
13. ==============================================================================
    
14. 原作者的话：  
    
15. 这是一个配方不公开的物品合成，也就是说什么材料可以合成什么物品玩家在
    
16. 游戏中的合成界面是不能直接看到的。由于物品的合成配方不是公开的，所以
    
17. 玩家需要通过自己探索或从NPC处得到合成配方（当然看攻略也是一种可能）
    
18. 例如M&M中的配药水，Diablo II的盒子，NWV中的铁匠铺、Wizard Lab……
    
19. 可扩展性：可以加强、扩展的东西应该很多。
    
20. 例如：合成需要花费GP、SP甚至XP，合成需要特定器具，合成失败受到伤害，
    
21. 某些物品的几率合成、物品图鉴等等。
    
22. 有的东西已经注释清楚了，搞懂原理的话，根据自己需要改起来也不会很麻烦。
    
23. 个人一下子没时间实现这些，欢迎大家多多修改分享。
    
24. 
    
25. Chd114的话（2013年6月9日 11:45:40）：
    
26. 其实这个脚本的改进思路早在去年此脚本出来之前就有想法了···只不过那个
    
27. 时候本人的技术还差了一点所以就没有盲目去弄今天（2013年6月9日 9:33:40）
    
28. 花了2小时左右的时间鼓捣了下最后把大部分东西都弄好了
    
29. 
    
30. Chd114的话（2013年6月10日 7:59:49）：
    
31. 吃饭前来了新的灵感，于是就在吃完饭后鼓捣了下下···现在一个配方里的每一种成
    
32. 功额外产物和失败额外产物都可以设定独立的出现概率了，而且还加了新功能，
    
33. 可以控制开关与变量！（2013年6月10日 8:28:03）
    
34. 
    
35. 此脚本冲突可能性：与装备耐久度、随即装备属性之类会导致装备具有独立性的
    
36. 脚本功能冲突，其他脚本基本上不冲突
    
37. 
    
38. 使用方法：在事件中使用脚本$scene = Scene_Compose.new，然后等待2帧
    
39. ==============================================================================
    
40. 若合成失败（无匹配的配方、因合成概率低而失败）物品是否失去
    
41. =end
    
42. $Ingredient_Lost_When_Fail = true#false
    
43. # 合成成功/失败SE  
    
44. # 若不使用SE请设置为“""”（不含外引号）
    
45. $SE_Compose_Successful = ""  
    
46. $SE_Compose_Failed = ""
    
47.   
    
48. #=============================================================================
    
49. # ■ 配方及补充的定义
    
50. #-----------------------------------------------------------------------------
    
51. # Game_System
    
52. #=============================================================================
    
53. class Game_System
    
54.   attr_accessor :formulas
    
55.   attr_accessor :products
    
56.   attr_accessor :sproducts
    
57.   attr_accessor :fproducts
    
58.   attr_accessor :other
    
59.   attr_accessor :probability
    
60.   alias formulas_initialize initialize  
    
61.   def initialize  
    
62.     formulas_initialize
    
63.     @formulas = []  
    
64.     @products = []
    
65.     @sproducts = []
    
66.     @fproducts = []
    
67.     @other = []
    
68.     @probability = []
    
69. =begin
    
70. ===========================配方表===========================================   
    
71. 
    
72.   配方格式
    
73.   @formulas[i] = [[材料种类,材料编号,数量],[材料种类,材料编号,数量]……]                  
    
74.   @products[i] = [[成品种类,成品编号,数量],[成品种类,成品编号,数量]……]
    
75.   @sproducts[i] = [[成功额外产物种类，编号，数量，出现概率]，[成功额外产物种类，编号，数量，出现概率]]
    
76.   @fproducts[i] = [[失败额外产物种类，编号，数量，出现概率]，[失败额外产物种类，编号，数量，出现概率]]
    
77.   @other[i] = [[开关/变量，开关/变量编号，控制系数]，[开关/变量，开关/变量编号，控制系数]]
    
78.   @probability[i] = 合成成功率
    
79.   种类：物品 0 武器 1 防具 2
    
80.   1.如果有两个配方材料相同，理论上会按编号较小的处理
    
81.   2.配方材料的顺序与合成是无关的（当然如果你想改成有关肯定也不会太麻烦）
    
82.   3.允许某个材料拆成多件成品（可能就不叫物品合成，应该叫物品分解了）
    
83.   4.产物数量神马的理论上你可以无限写，只要你不怕麻烦加手抽筋。
    
84.   5.暂时不支持多步合并为一步的合成  
    
85.     例如 A + B = C，C + D = E，如果不存在A + B + D = E的配方
    
86.     A + B + D无法合成 E
    
87.   6.暂时不支持将配方逆向使用（本功能会尝试完善）
    
88.     例如 A + B = C，C = A + B，如果不存在C = A + B的配方
    
89.     C无法拆解成A + B
    
90.   7.暂时不支持花费金钱的合成与配方学习（本功能会尝试完善）
    
91.     例如A + B = C，作者设定成合成此配方的成品需要花费5000金币之类的
    
92.   8.成功额外产物出现的概率与失败额外产物出现的概率会导致所有成功额外
    
93.   产物或所有失败额外产物同时出现，比如失败额外产物有大药膏和艾西非远
    
94.   古祭祀，则在合成失败后若出现失败的额外产物时同时出现大药膏和艾西非
    
95.   远古祭祀。
    
96.   9.成功额外产物和失败额外产物的设定和配方材料、配方成品设定格式是一致的。
    
97.   10.@other[i]里面控制开关与变量，当[开关/变量，开关/变量编号，控制系数]
    
98.   里面的[开关/变量]为0时是改变开关，改变开关的时候若控制系数为0则是关闭，
    
99.   1就是打开，当[开关/变量]为1时是改变变量，这个时候控制系数可以添任意正负
    
100.   整数。
     
101.   11.当你要改变开关状态时控制系数只能是1或0
     
102.   12.不需要的功能全部数字写0即可
     
103.   13.只有合成/拆分成功时才能改变开关与变量
     
104.   14.已经打开的开关依然可以用合成/拆分操作重复打开
     
105. 
     
106. =end
     
107.     #初始化模板
     
108.     @formulas[0] = []
     
109.     @products[0] = []
     
110.     @sproducts[0] = []
     
111.     @fproducts[0] = []
     
112.     @other[0] = []
     
113.     @probability[0] = []
     
114.     #这个才是样例！！！
     
115.     @formulas[1] = [[1,1,1]]         
     
116.     @products[1] = [[2,29,1]]
     
117.     @sproducts[1] = [[1,2,1,50],[1,3,1,100]]
     
118.     @fproducts[1] = [[0,2,1,50],[0,3,3,100]]
     
119.     @other[1] = [[0,10,1],[1,20,2]]#10号开关打开，20号变量+2
     
120.     @probability[1] = 100
     
121.   end  
     
122. end
     
123.   
     
124. class Game_Temp  
     
125.   attr_accessor :forge
     
126.   alias forge_item_initialize initialize  
     
127.   def initialize  
     
128.     forge_item_initialize
     
129.     # 定义合成窗口中的物品储存区
     
130.     [url=home.php?mod=space&uid=14254]@Forge[/url] = []  
     
131.   end  
     
132. end
     
133.   
     
134. #==============================================================================
     
135. # ■ Window_ForgeCommand
     
136. #------------------------------------------------------------------------------
     
137. # 　合成画面、选择要做的事的窗口
     
138. #==============================================================================
     
139.   
     
140. class Window_ComposeCommand < Window_Selectable
     
141.   #--------------------------------------------------------------------------
     
142.   # ● 初始化对像
     
143.   #--------------------------------------------------------------------------
     
144.   def initialize
     
145.     super(0, 64, 640, 64)
     
146.     self.contents = Bitmap.new(width - 32, height - 32)
     
147.     @item_max = 4
     
148.     @column_max = 4
     
149.     @commands = ["更改材料", "合成", "放弃合成", "离开"]
     
150.     refresh
     
151.     self.index = 0
     
152.   end
     
153.   #--------------------------------------------------------------------------
     
154.   # ● 刷新
     
155.   #--------------------------------------------------------------------------
     
156.   def refresh
     
157.     self.contents.clear
     
158.     for i in 0...@item_max
     
159.       draw_item(i)
     
160.     end
     
161.   end
     
162.   #--------------------------------------------------------------------------
     
163.   # ● 描绘项目
     
164.   #     index : 项目编号
     
165.   #--------------------------------------------------------------------------
     
166.   def draw_item(index)
     
167.     x = 4 + index * 160
     
168.     self.contents.draw_text(x, 0, 128, 32, @commands[index])
     
169.   end
     
170. end
     
171.   
     
172. #==============================================================================
     
173. # ■ Window_ForgeLeft
     
174. #------------------------------------------------------------------------------
     
175. #  合成画面中显示拥有的物品的窗口
     
176. #==============================================================================
     
177.   
     
178. class Window_ComposeLeft < Window_Selectable
     
179.   #--------------------------------------------------------------------------
     
180.   # ● 初始化对像
     
181.   #--------------------------------------------------------------------------
     
182.   def initialize
     
183.     super(0, 128, 320, 352)
     
184.     @column_max = 1
     
185.     refresh
     
186.     self.index = 0
     
187.   end
     
188.   #--------------------------------------------------------------------------
     
189.   # ● 获取物品
     
190.   #--------------------------------------------------------------------------
     
191.   def item
     
192.     return @data[self.index]
     
193.   end
     
194.   #--------------------------------------------------------------------------
     
195.   # ● 刷新
     
196.   #--------------------------------------------------------------------------
     
197.   def refresh
     
198.     if self.contents != nil
     
199.       self.contents.dispose
     
200.       self.contents = nil
     
201.     end
     
202.     self.update_cursor_rect
     
203.     @data = []
     
204.     for i in 1...$data_items.size
     
205.       if $game_party.item_number(i) > 0
     
206.         @data.push($data_items[i])
     
207.       end
     
208.     end
     
209.     for i in 1...$data_weapons.size
     
210.       if $game_party.weapon_number(i) > 0
     
211.         @data.push($data_weapons[i])
     
212.       end
     
213.     end
     
214.     for i in 1...$data_armors.size
     
215.       if $game_party.armor_number(i) > 0
     
216.         @data.push($data_armors[i])
     
217.       end
     
218.     end
     
219.     # 如果项目数不是 0 就生成位图、描绘全部项目
     
220.     @item_max = @data.size
     
221.     if @item_max > 0
     
222.       self.contents = Bitmap.new(width - 32, row_max * 32)
     
223.       for i in 0...@item_max
     
224.         draw_item(i)
     
225.       end
     
226.     end
     
227.   end
     
228.   #--------------------------------------------------------------------------
     
229.   # ● 描绘项目
     
230.   #     index : 项目标号
     
231.   #--------------------------------------------------------------------------
     
232.   def draw_item(index)
     
233.     item = @data[index]
     
234.     case item
     
235.     when RPG::Item
     
236.       number = $game_party.item_number(item.id)
     
237.     when RPG::Weapon
     
238.       number = $game_party.weapon_number(item.id)
     
239.     when RPG::Armor
     
240.       number = $game_party.armor_number(item.id)
     
241.     end
     
242.     self.contents.font.color = text_color(item.name_color_66RPG)
     
243.     x = 4
     
244.     y = index * 32
     
245.     rect = Rect.new(x, y, self.width / @column_max - 32, 32)
     
246.     self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
     
247.     bitmap = RPG::Cache.icon(item.icon_name)
     
248.     opacity = self.contents.font.color == text_color(item.name_color_66RPG) ? 255 : 128
     
249.     self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 32, 32), opacity)
     
250.     self.contents.draw_text(x + 28, y, 212, 32, item.name, 0)
     
251.     self.contents.draw_text(x + 240, y, 16, 32, ":", 1)
     
252.     self.contents.draw_text(x + 256, y, 32, 32, number.to_s, 2)
     
253.   end
     
254.   #--------------------------------------------------------------------------
     
255.   # ● 刷新帮助文本
     
256.   #--------------------------------------------------------------------------
     
257.   def update_help
     
258.     @help_window.set_text(self.item == nil ? "" : self.item.description)
     
259.   end
     
260. end
     
261.   
     
262. #==============================================================================
     
263. # ■ Window_ForgeRight
     
264. #------------------------------------------------------------------------------
     
265. #  合成画面中的合成区窗口
     
266. #==============================================================================
     
267.   
     
268. class Window_ComposeRight < Window_Selectable
     
269.   attr_accessor :forge_item
     
270.   #--------------------------------------------------------------------------
     
271.   # ● 初始化对像
     
272.   #--------------------------------------------------------------------------
     
273.   def initialize(forge_item)
     
274.     super(320, 128, 320, 352)
     
275.     @column_max = 1
     
276.     @forge_item = []
     
277.     refresh
     
278.     self.index = 0
     
279.   end
     
280.   #--------------------------------------------------------------------------
     
281.   # ● 获取物品
     
282.   #--------------------------------------------------------------------------
     
283.   def item
     
284.     return @data[self.index]
     
285.   end
     
286.   #--------------------------------------------------------------------------  
     
287.   # ● 获取物品  
     
288.   #--------------------------------------------------------------------------  
     
289.   def item_number  
     
290.     return @data_number[self.index]  
     
291.   end  
     
292.   #--------------------------------------------------------------------------
     
293.   # ● 刷新
     
294.   #--------------------------------------------------------------------------
     
295.   def refresh
     
296.     if self.contents != nil
     
297.       self.contents.dispose
     
298.       self.contents = nil
     
299.     end
     
300.     @data = []
     
301.     @data_number = []  
     
302.     @forge_item = $game_temp.forge
     
303.     for item_forge in @forge_item
     
304.       case item_forge[0]
     
305.       when 0
     
306.         item = $data_items[item_forge[1]]
     
307.       when 1
     
308.         item = $data_weapons[item_forge[1]]
     
309.       when 2
     
310.         item = $data_armors[item_forge[1]]
     
311.       end
     
312.       if (item != nil) and (item_forge[2] != 0)  
     
313.         @data.push(item)  
     
314.         @data_number.push(item_forge[2])  
     
315.       else  
     
316.         @data.delete(item)  
     
317.       end  
     
318.     end
     
319.     # 如果项目数不是 0 就生成位图、描绘全部项目
     
320.     @item_max = @data.size
     
321.     if @item_max > 0
     
322.       self.contents = Bitmap.new(width - 32, row_max * 32)
     
323.       for i in 0...@item_max
     
324.         draw_item(i)
     
325.       end
     
326.     end
     
327.   end
     
328.   #--------------------------------------------------------------------------
     
329.   # ● 描绘项目
     
330.   #     index : 项目标号
     
331.   #--------------------------------------------------------------------------
     
332.   def draw_item(index)
     
333.     item = @data[index]
     
334.     case item
     
335.     when RPG::Item
     
336.       number = $game_temp.forge[index][2]
     
337.     when RPG::Weapon
     
338.       number = $game_temp.forge[index][2]
     
339.     when RPG::Armor
     
340.       number = $game_temp.forge[index][2]
     
341.     end
     
342.     self.contents.font.color = text_color(item.name_color_66RPG)
     
343.     x = 4
     
344.     y = index * 32
     
345.     rect = Rect.new(x, y, self.width / @column_max - 32, 32)
     
346.     self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
     
347.     bitmap = RPG::Cache.icon(item.icon_name)
     
348.     opacity = self.contents.font.color == text_color(item.name_color_66RPG) ? 255 : 128
     
349.     self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 32, 32), opacity)
     
350.     self.contents.draw_text(x + 28, y, 212, 32, item.name, 0)
     
351.     self.contents.draw_text(x + 240, y, 16, 32, ":", 1)
     
352.     self.contents.draw_text(x + 256, y, 32, 32, number.to_s, 2)
     
353.   end
     
354.   #--------------------------------------------------------------------------
     
355.   # ● 刷新帮助文本
     
356.   #--------------------------------------------------------------------------
     
357.   def update_help
     
358.     @help_window.set_text(self.item == nil ? "" : self.item.description)
     
359.   end
     
360. end
     
361.   
     
362. #==============================================================================
     
363. # ■ Scene_Compose
     
364. #------------------------------------------------------------------------------
     
365. # 　处理物品合成画面的类
     
366. #==============================================================================
     
367.   
     
368. class Scene_Compose
     
369. #--------------------------------------------------------------------------
     
370. # ● 初始化
     
371. #--------------------------------------------------------------------------
     
372. def initialize
     
373.    # 生成帮助窗口
     
374.    @help_window = Window_Help.new
     
375.    # 生成命令窗口
     
376.    @command_window = Window_ComposeCommand.new
     
377.    @command_window.active = false
     
378.    # 生成左方窗口
     
379.    @item_window = Window_ComposeLeft.new
     
380.    @item_window.active = true
     
381.    @item_window.help_window = @help_window
     
382.    # 生成右方窗口
     
383.    @forge_window = Window_ComposeRight.new([])
     
384.    @forge_window.active = false
     
385.    @forge_window.help_window = @help_window
     
386.    # 初始化配方与合成区
     
387.    @formulas = $game_system.formulas
     
388.    @products = $game_system.products
     
389.    @sproducts = $game_system.sproducts
     
390.    @fproducts = $game_system.fproducts
     
391.    @other = $game_system.other
     
392.    @probability = $game_system.probability
     
393.    @forge = []
     
394.    @products_temp = []  
     
395.    @sproducts_temp = []
     
396.    @fproducts_temp = []
     
397.    @other_temp = []
     
398.    @probability_temp = []
     
399. end
     
400.   #--------------------------------------------------------------------------
     
401.   # ● 主处理
     
402.   #--------------------------------------------------------------------------
     
403. def main
     
404.    # 执行过渡
     
405.    Graphics.transition
     
406.    # 主循环
     
407.    loop do
     
408.      # 刷新游戏画面
     
409.      Graphics.update
     
410.      # 刷新输入情报
     
411.      Input.update
     
412.      # 刷新画面
     
413.      update
     
414.      # 如果画面被切换的话就中断循环
     
415.      if $scene != self
     
416.        break
     
417.      end
     
418.    end
     
419.    # 准备过渡
     
420.    Graphics.freeze
     
421.    # 释放窗口
     
422.    @help_window.dispose
     
423.    @command_window.dispose
     
424.    @item_window.dispose
     
425.    @forge_window.dispose
     
426. end
     
427.   #--------------------------------------------------------------------------
     
428.   # ● 刷新画面
     
429.   #--------------------------------------------------------------------------  
     
430. def update
     
431.    @help_window.update
     
432.    @command_window.update
     
433.    @item_window.update
     
434.    @forge_window.update
     
435.    if @command_window.active
     
436.      update_command
     
437.      return
     
438.    end
     
439.    if @item_window.active
     
440.      update_item
     
441.      return
     
442.    end
     
443.    if @forge_window.active
     
444.      update_forge
     
445.      return
     
446.    end
     
447.     return
     
448. end
     
449.   #--------------------------------------------------------------------------
     
450.   # ● 刷新画面(指令窗口激活的情况下)
     
451.   #--------------------------------------------------------------------------
     
452.   def update_command
     
453.     # 按下 B 键的情况下
     
454.     if Input.trigger?(Input::B)
     
455.       # 演奏取消 SE
     
456.       $game_system.se_play($data_system.cancel_se)
     
457.       abort
     
458.       # 切换到地图画面
     
459.       $scene = Scene_Map.new
     
460.       return
     
461.     end
     
462.      # 按下 C 键的情况下
     
463.     if Input.trigger?(Input::C)
     
464.       # 命令窗口光标位置分支
     
465.       case @command_window.index
     
466.       when 0  # 更改材料
     
467.         # 演奏确定 SE
     
468.         $game_system.se_play($data_system.decision_se)
     
469.         # 窗口状态转向物品窗口
     
470.         @command_window.active = false
     
471.         @item_window.active = true
     
472.         @forge_window.active = false
     
473.       when 1  # 合成
     
474.         # 演奏确定 SE
     
475.         $game_system.se_play($data_system.decision_se)
     
476.         # 执行合成命令
     
477.         if $game_temp.forge != []
     
478.           compose
     
479.         end
     
480.       when 2  # 放弃合成
     
481.         # 演奏确定 SE
     
482.         $game_system.se_play($data_system.decision_se)
     
483.         # 放弃合成
     
484.         abort
     
485.       when 3  # 离开
     
486.         # 演奏确定 SE
     
487.         $game_system.se_play($data_system.decision_se)
     
488.         # 放弃合成
     
489.         abort
     
490.         # 切换到地图画面
     
491.         $scene = Scene_Map.new
     
492.       end
     
493.       return
     
494.     end
     
495.   end
     
496.   #--------------------------------------------------------------------------
     
497.   # ● 刷新画面(物品窗口激活的情况下)
     
498.   #--------------------------------------------------------------------------
     
499.   def update_item
     
500.      # 按下 B 键的情况下
     
501.     if Input.trigger?(Input::B)
     
502.       # 演奏取消 SE
     
503.       $game_system.se_play($data_system.cancel_se)
     
504.       # 切换到指令窗口
     
505.       @item_window.active = false
     
506.       @command_window.active = true
     
507.       @help_window.set_text("")
     
508.       return
     
509.     end
     
510.      # 按下 C 键的情况
     
511.     if Input.trigger?(Input::C)
     
512.       # 演奏确定 SE
     
513.       $game_system.se_play($data_system.decision_se)
     
514.       # 获取物品
     
515.       @item = @item_window.item
     
516.       # 获取物品的所持数
     
517.       case @item
     
518.       when RPG::Item
     
519.         number = $game_party.item_number(@item.id)
     
520.         typetemp = 0
     
521.       when RPG::Weapon
     
522.         number = $game_party.weapon_number(@item.id)
     
523.         typetemp = 1
     
524.       when RPG::Armor
     
525.         number = $game_party.armor_number(@item.id)
     
526.         typetemp = 2
     
527.       end
     
528.       if number != nil
     
529.         # 更改合成窗口的物品
     
530.         case @item
     
531.         when RPG::Item
     
532.           $game_party.lose_item(@item.id, 1)
     
533.         when RPG::Weapon
     
534.           $game_party.lose_weapon(@item.id, 1)
     
535.         when RPG::Armor
     
536.           $game_party.lose_armor(@item.id, 1)
     
537.         end
     
538.         forge_change(typetemp, @item.id, 1)
     
539.         # 刷新各窗口
     
540.         @item_window.update
     
541.         @help_window.update
     
542.         @forge_window.update
     
543.         @item_window.refresh
     
544.         @forge_window.refresh
     
545.       end
     
546.     end
     
547.      # 按下 右方向键 的情况
     
548.     if Input.trigger?(Input::RIGHT)
     
549.       # 切换到合成窗口
     
550.       @item_window.active = false
     
551.       @forge_window.active = true
     
552.     end
     
553.   end
     
554.   #--------------------------------------------------------------------------
     
555.   # ● 刷新画面(合成窗口激活的情况下)
     
556.   #--------------------------------------------------------------------------
     
557.   def update_forge
     
558.      # 按下 B 键的情况下
     
559.     if Input.trigger?(Input::B)
     
560.       # 演奏取消 SE
     
561.       $game_system.se_play($data_system.cancel_se)
     
562.       # 切换到指令窗口
     
563.       @forge_window.active = false
     
564.       @command_window.active = true
     
565.       @help_window.set_text("")
     
566.       return
     
567.     end
     
568.      # 按下 C 键的情况
     
569.     if Input.trigger?(Input::C)
     
570.      # 演奏确定 SE
     
571.      $game_system.se_play($data_system.decision_se)
     
572.      # 获取物品
     
573.       @item = @forge_window.item
     
574.       # 获取物品的所持数
     
575.       case @item
     
576.       when RPG::Item
     
577.         number = @forge_window.item_number
     
578.         typetemp = 0
     
579.       when RPG::Weapon
     
580.         number = @forge_window.item_number
     
581.         typetemp = 1
     
582.       when RPG::Armor
     
583.         number = @forge_window.item_number
     
584.         typetemp = 2
     
585.       end
     
586.      if number != nil
     
587.        # 更改合成窗口的物品
     
588.        case @item
     
589.        when RPG::Item
     
590.          $game_party.gain_item(@item.id, 1)
     
591.        when RPG::Weapon
     
592.          $game_party.gain_weapon(@item.id, 1)
     
593.        when RPG::Armor
     
594.          $game_party.gain_armor(@item.id, 1)
     
595.        end
     
596.        #p number
     
597.        forge_change(typetemp, @item.id, -1)
     
598.        # 刷新各窗口
     
599.        @item_window.refresh
     
600.        @forge_window.refresh
     
601.        @help_window.update
     
602.        @item_window.update
     
603.        @forge_window.update
     
604.       end
     
605.     end
     
606.        # 按下 左方向键 的情况下
     
607.     if Input.trigger?(Input::LEFT)
     
608.       # 切换到合成窗口
     
609.       @forge_window.active = false
     
610.       @item_window.active = true
     
611.     end
     
612.   end
     
613.   #--------------------------------------------------------------------------
     
614.   # ● 更改合成窗口物品
     
615.   #--------------------------------------------------------------------------
     
616.   def forge_change(type,id,number)  
     
617.      quantity = number  
     
618.      for item in $game_temp.forge
     
619.        if (item[0]==type) and (item[1]==id)  
     
620.          item[2] = [item[2] += quantity,99].min  
     
621.          if item[2] == 0  
     
622.            $game_temp.forge.delete(item)  
     
623.          end
     
624.          return  
     
625.        end  
     
626.      end  
     
627.      $game_temp.forge.push([type,id,number])  
     
628.   end  
     
629.   #--------------------------------------------------------------------------
     
630.   # ● 放弃合成
     
631.   #--------------------------------------------------------------------------  
     
632.   def abort
     
633.     # 将合成窗口中的物品转移至物品窗口中
     
634.     for item in $game_temp.forge
     
635.       # 判断物品类型并归还
     
636.       case item[0]
     
637.       when 0
     
638.         $game_party.gain_item(item[1], item[2])
     
639.       when 1
     
640.         $game_party.gain_weapon(item[1], item[2])
     
641.       when 2
     
642.         $game_party.gain_armor(item[1], item[2])
     
643.       end
     
644.     end
     
645.     $game_temp.forge = []
     
646.     # 刷新各窗口
     
647.     @item_window.refresh
     
648.     @forge_window.refresh
     
649.   end
     
650.   #--------------------------------------------------------------------------
     
651.   # ● 检测是否有符合的配方
     
652.   #--------------------------------------------------------------------------
     
653. def match
     
654.    match_one = false
     
655.    match_this = false
     
656.     # 检测每一个配方
     
657.    for i in [email protected]
     
658.      # 将合成窗口中的物品复制到合成缓存区
     
659.      # 注意: 直接使用"="将传引用 导致检测配方是否匹配时合成窗口中物品被删除
     
660.      @forge = $game_temp.forge.dup
     
661.      # 检测这个配方中每一项材料
     
662.      for ingredient in @formulas[i]
     
663.        match_this = true
     
664.        # 合成区中没有此项材料的情况
     
665.        unless @forge.include?(ingredient)
     
666.          match_this = false
     
667.          break
     
668.        end
     
669.        # 从合成区中暂时删除这项材料
     
670.        @forge.delete(ingredient)
     
671.      end
     
672.      if match_this == false
     
673.        next
     
674.      end
     
675.      # 检测合成区中是否还有配方外的材料剩余
     
676.      unless @forge == []
     
677.        match_this = false
     
678.      end
     
679.      # 满足这一个配方的情况
     
680.      if match_this == true
     
681.        match_one = true
     
682.        # 获取配方的成品、成功额外产物、失败额外产物、合成各种概率
     
683.        @products_temp = @products[i]
     
684.        @sproducts_temp = @sproducts[i]
     
685.        @fproducts_temp = @fproducts[i]
     
686.        @other_temp = @other[i]
     
687.        @probability_temp = @probability[i]
     
688.        $g=i
     
689.        break
     
690.      end
     
691.    end
     
692.    return match_one
     
693. end
     
694.   #--------------------------------------------------------------------------
     
695.   # ● 合成
     
696.   #--------------------------------------------------------------------------
     
697. def compose
     
698.    # 如果有符合的配方
     
699.    if match
     
700.      # 将合成窗口中的材料改变为成品
     
701.      $game_temp.forge = []
     
702.      if @probability_temp==100
     
703.        @pro1=0#当成功率为100%时随机概率是0
     
704.      else
     
705.        @pro1=rand(99)#当成功率不为100%时随即概率为0-99
     
706.      end
     
707.      if @pro1<@probability_temp
     
708.        for i in 0...@other_temp.size
     
709.          if @other_temp[i][1]!=0
     
710.            if @other_temp[i][0]==0
     
711.              $game_switches[@other_temp[i][1]]=@other_temp[i][2]#控制开关
     
712.            else
     
713.              $game_variables[@other_temp[i][1]]+=@other_temp[i][2]#控制变量
     
714.            end
     
715.          end
     
716.          $game_map.need_refresh = true#强制刷新地图
     
717.        end
     
718.        for i in 0...@products_temp.size
     
719.          forge_change(@products_temp[i][0], @products_temp[i][1], @products_temp[i][2])
     
720.        end
     
721.        for i in 0...@sproducts_temp.size
     
722.          if @sproducts_temp[i][3]==100
     
723.            @pro2=0#成功额外产率为100%时随即概率为0
     
724.          elsif @sproducts_temp[i][3]<100
     
725.            @pro2=rand(99)#成功额外产率为0-99%时随即概率为0-99%
     
726.          else
     
727.            @pro2=0#成功额外产率为0%时没有成功额外产物
     
728.          end
     
729.          if @pro2<@sproducts_temp[i][3]
     
730.            forge_change(@sproducts_temp[i][0], @sproducts_temp[i][1], @sproducts_temp[i][2])
     
731.          end
     
732.        end  
     
733.      else
     
734.        for i in 0...@fproducts_temp.size
     
735.          if @fproducts_temp[i][3]==100
     
736.            @pro3=0#成功额外产率为100%时随即概率为0
     
737.          elsif @fproducts_temp[i][3]<100
     
738.            @pro3=rand(99)#成功额外产率为0-99%时随即概率为0-99%
     
739.          else
     
740.            @pro3=0#成功额外产率为0%时没有成功额外产物
     
741.          end
     
742.          if @pro3<@fproducts_temp[i][3]
     
743.            forge_change(@fproducts_temp[i][0], @fproducts_temp[i][1], @fproducts_temp[i][2])
     
744.          end
     
745.        end
     
746.      end
     
747.      if $SE_Compose_Successful != ""
     
748.        Audio.se_play($SE_Compose_Successful)
     
749.      end
     
750.    # 合成失败的情况
     
751.    else  
     
752.      if $SE_Compose_Failed != ""
     
753.        Audio.se_play($SE_Compose_Failed)
     
754.      end
     
755.      if $Ingredient_Lost_When_Fail
     
756.        $game_temp.forge = []
     
757.      end
     
758.    end
     
759.     # 刷新各窗口
     
760.    @item_window.refresh
     
761.    @forge_window.refresh
     
762. end
     
763. end

复制代码

试试这个吧，唯一缺陷是没法直接按照某个配方按一个键就合成···要自己放材料

---

作者: ccqtxwd    时间: 2014-7-3 12:43
经过我的多次试验，发现以下情况：
1.目前的合成系统似乎都有问题
2.似乎如果不使用，其他脚本与合成脚本并不冲突（已试验，任务，物品分类，魔法商店不冲突，有范例） Project1.rar (212.18 KB, 下载次数: 55)

2014-7-3 12:42 上传

点击文件名下载附件

3.但如果放到我的游戏里，不知道为什么，就冲突了
4.还是用事件合成好，确实很方便

---

作者: chd114    时间: 2014-7-3 13:37

ccqtxwd 发表于 2014-7-3 12:43
经过我的多次试验，发现以下情况：
1.目前的合成系统似乎都有问题
2.似乎如果不使用，其他脚本与合成脚本并 ...

是你自己的整合系统有问题···

---

作者: 鱼剑浆糊    时间: 2014-7-5 17:32


https://rpg.blue/thread-363553-1-1.html    楼主不妨试试我整合的这个系统

---

作者: wolves    时间: 2014-7-5 18:41


不知道你是要解决系统的问题还是要解决你问的nilclass问题，如果你要解决nilclass那个问题，可以在296行那个if前的一行插入这段脚本：

1.     if $game_party.recipes.class == NilClass
   
2.       $game_party.recipes = []
   
3.     end

复制代码

估计那个$game_party.recipes是数组，这样可以解决一下问题。

---

作者: ccqtxwd    时间: 2014-7-8 23:19

wolves 发表于 2014-7-5 18:41
不知道你是要解决系统的问题还是要解决你问的nilclass问题，如果你要解决nilclass那个问题，可以在296行那 ...

确实解决了无法召唤的问题，但是无法学习，在发现可以胜任的脚本前，我决定一直用事件代替吧

---

欢迎光临 Project1 (https://rpg.blue/)

Powered by Discuz! X3.1