【ACE】如何修改此腳本的參數

奉先 · 发表于 2022-7-27 23:16:08

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

本帖最后由奉先于 2022-7-29 22:02 编辑

此腳本在網上找回來

如何修改參數令前綴(is_maho?) 已知影響此項由 make_prefix function 的 prefix_lv 參數決定

令前綴裝備中的NOTE : 對應我想要的橙等級

RUBY 代码复制

class Array
  def data
    @data.to_s
  end
end
module Options
  #
  #
  #
  #RANK   0   1   2   3   4   5   6   7   8   9   #特性
  f = [[  0,  3, 10, 15, 30, 40, 70, 90,150,190], #白/无
       [ 10, 11, 15, 20, 33, 43, 72, 92,152,192], #绿
       [ 30, 31, 33, 35, 40, 50, 77, 97,156,196], #蓝
       [ 70, 71, 73, 74, 79, 81, 90,110,167,207], #紫
       [150,151,153,154,158,161,169,174,190,230]] #橙
  a = Table.new(10,5)
  10.times{|x| 5.times{|y| a[x,y] = f[y][x] }}
#<=以上内容请不要修改=======================================================>
  S初始评价 = a        
  S使用耐久 = false    
  S每级强化评价 = 1    
  S宝石评价_白 =  1    
  S宝石评价_绿 =  2
  S宝石评价_蓝 =  4
  S宝石评价_紫 =  8
  S宝石评价_橙 = 16
  S品质_白 =   0       
  S品质_绿 =  10
  S品质_蓝 =  30
  S品质_紫 =  70
  S品质_橙 = 150
  S品质掉率_绿 = 0   #315
  S品质掉率_蓝 =  0   #63
  S品质掉率_紫 =   0   #9
  S品质掉率_橙 =  100000   #1
  S嵌孔掉率_1 = 315    
  S嵌孔掉率_2 = 100
  S嵌孔掉率_3 =  63
  S嵌孔掉率_4 =  18
  S嵌孔掉率_5 =   4
#<=以下内容请不要修改=======================================================>
  def self.dataA
    S初始评价
  end
  def self.dataB
    S每级强化评价
  end
  def self.dataC
    [S品质_白, S品质_绿, S品质_蓝, S品质_紫, S品质_橙]
  end
  def self.dataD
    [S品质掉率_橙, S品质掉率_紫, S品质掉率_蓝, S品质掉率_绿]
  end
  def self.dataE
    [S嵌孔掉率_5, S嵌孔掉率_4, S嵌孔掉率_3, S嵌孔掉率_2, S嵌孔掉率_1]
  end
  def self.dataF
    [S宝石评价_白, S宝石评价_绿, S宝石评价_蓝, S宝石评价_紫, S宝石评价_橙]
  end
  def self.cf(a, b)
    self.dataA[a, b]
  end
  def self.lf(e=0)
    self.dataD.each_with_index do |r, i|
      return 4-i if (r * ( r ** -0.05 + 0.4 ) ** e).to_i >= rand(1000)
    end
    return 0
  end
  def self.qf(e=0)
    self.dataE.each_with_index do |r, i|
      return 5-i if (r * ( r ** -0.05 + 0.4 ) ** e).to_i >= rand(1000)
    end
    return 0
  end
end
module RPG
  class BaseItem
    def is_maho?
      note.include?("<前缀>")
    end
    def is_item?
      self.is_a?(RPG::Item) && is_gem?
    end
    def is_gem?
      note.include?("<宝石>")
    end
    def rank
      lv = note[/<品质\s*(.*)>/, 1].to_s
      ["白","绿","蓝","紫","橙", ""].index(lv) % 5 #"白","绿","蓝","紫","橙", "" %5
    end
    def rank_lv
      note[/<RANK\s*(\d*)>/, 1].to_i
    end
    def features
      @features + features_note
    end
    def kind_id
      self.class.to_s + self.id.to_s
    end
    def features_note
      note.scan(/<特性 (.*) (.*)>/).inject([]) do |r, i|
        case i[0]
        when "吸收"
          r.push RPG::BaseItem::Feature.new(22,10,(i[1].to_i)/100.0)
        end
      end 
    end
  end
end
module Vocab
  def self.xparam(id)
    ["命中率","回避率","会心率","会心回避率","魔法回避率","魔法反射率","反击率","HP再生率","MP再生率","TP再生率","生命吸收"][id]
  end
  def self.sparam(id)
    ["受到攻击的几率","防御效果率","恢复效果率","药物知识","MP消费率","TP消耗率","物理伤害率","魔法伤害率","针板伤害率","经验获得率"][id]
  end
  def self.zparam(id)
    ["遇敌机率减半","随机遇敌无效","偷袭无效","先发攻击率提升","获得2倍现金","物品获得机率翻倍"][id]
  end
  def self.elements(id)
    $data_system.elements[id]
  end
  def self.weapon_types(id)
    $data_system.weapon_types[id]
  end
  def self.armor_types(id)
    $data_system.armor_types[id]
  end
end
module DataManager
  def self.create_game_objects
    $game_temp          = Game_Temp.new
    $game_system        = Game_System.new
    $game_timer         = Game_Timer.new
    $game_message       = Game_Message.new
    $game_switches      = Game_Switches.new
    $game_variables     = Game_Variables.new
    $game_self_switches = Game_SelfSwitches.new
    $game_actors        = Game_Actors.new
    $game_party         = Game_Party.new
    $game_troop         = Game_Troop.new
    $game_map           = Game_Map.new
    $game_player        = Game_Player.new
    $game_items         = Game_Items.new
  end
  def self.make_save_contents
    contents = {}
    contents[:system]        = $game_system
    contents[:timer]         = $game_timer
    contents[:message]       = $game_message
    contents[:switches]      = $game_switches
    contents[:variables]     = $game_variables
    contents[:self_switches] = $game_self_switches
    contents[:actors]        = $game_actors
    contents[:party]         = $game_party
    contents[:troop]         = $game_troop
    contents[:map]           = $game_map
    contents[:player]        = $game_player
    contents[:items]         = $game_items
    contents
  end
  def self.extract_save_contents(contents)
    $game_system        = contents[:system]
    $game_timer         = contents[:timer]
    $game_message       = contents[:message]
    $game_switches      = contents[:switches]
    $game_variables     = contents[:variables]
    $game_self_switches = contents[:self_switches]
    $game_actors        = contents[:actors]
    $game_party         = contents[:party]
    $game_troop         = contents[:troop]
    $game_map           = contents[:map]
    $game_player        = contents[:player]
    $game_items         = contents[:items]
  end
end
module BattleManager
  def self.gain_drop_items
    $game_troop.make_drop_items.each do |item|
      $game_party.add_item(item, 1, true)
      $game_message.add(sprintf(Vocab::ObtainItem, item.name))
    end
    wait_for_message
  end
end
class Game_Items < Array
  def idForNewItem(item, rand=false)
    if item.is_a?(RPG::Item) || item.is_gem?
      item = Game_UsableItem.new(item)
    else 
      item = Game_EquipItem.new(item, rand) 
    end
    self.push item
    return self.size - 1
  end
  def items
    self.collect {|item| item.is_item? }
  end
  def gems
    self.collect {|item| item.is_gem? }
  end
  def weapons
    self.collect {|item| item.is_weapon? }
  end
  def armors
    self.collect {|item| item.is_armor? }
  end
end
class Game_BaoItem
  def initialize(id = nil)
    @id = id
  end
  def add_item(id)
    @id = id
  end
  def unadd_item
    @id = nil
  end
  def name
    item ? item.name : "空插槽"
  end
  def rank
    item ? item.rank : 0
  end
  def features
    item.features if item
  end
  def item
    $game_items[@id] if @id
  end
end
class Game_Item
  def initialize(item)
    @item = item
    @id = $game_items.size
  end
  def is_a?(kind); item.is_a?(kind);                    end
  def is_item?;    item.is_a?(RPG::Item) || is_gem?;    end
  def is_gem?;     item.is_gem?;                        end
  def is_weapon?;  item.is_a?(RPG::Weapon) && !is_gem?; end
  def is_armor?;   item.is_a?(RPG::Armor);              end
  def is_equip?;   is_weapon? || is_armor?;             end
  def item
    @item
  end
  def id
    @id
  end
  def id=(id)
    @id = id
  end
  def rank
    item.rank
  end
  def item_id
    item.id
  end
  def kind_id
    item.class.to_s + item.id.to_s
  end
  def note
    item.note
  end
  def price
    item.price
  end
  def icon_index
    item.icon_index
  end
  def description
    item.description
  end
  def features
    item.features
  end
end
class Game_UsableItem < Game_Item
  def initialize(item)
    super(item)
    @number = 0
  end
  def number
    @number
  end
  def number=(n)
    @number = n
  end
  def performance
    Options.dataC[item.rank]
  end
  def name;              item.name;                           end #物品名
  def itype_id;          item.itype_id;                       end #贵重品值
  def scope;             item.scope;                          end #使用范围
  def occasion;          item.occasion;                       end #使用时刻
  def effects;           item.effects;                        end #使用效果
  def damage;            item.damage;                         end #使用伤害
  def repeats;           item.repeats;                        end #连续回数
  def success_rate;      item.success_rate;                   end #成功率
  def tp_gain;           item.tp_gain;                        end #获得TP
  def animation_id;      item.animation_id;                   end #动画编号
  def speed;             item.speed;                          end #速度補正
  def key_item?;         itype_id == 2;                       end #贵重品判定
  def consumable;        item.consumable;                     end #消耗判定
  def for_opponent?;     [1, 2, 3, 4, 5, 6].include?(scope);  end
  def for_friend?;       [7, 8, 9, 10, 11].include?(scope);   end
  def for_dead_friend?;  [9, 10].include?(scope);             end
  def for_user?;         scope == 11;                         end
  def for_one?;          [1, 3, 7, 9, 11].include?(scope);    end
  def for_random?;       [3, 4, 5, 6].include?(scope);        end
  def number_of_targets; for_random? ? scope - 2 : 0;         end
  def for_all?;          [2, 8, 10].include?(scope);          end
  def need_selection?;   [1, 7, 9].include?(scope);           end
  def battle_ok?;        [0, 1].include?(occasion);           end
  def menu_ok?;          [0, 2].include?(occasion);           end
  def certain?;          @hit_type == 0;                      end #技能用?
  def physical?;         @hit_type == 1;                      end #技能用?
  def magical?;          @hit_type == 2;                      end #技能用?
end
class Game_EquipItem < Game_Item
  def initialize(item, rand = true)
    super(item)
    @lv = rand ? make_lv : 0
    @params = make_params(rand)
    @prefix = 0
    @prefix_lv = 0
    @dongshu = []
    make_prefix if rand
    make_dongshu if rand
    make_naijiu(rand)
  end
  def dongshu
    @dongshu
  end
  def wtype_id; item.wtype_id; end #武器类型
  def atype_id; item.atype_id; end #防具类型
  def etype_id; item.etype_id; end #装备部位
  def animation_id; item.animation_id; end
  def lv;         @lv;     end
  def naijiu;     @naijiu;     end
  def naijiu_max; @naijiu_max; end
  def lv_up
    @lv += 1
  end
  def make_naijiu(rand)
    @naijiu_max = 100
    @naijiu = rand ? rand(51)+50 : @naijiu_max
  end
  def make_dongshu
    n = Options.qf(0)
    n.times{add_ds}
  end
  def add_ds
    @dongshu.push Game_BaoItem.new
  end
  def make_lv
    u = 0
    max_lv = 5 + 0   #提高0 可提高强化等级
    max_le = 200 + 0 #提高0 可提高强化概率
    max_lv.times{
      return u if rand(max_le) < 100
      u += 1
    }
    u
  end
  def make_params(rand)
    return item.params unless rand
    item.params.collect do |param|
      num = ([(param).abs, 1].max**-0.5*param).truncate 
      ts = param - num + rand(num*2+1)
      ts == 0 ? param : ts
    end
  end
  def make_prefix
    @prefix_lv = Options.lf(0) 
    return if @prefix_lv == 0
    items = pzqz(@prefix_lv)
    @prefix = items[rand(items.size)].id 
  end
  def features
    base_features + ds_features
  end
  def base_features
    item.features + prefix_item_features
  end
  def ds_features
    result = [] 
    @dongshu.each {|item|
      if item.item
        features = item.features
        if is_armor?
          data = $data_armors.compact.find {|i| i.name == item.name }
          features = data.features if data
        end
        result += features
      end
    }
    result
  end
  def prefix_item_features
    @prefix > 0 ? prefix_item.features : []
  end
  def prefix_item
    equip = $data_weapons[@prefix]
    if is_armor?
      data = $data_armors.compact.find {|i| i.name == equip.name }
      equip = data if data
    end
    equip
  end
  def allqz
    $data_weapons.select {|item| item ? item.is_maho? : false}
  end
  def pzqz(n)
    n = 5 #TEST
    allqz.select{|item| item.rank == n}
  end
  def ds
    prefix_item.description if @prefix > 0
  end
  def name
    tn = ""
    tn = tn + prefix_item.name + "的" if @prefix > 0
    tn += item.name
    tn += (@lv == 0 ? "" :  sprintf("%+d", @lv))
    tn
  end
  def price
    all_lv_price = (@lv * @lv + @lv)*(50+base_performance*2)/2
    super + all_lv_price + 2 ** @prefix_lv * 1000
  end
  def params
    r = 0.0
    @params.each_with_index do |e, i|
      if e > 0
        case i
        when 0
          r += 0.8
        when 1
          r += 0.9
        else
          r += 1
        end
      end
    end
    #g = @params.inject(0) {|r, i| i > 0 ? r + 1 : r }
    r = (r == 0 ? 0 : r ** -0.6 / 2.0)
    8.times.collect do |i|
      pa = @params[i]
      case i
      when 0
       (pa + @lv * pa * [pa.abs, 1].max ** -0.5 * r * (pa < 0 ? 0.2 : 2)).round
      when 1
       (pa + @lv * pa * [pa.abs, 1].max ** -0.5 * r * (pa < 0 ? 0.12 : 1.2)).round
      else
       (pa + @lv * pa * [pa.abs, 1].max ** -0.5 * r * (pa < 0 ? 0.1 : 1)).round
      end
    end
    #@params.collect do |param|
    #end
  end
  def rank
    case performance
    when   0...10  ; 0
    when  10...30  ; 1
    when  30...70  ; 2
    when  70...150 ; 3
    when 150...310 ; 4
    when 310...999 ; 5
    end
  end
  def dakongg
    2 ** dongshu.size * (100+base_performance*10)
  end
  def lv_price
    (@lv + 1) * (100+base_performance)
  end
  def base_performance
    Options.cf(item.rank_lv, @prefix_lv)
  end
  def ds_performance
    @dongshu.inject(0) {|r, i| r + Options.dataF[i.rank] }
  end
  def performance
    @lv + base_performance + ds_performance
  end
end
class Game_Party < Game_Unit
  def initialize
    super
    @gold = 0
    @steps = 0
    @last_item = Game_BaseItem.new
    @menu_actor_id = 0
    @target_actor_id = 0
    @actors = []
    @items = []
  end
  def consume_item(item)
    lose_item(item.id, 1) if item.is_a?(RPG::Item) && item.consumable
  end
  def item_number(item)
    return unless item
    n = 0
    all_items.each do |i|
      if i.kind_id == item.kind_id
        n += i.is_item? ? i.number : 1
      end
    end
    n
  end
  def setup_battle_test_items
    $data_items.each do |item|
      add_item(item, max_item_number(item)) if item && !item.name.empty?
    end
  end
  def has_item?(item, include_equip = false)
    return true if item_number(item) > 0
   #return include_equip ? members_equip_include?(item) : false
  end
  def members_equip_include?(item)
msgbox "判定队伍成员是否装备着指定物品"
    members.any? {|actor| actor.equips.any?{|it|it.item_id == item.item_id }}
  end
  def add_item(item, amount, rand = true)
    return unless item
    return if amount == 0
    return unadd_item(item, amount) if amount < 0
    if item.class == RPG::Item
      gain_item($game_items.idForNewItem(item), amount)
    else
      amount.times{ gain_item($game_items.idForNewItem(item, rand)) }
    end
    $game_map.need_refresh = true
  end
  def unadd_item(item, amount)
    amount.abs.times do
      all_items.each do |i|
        if i.kind_id == item.kind_id
          lose_item(i.id, 1)
          break
        end
      end
    end
    $game_map.need_refresh = true
  end
  def add_shopitem(item, number)
    if item.is_item?
      $game_items.push item
      gain_item($game_items.size-1, number)
    else
      id = item.item_id
      item = item.is_weapon? ? $data_weapons[id] : $data_armors[id]
      add_item(item, number, false)
    end
  end
  def gain_item(id, n=1)
    return unless id
    if $game_items[id].is_item?
      items.each do |item|
        if $game_items[id].kind_id == item.kind_id
          maxn = [item.number + n, 99].min - item.number
          n -= maxn
          item.number += maxn
        end
      end
      if n > 0
        $game_items[id].number = n
        @items.push(id)
      end
    else
      @items.push(id)
    end
    all_items_sort
  end
  def lose_item(id, n=1)
    return unless id
    if $game_items[id].is_item?
      items.reverse_each do |item|
        if $game_items[id].kind_id == item.kind_id
          maxn = [item.number, n].min
          item.number -= maxn
          n -= maxn
          @items.delete(item.id) if item.number == 0
        end
      end
    else
      @items.delete(id)
    end
  end
  def all_items_sort
    @items.sort!{|a, b|$game_items[a].item_id - $game_items[b].item_id}
  end
  def items
    @items.collect {|id| $game_items[id] }.select {|item| item.is_item? }
  end
  def gems
    @items.collect {|id| $game_items[id] }.select {|item| item.is_gem? }
  end
  def weapons
    @items.collect {|id| $game_items[id] }.select {|item| item.is_weapon? }
  end
  def armors
    @items.collect {|id| $game_items[id] }.select {|item| item.is_armor? }
  end
end
class Game_Battler < Game_BattlerBase
  def make_damage_value(user, item)
    value = item.damage.eval(user, self, $game_variables)
    value *= item_element_rate(user, item)
    value *= pdr if item.physical?
    value *= mdr if item.magical?
    value *= rec if item.damage.recover?
    value = apply_critical(value) if @result.critical
    value = apply_variance(value, item.damage.variance)
    value = apply_guard(value)
    @result.make_damage(value.to_i, user, item)
  end
end
class Game_Actor < Game_Battler
  def init_equips(equips)
    @equips = Array.new(equip_slots.size)
    equips.each_with_index do |item_id, i|
      next if item_id == 0
      etype_id = equip_slots[i]
      item = etype_id == 0 ? $data_weapons[item_id] : $data_armors[item_id]
      @equips[i] = $game_items.idForNewItem(item, false)
    end
    refresh
  end
  def param_rate(param_id)
    features_sum_pi(FEATURE_PARAM, param_id)
  end
  def sparam(sparam_id)
    features_sum_pi(FEATURE_SPARAM, sparam_id)
  end
  def features_sum_pi(code, id)
    r_features_pi(code, id) * r_features_sum(code, id)
  end
  def r_features_pi(code, id)
    rsum_features_with_id(code, id).inject(1.0) {|r, ft| r += (ft.value-1) }
  end
  def r_features_sum(code, id)
    rpi_features_with_id(code, id).inject(1.0) {|r, ft| r *= ft.value }
  end
  def rsum_features_with_id(code, id)
    rsum_all_features.select {|ft| ft.code == code && ft.data_id == id }
  end
  def rpi_features_with_id(code, id)
    rpi_all_features.select {|ft| ft.code == code && ft.data_id == id }
  end
  def rsum_all_features
    rsum_feature_objects.inject([]) {|r, obj| r + obj.features }
  end
  def rpi_all_features
    rpi_feature_objects.inject([]) {|r, obj| r + obj.features }
  end
  def rsum_feature_objects
    [actor] + [self.class] + equips.compact
  end
  def rpi_feature_objects
    states
  end
  def equip_slots
    return [0,0,2,3,4,4] if dual_wield?
    return [0,1,2,3,4,4]
  end
  def weapons
    @equips.select {|i| i ? $game_items[i].is_weapon? : false }.collect {|i| $game_items[i] }
  end
  def armors
    @equips.select {|i| i ? $game_items[i].is_armor? : false }.collect {|i| $game_items[i] }
  end
  def equips
    @equips.collect {|i| i ? $game_items[i] : nil }
  end
  def equip_change_ok?(slot_id)
    return true
    return false if equip_type_fixed?(equip_slots[slot_id])
    return false if equip_type_sealed?(equip_slots[slot_id])
    return true
  end
  def release_unequippable_items(item_gain = true)
    equips.each_with_index do |item, i|
      next if item
      if !equippable?(item) || item.etype_id != equip_slots[i]
        trade_item_with_party(nil, @equips[i]) if item_gain
      end
    end
  end
  def clear_equipments
    equip_slots.size.times do |i|
      change_equip(i, nil) if equip_change_ok?(i)
    end
  end
  def change_equip(slot_id, item)
    return unless trade_item_with_party(item, equips[slot_id])
    return if item && equip_slots[slot_id] != item.etype_id
    @equips[slot_id] = item ? item.id : nil
    refresh
  end
  def force_change_equip(slot_id, item)
    @equips[slot_id] = item ? item.id : nil
    release_unequippable_items(false)
    refresh
  end
  def trade_item_with_party(new_item, old_item)
    return false if new_item && !$game_party.has_item?(new_item)
    $game_party.gain_item(old_item ? old_item.id : nil)
    $game_party.lose_item(new_item ? new_item.id : nil)
    return true
  end
  def change_equip_by_id(slot_id, item_id)
msgbox "变更装备（用 ID 指定）"
    if equip_slots[slot_id] == 0
      change_equip(slot_id, item_id)
    else
      change_equip(slot_id, item_id)
    end
  end
end
class Game_Action
  def clear
    @item = nil
    @target_index = -1
    @value = 0
  end
  def set_skill(skill_id)
    @item = $data_skills[skill_id]
    self
  end
  def set_item(item)
    @item = item
    self
  end
  def item
    @item
  end
end
class Game_ActionResult
  def make_damage(value, user, item)
    @critical = false if value == 0
    @hp_damage = value if item.damage.to_hp?
    @mp_damage = value if item.damage.to_mp?
    @mp_damage = [@battler.mp, @mp_damage].min
    @hp_drain = make_drain_hp(user, item)
    @mp_drain = @mp_damage if item.damage.drain?
    @hp_drain = [@battler.hp, @hp_drain].min
    @success = true if item.damage.to_hp? || @mp_damage != 0
  end
  def make_drain_hp(user, item)
    hp_damage = (@hp_damage * @battler.element_rate(2)).to_i
    return hp_damage if item.damage.drain?
    return (hp_damage * [user.xparam(10), 1].min).to_i if user.xparam(10) > 0
    return 0
  end
  alias celica_hp_damage_text hp_damage_text
  def hp_damage_text
    celica_hp_damage_text
    if @hp_damage > 0
      fmt = @battler.actor? ? Vocab::ActorDamage : Vocab::EnemyDamage
      sprintf(fmt, @battler.name, @hp_damage)
    elsif @hp_damage < 0
      fmt = @battler.actor? ? Vocab::ActorRecovery : Vocab::EnemyRecovery
      sprintf(fmt, @battler.name, Vocab::hp, -hp_damage)
    else
      fmt = @battler.actor? ? Vocab::ActorNoDamage : Vocab::EnemyNoDamage
      sprintf(fmt, @battler.name)
    end
  end
  def hp_drain_text
    fmt = @battler.actor? ? Vocab::ActorDrain : Vocab::EnemyDrain
    sprintf("吸收了%s点%s", @hp_drain, Vocab::hp)
  end
end
class Game_Interpreter
  def command_126
    value = operate_value(@params[1], @params[2], @params[3])
    $game_party.add_item($data_items[@params[0]], value)
  end
  def command_127
    value = operate_value(@params[1], @params[2], @params[3])
    $game_party.add_item($data_weapons[@params[0]], value, true)
  end
  def command_128
    value = operate_value(@params[1], @params[2], @params[3])
    $game_party.add_item($data_armors[@params[0]], value, true)
  end
  def 开启强化画面
    SceneManager.call(Scene_MakeEquip)
  end
end
class Window_Base < Window
  def draw_item_name(item, x, y, enabled = true, width = 300)
    return unless item
    draw_icon(item.icon_index, x, y, enabled)
    change_color(performance_color(item), enabled)
    draw_text(x + 24, y, width, line_height, item.name)
  end
  def performance_color(item)
    return text_color(0) if item.is_a?(RPG::Skill)
    pf = item.performance
    if pf < 10
      performance_rank(0)
    elsif pf < 30
      performance_rank(1)
    elsif pf < 70
      performance_rank(2)
    elsif pf < 150
      performance_rank(3)
    elsif pf < 310
      performance_rank(4)
    else
      performance_rank(5)
    end
  end
  def performance_rank(n)
               #白 绿 蓝 紫 橙 粉
    text_color([ 0,28, 9,30,20,27][n])
  end
end
class Window_Selectable < Window_Base
  def active=(active)
    super
    update_cursor
    call_update_help
    call_update_equiphelp
  end
  def index=(index)
    @index = index
    update_cursor
    call_update_help
    call_update_equiphelp
  end
  def call_update_equiphelp
    update_equiphelp if active && @equiphelp_window
  end
  def update_equiphelp
    @equiphelp_window.clear
  end
  def drx
    x + index % col_max * (item_width + spacing) + item_width / 4
  end
  def dry
    y + index / col_max * item_height + item_height - oy
  end
  def equiphelp_window=(equiphelp_window)
    @equiphelp_window = equiphelp_window
    call_update_equiphelp
  end
end
class Window_EquipHelp < Window_Base
  def initialize
    super(0,0,200,600)
    self.opacity = 0
  end
  def standard_padding
    return 0
  end
  def item
    @item
  end
  def set_item(window, item)
    @item = item
    @window = window
    refresh
  end
  def clear
    contents.clear
  end
  def refresh
    clear
    return unless item
    @dy = 0
    draw_start               #描画上外框
    draw_name                #描画物品名
    if item.is_equip?
      draw_equip_kind        #描画装备类型
      draw_equip_attack_type #描画武器攻击类型
      draw_equip_params      #描画装备能力值
      draw_equip_features    #描画装备特性
      draw_equip_dongshu     #描画装备插槽
      draw_description       #描画说明
    elsif item.is_gem?
      draw_gem_type          #描画宝石类型
      draw_gem_features      #描画宝石特性
    else
      draw_item_type         #描画物品类型
      draw_item_effects      #描画物品使用效果
    end
    draw_price               #描画售格
    draw_end                 #描画下外框
    move_coordinate          #移动坐标
  end
  def draw_start
    pf_color = performance_color(item)
    contents.fill_rect(2,0,200-4,600,pf_color)
    contents.fill_rect(0,2,200,600-4,pf_color)
    contents.fill_rect(2+2,2,200-4-4,600-4,Color.new(0,0,64,160))
    contents.fill_rect(2,2+2,200-4,600-4-4,Color.new(0,0,64,160))
  end
  def draw_name
    contents.font.size = 16
    contents.font.name = "宋体"
    contents.font.bold = true
    contents.font.color = performance_color(item)
    contents.draw_text(6,6+@dy*16,200+8,16,item.name,0)
    contents.font.size = 15
    contents.font.name = "黑体"
    contents.font.bold = false
    contents.font.color = text_color(0)
    @dy += 1
  end
  def draw_description
    if item.ds
      if item.ds != ""
        contents.font.color = text_color(21)
        contents.draw_text(6, 6+@dy*16, 200, 16, item.ds)
        contents.font.color = text_color(0)
        @dy += 1
      end
    end
  end
  def draw_price
    str = item.price == 0 ? "无法出售" : "售价:#{item.price / 2}"
    contents.draw_text(6, 6+@dy*16, 200, 16, str)
    @dy += 1
  end
  def draw_gem_type
    contents.draw_text(6, 6+@dy*16, 200, 16, "宝石", 0)
    @dy += 1
  end
  def draw_gem_features
    item2 = $data_armors.compact.find {|t| t.name == item.name }
    contents.font.color = text_color(25)
    if item2
      contents.draw_text(6, 6+@dy*16, 200, 16, "镶嵌武器")
    else
      contents.draw_text(6, 6+@dy*16, 200, 16, "镶嵌通用")
    end
    @dy += 1
    item.features.each do |ft|
      str = feature_text(ft)
      next unless str
      contents.font.color = text_color(24)
      contents.draw_text(6, 6+@dy*16, 200, 16, str)
      @dy += 1
    end
    if item2
      contents.font.color = text_color(25)
      contents.draw_text(6, 6+@dy*16, 200, 16, "镶嵌防具")
      @dy += 1
      item2.features.each do |ft|
        str = feature_text(ft)
        next unless str
        contents.font.color = text_color(24)
        contents.draw_text(6, 6+@dy*16, 200, 16, str)
        @dy += 1
      end
    end
    contents.font.color = text_color(0)
  end
  def draw_item_type
    str = item.consumable ? "消耗品" : "非消耗品"
    contents.draw_text(6, 6+@dy*16, 200, 16, str, 0)
    @dy += 1
  end
  def draw_item_effects
    contents.font.color = text_color(24)
    item.effects.each do |ft|
      str = "特性显示未定义"
      case ft.code
      when 11 
        str = "回复#{ft.value2.to_i}点#{Vocab::hp}" if ft.value2 != 0
        str = "回复#{(ft.value1*100).to_i.to_s}%#{Vocab::hp}" if ft.value1 != 0
      when 12 
        str = "回复#{ft.value2.to_i}点#{Vocab::mp}" if ft.value2 != 0
        str = "回复#{(ft.value1*100).to_i.to_s}%#{Vocab::mp}" if ft.value1 != 0
      when 13 
        str = "回复#{ft.value2.to_i}点#{Vocab::tp}" if ft.value2 != 0
        str = "回复#{(ft.value1*100).to_i.to_s}%#{Vocab::tp}" if ft.value1 != 0
      when 21 
        str = "附加 #{$data_states[ft.data_id].name}"
      when 22 
        str = "解除 #{$data_states[ft.data_id].name}"
      when 31 
      when 32 
      when 33 
      when 34 
      when 41 
      when 42 
        str = "#{Vocab::param(ft.data_id)}永久增加#{ft.value1.to_i}点"
      when 43 
        str = "永久习得 #{$data_skills[ft.data_id].name}"
      when 44 
        next
      end
      contents.draw_text(6, 6+@dy*16, 200, 16, str)
      @dy += 1
    end
    contents.font.color = text_color(0)
  end
  def draw_equip_kind
    if item.is_a?(RPG::Armor)
      strA = Vocab::etype(item.etype_id)
      strB = Vocab::armor_types(item.atype_id)
    else
      bo = (item.features.select{|ft| ft.code == 54 }).any?{|ft| ft.data_id == 1}
      strA = bo ? "双手" : "单手"
      strB = Vocab::weapon_types(item.wtype_id)
    end
    contents.draw_text(6, 6+@dy*16, 200, 16, strA, 0)
    contents.draw_text(6, 6+@dy*16, 200-12, 16, strB, 2)
    @dy += 1
  end
  def draw_equip_attack_type
    str = ""
    (item.features.select{|ft| ft.code == 31 }).each do |ft|
      ts = Vocab::elements(ft.data_id)
      str += (ts + " ") unless str.include?(ts)
    end
    if str != ""
      contents.font.color = text_color(24)
      contents.draw_text(6, 6+@dy*16, 200, 16, str)
      contents.font.color = text_color(0)
      @dy += 1
    end
  end
  def draw_equip_params
    item.params.each_with_index do |param, index|
      if param != 0
        str = sprintf("%+d #{Vocab::param(index)}",param)
        contents.draw_text(6, 6+@dy*16, 200, 16, str)
        @dy += 1
      end
    end
  end
  def draw_equip_features
    contents.font.color = text_color(24)
    item.base_features.each do |ft|
      next if ft.code == 31
      str = feature_text(ft)
      next unless str
      contents.draw_text(6, 6+@dy*16, 200, 16, str)
      @dy += 1
    end
    contents.font.color = text_color(0)
  end
  def draw_equip_dongshu
    item.dongshu.each do |i|
      rect1 = Rect.new(6+1, 6+@dy*16+1, 14, 14)
      rect2 = Rect.new(120, 96, 8, 8)
      contents.stretch_blt(rect1, windowskin, rect2, 128)
      if i.item
        color = performance_color(i.item)
        contents.font.color = color
        bitmap = Cache.system("Iconset")
        rect2 = Rect.new(i.item.icon_index % 16 * 24, i.item.icon_index / 16 * 24, 24, 24)
        contents.stretch_blt(rect1, bitmap, rect2)
      else
        contents.font.color = text_color(0)
        contents.font.color.alpha = 160
      end
      contents.draw_text(6+16, 6+@dy*16, 200, 16, i.name)
      @dy += 1
      if i.item
        if item.is_armor?
          data = $data_armors.compact.find {|t| t.name == i.name }
          i = data if data
        end
        contents.font.color = text_color(24)
        i.features.each do |ft|
          next if ft.code == 31
          str = feature_text(ft)
         #next unless str
          contents.draw_text(6+16, 6+@dy*16, 200, 16, str)
          @dy += 1
        end
      end
    end
    contents.font.color = text_color(0)
  end
  def draw_end
    pf_color = performance_color(item)
    contents.clear_rect(0,10+@dy*16,200,600)
    contents.fill_rect(0,8+@dy*16,200,2,pf_color)
    contents.fill_rect(4,8+@dy*16,200-8,2,Color.new(0,0,64,160))
    contents.fill_rect(2,10+@dy*16,200-4,2,pf_color)
  end
  def move_coordinate
    self.x = @window.drx
    self.y = @window.dry 
    endy = self.y + 12+@dy*16 - @window.y
    self.y -= [endy - @window.height + 6, 0].max
    self.y = [self.y, 0].max
  end
  def feature_text(ft)
    str = "特性显示未定义"
    case ft.code
    when 11 
      str = (ft.value*100).to_i.to_s + "%" + Vocab::elements(ft.data_id) + "有效度"
    when 12 
      str = (ft.value*100).to_i.to_s + "%" + Vocab::param(ft.data_id) + "弱化有效度"
    when 13 
      str = (ft.value*100).to_i.to_s + "%" + $data_states[ft.data_id].name + "有效度"
    when 14 
      str = $data_states[ft.data_id].name + "状态无效化"
    when 21 
     #str = (ft.value*100).to_i.to_s + "% " + Vocab::param(ft.data_id)
      str = sprintf("%+d%%#{Vocab::param(ft.data_id)}", (ft.value*100-100).to_i)
    when 22 
      return if ft.value == 0
      str = sprintf("%+d%%#{Vocab::xparam(ft.data_id)}", (ft.value*100).to_i)
    when 23 
     #str = (ft.value*100).to_i.to_s + "% " + Vocab::sparam(ft.data_id)
      str = sprintf("%+d%%#{Vocab::xparam(ft.data_id)}", (ft.value*100-100).to_i)
    when 31 
      str = "攻击属性附加 " + Vocab::elements(ft.data_id)
    when 32 
      str = "+" + (ft.value*100).to_i.to_s + "%附加" + $data_states[ft.data_id].name + "状态"
    when 33 
      str = sprintf("%+d 攻击速度", ft.value.to_i)
    when 34 
      str = sprintf("%+d 攻击回数", ft.value.to_i)
    when 41 
    when 42 
    when 43 
      str = "习得#{$data_skills[ft.data_id].name}"
    when 44 
      str = "禁用#{$data_skills[ft.data_id].name}"
    when 51 
    when 52 
    when 53 
    when 54 
    when 55 
    when 61 
      str = sprintf("%+d 行动回数", ft.value.to_i)
    when 62 
    when 63 
    when 64 
      str = Vocab.zparam(ft.data_id)
    end
  end
end
class Window_ItemList < Window_Selectable
  def include?(item)
    return unless item
    case @category
    when :item
      item.is_gem? || (item.is_item? && !item.key_item?)
    when :weapon
      item.is_weapon?
    when :armor
      item.is_armor?
    when :key_item
      !item.is_gem? && item.is_item? && item.key_item?
    else
      false
    end
  end
  def draw_item(index)
    item = @data[index]
    if item
      rect = item_rect(index)
      rect.width -= 4
      draw_item_name(item, rect.x, rect.y)#, enable?(item))
      draw_item_number(rect, item)
    end
  end
  def draw_item_number(rect, item)
   #draw_text(rect, sprintf(":%2d", item.number), 2) if item.is_allitem?
    draw_text(rect, sprintf(":%2d", item.number), 2) if item.is_item?
  end
  def update_equiphelp
    @equiphelp_window.set_item(self, item)
  end
end
class Window_EquipStatus < Window_Base
  def visible_line_number
    return 8
  end
end
class Window_EquipSlot < Window_Selectable
  def visible_line_number
    6
  end
  def drx
    super + 92
  end
  def update_equiphelp
    @equiphelp_window.set_item(self, item)
  end
end
class Window_EquipItem < Window_ItemList
  def include?(item)
    return true if item == nil
    return false unless item.is_equip?
    return false if @slot_id < 0
    return false if item.etype_id != @actor.equip_slots[@slot_id]
    return @actor.equippable?(item)
  end
end
class Window_ShopBuy < Window_Selectable
  def window_width
    return 400
  end
  def make_item_list
    @data = []
    @price = {}
    @shop_goods.each do |goods|
      case goods[0]
      when 0;  item = $data_items[goods[1]]
      when 1;  item = $data_weapons[goods[1]]
      when 2;  item = $data_armors[goods[1]]
      end
      if item
        if item.is_a?(RPG::Item) || item.is_gem?
          item = Game_UsableItem.new(item)
        else
          item = Game_EquipItem.new(item, false)
        end
        @data.push(item)
        @price[item] = goods[2] == 0 ? item.price : goods[3]
      end
    end
  end
  def enable?(item)
    item && price(item) <= @money
  end
  def update_equiphelp
    @equiphelp_window.set_item(self, item)
  end
end
class Window_ShopNumber < Window_Selectable
  def window_width
    return 400
  end
  def dry
    y + item_y + line_height
  end
  def update_equiphelp
    @equiphelp_window.set_item(self, @item)
  end
  def figures
    return 3
  end
end
class Window_ShopStatus < Window_Base
  def refresh
    contents.clear
    draw_possession(4, 0)
    return unless @item
    draw_equip_info(4, line_height * 2) if @item.is_equip?
  end
end
class Window_BattleLog < Window_Selectable
  def display_hp_damage(target, item)
    return if target.result.hp_damage == 0 && item && !item.damage.to_hp?
    if target.result.hp_damage > 0
      target.perform_damage_effect
    end
    Sound.play_recovery if target.result.hp_damage < 0
    add_text(target.result.hp_damage_text)
    wait
    if target.result.hp_drain > 0
      add_text(target.result.hp_drain_text)
      wait
    end
  end
end
class Window_MakeCommand < Window_HorzCommand
  def initialize(window_width)
    @window_width = window_width
    super(0, 0)
  end
  def window_width
    @window_width
  end
  def col_max
    return 4
  end
  def make_command_list
    add_command("强化装备", :a)
    add_command("镶嵌装备", :b)
    add_command("合成装备", :c, false)
    add_command("离开",     :cancel)
  end
  def current_item_enabled?
    index == 2 ? false : true
  end
end
class Window_MakeA_ItemLise < Window_ItemList
  def initialize(x, y, width, height)
    super(x, y, width, height)
  end
  def col_max
    return 1
  end
  def current_item_enabled?
    return false unless item
    item.lv_price <= $game_party.gold
  end
  def make_item_list
    @data = $game_party.equip_items
  end
  def status_window=(status_window)
    @status_window = status_window
    call_update_help
  end
  def update_help
    super
    @help_window.set_item(item) if @help_window
    @status_window.item = item if @status_window
  end
  def update_equiphelp
    @equiphelp_window.set_item(self, item)
  end
end
class Window_MakeA_Ok < Window_Command
  def initialize
    super(Graphics.width/2-60, Graphics.height/2)
    self.hide.deactivate
  end
  def window_width
    120
  end
  def col_max
    return 1
  end
  def alignment
    return 1
  end
  def make_command_list
    add_command("强化", :ok)
    add_command("取消", :cancel)
  end
end
class Window_MakeA_Status < Window_Base
  def initialize(x, y, width, height)
    super(x, y, width, height)
    @item = nil
    @page_index = 0
    refresh
  end
  def refresh
    contents.clear
    return unless @item
    draw_A(4, 0)
    draw_B(4, 0)
    draw_C(4, 0)
  end
  def item=(item)
    @item = item
    refresh
  end
  def draw_A(x, y)
    change_color(system_color)
    draw_text(x, line_height*(y+0), 300, 24, "强化费用")
    change_color(normal_color)
    draw_text(x, line_height*(y+1), 300, 24, @item.lv_price, 2)
  end
  def draw_B(x, y)
    change_color(system_color)
    draw_text(x, line_height*(y+2), 300, 24, "强化材料")
  end
  def draw_C(x, y)
    change_color(system_color)
    draw_text(x, line_height*(y+6), 300, 24, "属性变化")
  end
end
class Window_MakeB_ItemLise < Window_ItemList
  def initialize(x, y, width, height)
    super(x, y, width, height)
  end
  def col_max
    return 1
  end
  def current_item_enabled?
    true
  end
  def make_item_list(syt)
    if syt == "A"
      @data = $game_party.equip_items
    else
      @data = $game_party.gems
    end
    @data.push(nil)
  end
  def status_window=(status_window)
    @status_window = status_window
    call_update_help
  end
  def update_help
    super
    @help_window.set_item(item) if @help_window
    @status_window.item = item if @status_window
  end
  def refresh(syt)
    make_item_list(syt)
    create_contents
    draw_all_items
    select(0)
  end
  def clear
    @data = []
    select(-1)
    create_contents
    draw_all_items
  end
  def update_equiphelp
    @equiphelp_window.set_item(self, item)
  end
end
class Window_MakeB_Ok < Window_Selectable
  def initialize(x, y, width, height)
    super(x, y, width, height)
    self.hide.deactivate
    @item = nil
  end
  def window_width
  end
  def item_max
    item ? 1 + [item.dongshu.size+1, 5].min : 1
  end
  def refresh
    contents.clear
    change_color(system_color)
    y = 0
    draw_text(4, y, 92, line_height, "装备")
    if item
      draw_item_name(item, 64, 0)
      item.dongshu.each{|d|
        y += 1
        change_color(system_color)
        draw_text(4, y*line_height, 92, line_height, "插槽")
        change_color(normal_color)
        draw_item_name(d.item, 64, y*line_height)
       #dest_rect = Rect.new(64, (1+i)*line_height+4, 240, 16)
       #src_bitmap = self.windowskin
       #src_rect = Rect.new(120,96+8,8,8)
       #contents.stretch_blt(dest_rect, src_bitmap, src_rect, 128)
       #change_color(normal_color)
       #draw_text(64, (1+i)*line_height, 240, line_height, "不可更改",1)
       #draw_text(64, (1+i)*line_height, 92, line_height, d.name)
      }
      if item.dongshu.size < 5
        y += 1
        change_color(system_color)
        draw_text(4, y*line_height, 92, line_height, "打孔")
        change_color(normal_color)
        draw_text(64+24, y*line_height, 240, line_height, "花费: #{item.dakongg}")
      end
      y += 2
      gold = 50 + item.base_performance * 5
      change_color(normal_color)
      draw_text(0, y*line_height, 240, line_height, "镶嵌宝石花费: #{gold}")
      y += 1
      draw_text(0, y*line_height, 240, line_height, "取出宝石花费: #{gold*2}")
    else
      change_color(normal_color, false)
      draw_text(64, 0,142, line_height, "请选择一件装备")
    end
  end
  def item
    @item
  end
  def item=(item)
    @item = item
    refresh 
  end
  def kind
    index == 0 ? 0 : index == item_max-1 && item.dongshu.size != 5 ? 2 : 1
  end
  def eq_gem(ritem)
    if eitem && ritem
      return if eitem.kind_id == ritem.kind_id
    end
    gold = 50 + item.base_performance * 5
    if ritem
      if eitem
        $game_party.gain_item(eitem.id)                       
        $game_party.lose_gold(gold * 2)                       
      end
      item.dongshu[index-1].add_item(ritem.id)                
      $game_party.lose_gold(50 + item.base_performance * 5)   
      $game_party.lose_item(ritem.id)                         
    else
      if eitem
        $game_party.lose_gold(gold * 2)                       
        $game_party.gain_item(eitem.id)                       
        item.dongshu[index-1].unadd_item                      
      end
    end
    refresh
  end
  def add_ds
    $game_party.lose_gold(item.dakongg)
    item.add_ds
    refresh
  end
  def current_item_enabled?
    case kind
    when 0
      true
    when 1
      50 + item.base_performance * 5 <= $game_party.gold
    when 2
      item.dakongg <= $game_party.gold
    end
  end
  def eitem
    case kind
    when 0
      item
    when 1
      item.dongshu[index-1].item if item
    end
  end
  def update_equiphelp
    @equiphelp_window.set_item(self, eitem)
  end
end
class Window_MakeB_Status < Window_Base
  def initialize(x, y, width, height)
    super(x, y, width, height)
    @item = nil
    @page_index = 0
    refresh
  end
  def refresh
    contents.clear
    return unless @item
   #draw_A(4, 0)
  end
  def item=(item)
    @item = item
  #refresh
  end
  def draw_A(x, y)
    @item.dongshu.each_with_index{|item,index|
      contents.fill_rect(x+1,line_height * (y+5+index)+1,22,22, Color.new(128,128,128))
    }
  end
end
=begin
 合成解释
   1.种类保留
     ├不同部位的合成 => 合成失败,获得材料
     └同部位的合成 => 保留高等级的一件,特性按以下方式计算
       └有配方的情况按配方,特性按以下方式计算
   2.特性保留  
     ├强化等级 => 高强化等级 + 低强化等级的高强化等级的一半每1
     │     max = [a.lv, b.lv].max
     │     min = [a.lv, b.lv].min
     │      lv = max + (min/(max/2)).ceil
     │
     ├前缀   => 相加, 超2个的情况随机保留最大等级2个
     └嵌孔数 => 保留嵌孔少的一个
       └宝石 => 随机保留最大等级
=end
class Scene_MenuBase < Scene_Base
  def create_help_window
    @help_window = Window_Help.new
    @help_window.viewport = @viewport
  end
  def create_equiphelp_window
    @equiphelp_window = Window_EquipHelp.new
    @equiphelp_window.viewport = @viewport
    @equiphelp_window.z += 1000
  end
end
class Scene_Item < Scene_ItemBase
  def start
    super
    create_help_window
    create_equiphelp_window
    create_category_window
    create_item_window
  end
  def create_category_window
    @category_window = Window_ItemCategory.new
    @category_window.viewport = @viewport
    @category_window.help_window = @help_window
    @category_window.equiphelp_window = @equiphelp_window
    @category_window.y = @help_window.height
    @category_window.set_handler(:ok,     method(:on_category_ok))
    @category_window.set_handler(:cancel, method(:return_scene))
  end
  def create_item_window
    wy = @category_window.y + @category_window.height
    wh = Graphics.height - wy
    @item_window = Window_ItemList.new(0, wy, Graphics.width, wh)
    @item_window.viewport = @viewport
    @item_window.help_window = @help_window
    @item_window.equiphelp_window = @equiphelp_window
    @item_window.set_handler(:ok,     method(:on_item_ok))
    @item_window.set_handler(:cancel, method(:on_item_cancel))
    @category_window.item_window = @item_window
  end
end
class Scene_Equip < Scene_MenuBase
  def start
    super
    create_help_window
    create_equiphelp_window
    create_status_window
    create_command_window
    create_slot_window
    create_item_window
  end
  def create_command_window
    wx = @status_window.width
    wy = @help_window.height
    ww = Graphics.width - @status_window.width
    @command_window = Window_EquipCommand.new(wx, wy, ww)
    @command_window.viewport = @viewport
    @command_window.help_window = @help_window
    @command_window.equiphelp_window = @equiphelp_window
    @command_window.set_handler(:equip,    method(:command_equip))
    @command_window.set_handler(:optimize, method(:command_optimize))
    @command_window.set_handler(:clear,    method(:command_clear))
    @command_window.set_handler(:cancel,   method(:return_scene))
    @command_window.set_handler(:pagedown, method(:next_actor))
    @command_window.set_handler(:pageup,   method(:prev_actor))
  end
  def create_item_window
    wx = 0
    wy = @slot_window.y + @slot_window.height
    ww = Graphics.width
    wh = Graphics.height - wy
    @item_window = Window_EquipItem.new(wx, wy, ww, wh)
    @item_window.viewport = @viewport
    @item_window.help_window = @help_window
    @item_window.equiphelp_window = @equiphelp_window
    @item_window.status_window = @status_window
    @item_window.actor = @actor
    @item_window.set_handler(:ok,     method(:on_item_ok))
    @item_window.set_handler(:cancel, method(:on_item_cancel))
    @slot_window.item_window = @item_window
  end
  def create_slot_window
    wx = @status_window.width
    wy = @command_window.y + @command_window.height
    ww = Graphics.width - @status_window.width
    @slot_window = Window_EquipSlot.new(wx, wy, ww)
    @slot_window.viewport = @viewport
    @slot_window.help_window = @help_window
    @slot_window.equiphelp_window = @equiphelp_window
    @slot_window.status_window = @status_window
    @slot_window.actor = @actor
    @slot_window.set_handler(:ok,       method(:on_slot_ok))
    @slot_window.set_handler(:cancel,   method(:on_slot_cancel))
  end
end
class Scene_MakeEquip < Scene_MenuBase
  def start
    super
    create_help_window
    create_equiphelp_window
    create_gold_window
    create_command_window
    create_dummy_window
    create_A_window
    create_B_window
  end
  def create_gold_window
    @gold_window = Window_Gold.new
    @gold_window.viewport = @viewport
    @gold_window.x = Graphics.width - @gold_window.width
    @gold_window.y = @help_window.height
  end
  def create_command_window
    @command_window = Window_MakeCommand.new(@gold_window.x)
    @command_window.viewport = @viewport
    @command_window.y = @help_window.height
    @command_window.equiphelp_window = @equiphelp_window
    @command_window.set_handler(:a,      method(:command_A))
    @command_window.set_handler(:b,      method(:command_B))
    @command_window.set_handler(:c,      method(:command_C))
    @command_window.set_handler(:cancel, method(:return_scene))
  end
  def create_dummy_window
    wy = @command_window.y + @command_window.height
    wh = Graphics.height - wy
    @dummy_window = Window_Base.new(0, wy, Graphics.width, wh)
    @dummy_window.viewport = @viewport
  end
  def create_A_window
    @makeA_status_window = Window_MakeA_Status.new(400, 120, 400, 480)
    @makeA_status_window.viewport = @viewport
    @makeA_status_window.hide
    @makeA_itemlist_window = Window_MakeA_ItemLise.new(0, 120, 400, 480)
    @makeA_itemlist_window.viewport = @viewport
    @makeA_itemlist_window.help_window = @help_window
    @makeA_itemlist_window.equiphelp_window = @equiphelp_window
    @makeA_itemlist_window.status_window = @makeA_status_window
    @makeA_itemlist_window.hide
    @makeA_itemlist_window.set_handler(:ok,     method(:on_A_ok))
    @makeA_itemlist_window.set_handler(:cancel, method(:on_A_cancel))
    @makeA_ok_window = Window_MakeA_Ok.new
    @makeA_ok_window.viewport = @viewport
    @makeA_ok_window.set_handler(:ok,     method(:on_A_ok_ok))
    @makeA_ok_window.set_handler(:cancel, method(:on_A_ok_cancel))
  end
  def create_B_window
    @makeB_status_window = Window_MakeB_Status.new(800, 120, 400, 480)
    @makeB_status_window.viewport = @viewport
    @makeB_status_window.hide
    @makeB_itemlist_window = Window_MakeB_ItemLise.new(400, 120, 400, 480)
    @makeB_itemlist_window.viewport = @viewport
    @makeB_itemlist_window.help_window = @help_window
    @makeB_itemlist_window.equiphelp_window = @equiphelp_window
    @makeB_itemlist_window.status_window = @makeB_status_window
    @makeB_itemlist_window.hide
    @makeB_itemlist_window.set_handler(:ok,     method(:on_B_ok))
    @makeB_itemlist_window.set_handler(:cancel, method(:on_B_cancel))
    @makeB_ok_window = Window_MakeB_Ok.new(0, 120, 400, 480)
    @makeB_ok_window.viewport = @viewport
    @makeB_ok_window.equiphelp_window = @equiphelp_window
    @makeB_ok_window.set_handler(:ok,     method(:on_B_ok_ok))
    @makeB_ok_window.set_handler(:cancel, method(:on_B_ok_cancel))
  end
  def command_A
    @dummy_window.hide
    @makeA_itemlist_window.show.activate
    @makeA_itemlist_window.refresh
    @makeA_itemlist_window.select(0)
    @makeA_status_window.show
  end
  def command_B
    @dummy_window.hide
    @makeB_itemlist_window.show
   #@makeB_itemlist_window.refresh
   #@makeA_itemlist_window.select(0)
   #@makeB_status_window.show
    @makeB_ok_window.show.activate
    @makeB_ok_window.refresh
    @makeB_ok_window.select(0)
  end
  def command_C
    @dummy_window.hide
    @category_window.show.activate
    @sell_window.show
    @sell_window.unselect
    @sell_window.refresh
  end
  def on_A_ok
    @item = @makeA_itemlist_window.item
    @makeA_itemlist_window.deactivate
    @makeA_ok_window.show.activate
  end
  def on_A_cancel
    @command_window.activate
    @dummy_window.show
    @makeA_itemlist_window.hide
    @makeA_status_window.hide
    @makeA_status_window.item = nil
    @help_window.clear
    @equiphelp_window.clear
  end
  def on_A_ok_ok
    $game_party.lose_gold(@item.lv_price)
    @item.lv_up
    @makeA_itemlist_window.activate
    @makeA_itemlist_window.refresh
    @makeA_ok_window.hide
    @gold_window.refresh
  end
  def on_A_ok_cancel
    @makeA_itemlist_window.activate
    @makeA_ok_window.hide
  end
  def on_B_ok
    case @makeB_ok_window.kind
    when 0
      @makeB_ok_window.item = @makeB_itemlist_window.item
    when 1
      @makeB_ok_window.eq_gem(@makeB_itemlist_window.item)
      @gold_window.refresh
    when 2
    end
    on_B_cancel
  end
  def on_B_cancel
    @makeB_ok_window.activate
    @makeB_itemlist_window.clear
    @help_window.clear
   #@equiphelp_window.clear
  end
  def on_B_ok_ok
    case @makeB_ok_window.kind
    when 0
      @makeB_ok_window.deactivate
      @makeB_itemlist_window.activate
      @makeB_itemlist_window.refresh("A")
    when 1
      @makeB_ok_window.deactivate
      @makeB_itemlist_window.activate
      @makeB_itemlist_window.refresh("B")
    when 2
      @makeB_ok_window.add_ds
      @makeB_ok_window.activate
    end
    @gold_window.refresh
  end
  def on_B_ok_cancel
    @command_window.activate
    @dummy_window.show
    @makeB_ok_window.item = nil
    @makeB_ok_window.hide
    @makeB_itemlist_window.hide
    @help_window.clear
   #@equiphelp_window.clear
  end
  def money
    @gold_window.value
  end
  def currency_unit
    @gold_window.currency_unit
  end
  def buying_price
    @buy_window.price(@item)
  end
  def selling_price
    @item.price / 2
  end
end
class Scene_Shop < Scene_MenuBase
  def start
    super
    create_help_window
    create_equiphelp_window
    create_gold_window
    create_command_window
    create_dummy_window
    create_number_window
    create_status_window
    create_buy_window
    create_category_window
    create_sell_window
  end
  def create_command_window
    @command_window = Window_ShopCommand.new(@gold_window.x, @purchase_only)
    @command_window.viewport = @viewport
    @command_window.y = @help_window.height
    @command_window.equiphelp_window = @equiphelp_window
    @command_window.set_handler(:buy,    method(:command_buy))
    @command_window.set_handler(:sell,   method(:command_sell))
    @command_window.set_handler(:cancel, method(:return_scene))
  end
  def create_number_window
    wy = @dummy_window.y
    wh = @dummy_window.height
    @number_window = Window_ShopNumber.new(0, wy, wh)
    @number_window.viewport = @viewport
    @number_window.equiphelp_window = @equiphelp_window
    @number_window.hide
    @number_window.set_handler(:ok,     method(:on_number_ok))
    @number_window.set_handler(:cancel, method(:on_number_cancel))
  end
  def create_buy_window
    wy = @dummy_window.y
    wh = @dummy_window.height
    @buy_window = Window_ShopBuy.new(0, wy, wh, @goods)
    @buy_window.viewport = @viewport
    @buy_window.help_window = @help_window
    @buy_window.equiphelp_window = @equiphelp_window
    @buy_window.status_window = @status_window
    @buy_window.hide
    @buy_window.set_handler(:ok,     method(:on_buy_ok))
    @buy_window.set_handler(:cancel, method(:on_buy_cancel))
  end
  def create_category_window
    @category_window = Window_ItemCategory.new
    @category_window.viewport = @viewport
    @category_window.help_window = @help_window
    @category_window.equiphelp_window = @equiphelp_window
    @category_window.y = @dummy_window.y
    @category_window.hide.deactivate
    @category_window.set_handler(:ok,     method(:on_category_ok))
    @category_window.set_handler(:cancel, method(:on_category_cancel))
  end
  def create_sell_window
    wy = @category_window.y + @category_window.height
    wh = Graphics.height - wy
    @sell_window = Window_ShopSell.new(0, wy, Graphics.width, wh)
    @sell_window.viewport = @viewport
    @sell_window.help_window = @help_window
    @sell_window.equiphelp_window = @equiphelp_window
    @sell_window.hide
    @sell_window.set_handler(:ok,     method(:on_sell_ok))
    @sell_window.set_handler(:cancel, method(:on_sell_cancel))
    @category_window.item_window = @sell_window
  end
  def del_on_buy_cancel
    @command_window.activate
    @dummy_window.show
    @buy_window.hide
    @status_window.hide
    @status_window.item = nil
    @help_window.clear
    @equiphelp_window.clear
  end
  def del_on_sell_cancel
    @sell_window.unselect
    @category_window.activate
    @status_window.item = nil
    @help_window.clear
    @equiphelp_window.clear
  end
  def do_buy(number)
    $game_party.lose_gold(number * buying_price)
    $game_party.add_shopitem(@item, number)
  end
  def do_sell(number)
    $game_party.gain_gold(number * selling_price)
    $game_party.lose_item(@item.id, number)
  end
  def max_buy
    buying_price == 0 ? 99 : [99, money / buying_price].min
  end
  def max_sell
    @item.is_item? ? $game_party.item_number(@item) : 1
  end
end
class Scene_Battle < Scene_Base
  def on_item_ok
    @item = @item_window.item
    BattleManager.actor.input.set_item(@item)
    if !@item.need_selection?
      @item_window.hide
      next_command
    elsif @item.for_opponent?
      select_enemy_selection
    else
      select_actor_selection
    end
    $game_party.last_item.object = @item
  end
end

class Array


  def data


    @data.to_s


  end


end


module Options


  #


  #


  #


  #RANK   0   1   2   3   4   5   6   7   8   9   #特性


  f = [[  0,  3, 10, 15, 30, 40, 70, 90,150,190], #白/无


       [ 10, 11, 15, 20, 33, 43, 72, 92,152,192], #绿


       [ 30, 31, 33, 35, 40, 50, 77, 97,156,196], #蓝


       [ 70, 71, 73, 74, 79, 81, 90,110,167,207], #紫


       [150,151,153,154,158,161,169,174,190,230]] #橙


  a = Table.new(10,5)


  10.times{|x| 5.times{|y| a[x,y] = f[y][x] }}


#<=以上内容请不要修改=======================================================>


  S初始评价 = a        


  S使用耐久 = false    


  S每级强化评价 = 1    


  S宝石评价_白 =  1    


  S宝石评价_绿 =  2


  S宝石评价_蓝 =  4


  S宝石评价_紫 =  8


  S宝石评价_橙 = 16


  S品质_白 =   0       


  S品质_绿 =  10


  S品质_蓝 =  30


  S品质_紫 =  70


  S品质_橙 = 150


  S品质掉率_绿 = 0   #315


  S品质掉率_蓝 =  0   #63


  S品质掉率_紫 =   0   #9


  S品质掉率_橙 =  100000   #1


  S嵌孔掉率_1 = 315    


  S嵌孔掉率_2 = 100


  S嵌孔掉率_3 =  63


  S嵌孔掉率_4 =  18


  S嵌孔掉率_5 =   4


#<=以下内容请不要修改=======================================================>


  def self.dataA


    S初始评价


  end


  def self.dataB


    S每级强化评价


  end


  def self.dataC


    [S品质_白, S品质_绿, S品质_蓝, S品质_紫, S品质_橙]


  end


  def self.dataD


    [S品质掉率_橙, S品质掉率_紫, S品质掉率_蓝, S品质掉率_绿]


  end


  def self.dataE


    [S嵌孔掉率_5, S嵌孔掉率_4, S嵌孔掉率_3, S嵌孔掉率_2, S嵌孔掉率_1]


  end


  def self.dataF


    [S宝石评价_白, S宝石评价_绿, S宝石评价_蓝, S宝石评价_紫, S宝石评价_橙]


  end


  def self.cf(a, b)


    self.dataA[a, b]


  end


  def self.lf(e=0)


    self.dataD.each_with_index do |r, i|


      return 4-i if (r * ( r ** -0.05 + 0.4 ) ** e).to_i >= rand(1000)


    end


    return 0


  end


  def self.qf(e=0)


    self.dataE.each_with_index do |r, i|


      return 5-i if (r * ( r ** -0.05 + 0.4 ) ** e).to_i >= rand(1000)


    end


    return 0


  end


end


module RPG


  class BaseItem


    def is_maho?


      note.include?("<前缀>")


    end


    def is_item?


      self.is_a?(RPG::Item) && is_gem?


    end


    def is_gem?


      note.include?("<宝石>")


    end


    def rank


      lv = note[/<品质\s*(.*)>/, 1].to_s


      ["白","绿","蓝","紫","橙", ""].index(lv) % 5 #"白","绿","蓝","紫","橙", "" %5


    end


    def rank_lv


      note[/<RANK\s*(\d*)>/, 1].to_i


    end


    def features


      @features + features_note


    end


    def kind_id


      self.class.to_s + self.id.to_s


    end


    def features_note


      note.scan(/<特性 (.*) (.*)>/).inject([]) do |r, i|


        case i[0]


        when "吸收"


          r.push RPG::BaseItem::Feature.new(22,10,(i[1].to_i)/100.0)


        end


      end 


    end


  end


end


module Vocab


  def self.xparam(id)


    ["命中率","回避率","会心率","会心回避率","魔法回避率","魔法反射率","反击率","HP再生率","MP再生率","TP再生率","生命吸收"][id]


  end


  def self.sparam(id)


    ["受到攻击的几率","防御效果率","恢复效果率","药物知识","MP消费率","TP消耗率","物理伤害率","魔法伤害率","针板伤害率","经验获得率"][id]


  end


  def self.zparam(id)


    ["遇敌机率减半","随机遇敌无效","偷袭无效","先发攻击率提升","获得2倍现金","物品获得机率翻倍"][id]


  end


  def self.elements(id)


    $data_system.elements[id]


  end


  def self.weapon_types(id)


    $data_system.weapon_types[id]


  end


  def self.armor_types(id)


    $data_system.armor_types[id]


  end


end


module DataManager


  def self.create_game_objects


    $game_temp          = Game_Temp.new


    $game_system        = Game_System.new


    $game_timer         = Game_Timer.new


    $game_message       = Game_Message.new


    $game_switches      = Game_Switches.new


    $game_variables     = Game_Variables.new


    $game_self_switches = Game_SelfSwitches.new


    $game_actors        = Game_Actors.new


    $game_party         = Game_Party.new


    $game_troop         = Game_Troop.new


    $game_map           = Game_Map.new


    $game_player        = Game_Player.new


    $game_items         = Game_Items.new


  end


  def self.make_save_contents


    contents = {}


    contents[:system]        = $game_system


    contents[:timer]         = $game_timer


    contents[:message]       = $game_message


    contents[:switches]      = $game_switches


    contents[:variables]     = $game_variables


    contents[:self_switches] = $game_self_switches


    contents[:actors]        = $game_actors


    contents[:party]         = $game_party


    contents[:troop]         = $game_troop


    contents[:map]           = $game_map


    contents[:player]        = $game_player


    contents[:items]         = $game_items


    contents


  end


  def self.extract_save_contents(contents)


    $game_system        = contents[:system]


    $game_timer         = contents[:timer]


    $game_message       = contents[:message]


    $game_switches      = contents[:switches]


    $game_variables     = contents[:variables]


    $game_self_switches = contents[:self_switches]


    $game_actors        = contents[:actors]


    $game_party         = contents[:party]


    $game_troop         = contents[:troop]


    $game_map           = contents[:map]


    $game_player        = contents[:player]


    $game_items         = contents[:items]


  end


end


module BattleManager


  def self.gain_drop_items


    $game_troop.make_drop_items.each do |item|


      $game_party.add_item(item, 1, true)


      $game_message.add(sprintf(Vocab::ObtainItem, item.name))


    end


    wait_for_message


  end


end


class Game_Items < Array


  def idForNewItem(item, rand=false)


    if item.is_a?(RPG::Item) || item.is_gem?


      item = Game_UsableItem.new(item)


    else 


      item = Game_EquipItem.new(item, rand) 


    end


    self.push item


    return self.size - 1


  end


  def items


    self.collect {|item| item.is_item? }


  end


  def gems


    self.collect {|item| item.is_gem? }


  end


  def weapons


    self.collect {|item| item.is_weapon? }


  end


  def armors


    self.collect {|item| item.is_armor? }


  end


end


class Game_BaoItem


  def initialize(id = nil)


    @id = id


  end


  def add_item(id)


    @id = id


  end


  def unadd_item


    @id = nil


  end


  def name


    item ? item.name : "空插槽"


  end


  def rank


    item ? item.rank : 0


  end


  def features


    item.features if item


  end


  def item


    $game_items[@id] if @id


  end


end


class Game_Item


  def initialize(item)


    @item = item


    @id = $game_items.size


  end


  def is_a?(kind); item.is_a?(kind);                    end


  def is_item?;    item.is_a?(RPG::Item) || is_gem?;    end


  def is_gem?;     item.is_gem?;                        end


  def is_weapon?;  item.is_a?(RPG::Weapon) && !is_gem?; end


  def is_armor?;   item.is_a?(RPG::Armor);              end


  def is_equip?;   is_weapon? || is_armor?;             end


  def item


    @item


  end


  def id


    @id


  end


  def id=(id)


    @id = id


  end


  def rank


    item.rank


  end


  def item_id


    item.id


  end


  def kind_id


    item.class.to_s + item.id.to_s


  end


  def note


    item.note


  end


  def price


    item.price


  end


  def icon_index


    item.icon_index


  end


  def description


    item.description


  end


  def features


    item.features


  end


end


class Game_UsableItem < Game_Item


  def initialize(item)


    super(item)


    @number = 0


  end


  def number


    @number


  end


  def number=(n)


    @number = n


  end


  def performance


    Options.dataC[item.rank]


  end


  def name;              item.name;                           end #物品名


  def itype_id;          item.itype_id;                       end #贵重品值


  def scope;             item.scope;                          end #使用范围


  def occasion;          item.occasion;                       end #使用时刻


  def effects;           item.effects;                        end #使用效果


  def damage;            item.damage;                         end #使用伤害


  def repeats;           item.repeats;                        end #连续回数


  def success_rate;      item.success_rate;                   end #成功率


  def tp_gain;           item.tp_gain;                        end #获得TP


  def animation_id;      item.animation_id;                   end #动画编号


  def speed;             item.speed;                          end #速度補正


  def key_item?;         itype_id == 2;                       end #贵重品判定


  def consumable;        item.consumable;                     end #消耗判定


  def for_opponent?;     [1, 2, 3, 4, 5, 6].include?(scope);  end


  def for_friend?;       [7, 8, 9, 10, 11].include?(scope);   end


  def for_dead_friend?;  [9, 10].include?(scope);             end


  def for_user?;         scope == 11;                         end


  def for_one?;          [1, 3, 7, 9, 11].include?(scope);    end


  def for_random?;       [3, 4, 5, 6].include?(scope);        end


  def number_of_targets; for_random? ? scope - 2 : 0;         end


  def for_all?;          [2, 8, 10].include?(scope);          end


  def need_selection?;   [1, 7, 9].include?(scope);           end


  def battle_ok?;        [0, 1].include?(occasion);           end


  def menu_ok?;          [0, 2].include?(occasion);           end


  def certain?;          @hit_type == 0;                      end #技能用?


  def physical?;         @hit_type == 1;                      end #技能用?


  def magical?;          @hit_type == 2;                      end #技能用?


end


class Game_EquipItem < Game_Item


  def initialize(item, rand = true)


    super(item)


    @lv = rand ? make_lv : 0


    @params = make_params(rand)


    @prefix = 0


    @prefix_lv = 0


    @dongshu = []


    make_prefix if rand


    make_dongshu if rand


    make_naijiu(rand)


  end


  def dongshu


    @dongshu


  end


  def wtype_id; item.wtype_id; end #武器类型


  def atype_id; item.atype_id; end #防具类型


  def etype_id; item.etype_id; end #装备部位


  def animation_id; item.animation_id; end


  def lv;         @lv;     end


  def naijiu;     @naijiu;     end


  def naijiu_max; @naijiu_max; end


  def lv_up


    @lv += 1


  end


  def make_naijiu(rand)


    @naijiu_max = 100


    @naijiu = rand ? rand(51)+50 : @naijiu_max


  end


  def make_dongshu


    n = Options.qf(0)


    n.times{add_ds}


  end


  def add_ds


    @dongshu.push Game_BaoItem.new


  end


  def make_lv


    u = 0


    max_lv = 5 + 0   #提高0 可提高强化等级


    max_le = 200 + 0 #提高0 可提高强化概率


    max_lv.times{


      return u if rand(max_le) < 100


      u += 1


    }


    u


  end


  def make_params(rand)


    return item.params unless rand


    item.params.collect do |param|


      num = ([(param).abs, 1].max**-0.5*param).truncate 


      ts = param - num + rand(num*2+1)


      ts == 0 ? param : ts


    end


  end


  def make_prefix


    @prefix_lv = Options.lf(0) 


    return if @prefix_lv == 0


    items = pzqz(@prefix_lv)


    @prefix = items[rand(items.size)].id 


  end


  def features


    base_features + ds_features


  end


  def base_features


    item.features + prefix_item_features


  end


  def ds_features


    result = [] 


    @dongshu.each {|item|


      if item.item


        features = item.features


        if is_armor?


          data = $data_armors.compact.find {|i| i.name == item.name }


          features = data.features if data


        end


        result += features


      end


    }


    result


  end


  def prefix_item_features


    @prefix > 0 ? prefix_item.features : []


  end


  def prefix_item


    equip = $data_weapons[@prefix]


    if is_armor?


      data = $data_armors.compact.find {|i| i.name == equip.name }


      equip = data if data


    end


    equip


  end


  def allqz


    $data_weapons.select {|item| item ? item.is_maho? : false}


  end


  def pzqz(n)


    n = 5 #TEST


    allqz.select{|item| item.rank == n}


  end


  def ds


    prefix_item.description if @prefix > 0


  end


  def name


    tn = ""


    tn = tn + prefix_item.name + "的" if @prefix > 0


    tn += item.name


    tn += (@lv == 0 ? "" :  sprintf("%+d", @lv))


    tn


  end


  def price


    all_lv_price = (@lv * @lv + @lv)*(50+base_performance*2)/2


    super + all_lv_price + 2 ** @prefix_lv * 1000


  end


  def params


    r = 0.0


    @params.each_with_index do |e, i|


      if e > 0


        case i


        when 0


          r += 0.8


        when 1


          r += 0.9


        else


          r += 1


        end


      end


    end


    #g = @params.inject(0) {|r, i| i > 0 ? r + 1 : r }


    r = (r == 0 ? 0 : r ** -0.6 / 2.0)


    8.times.collect do |i|


      pa = @params[i]


      case i


      when 0


       (pa + @lv * pa * [pa.abs, 1].max ** -0.5 * r * (pa < 0 ? 0.2 : 2)).round


      when 1


       (pa + @lv * pa * [pa.abs, 1].max ** -0.5 * r * (pa < 0 ? 0.12 : 1.2)).round


      else


       (pa + @lv * pa * [pa.abs, 1].max ** -0.5 * r * (pa < 0 ? 0.1 : 1)).round


      end


    end


    #@params.collect do |param|


    #end


  end


  def rank


    case performance


    when   0...10  ; 0


    when  10...30  ; 1


    when  30...70  ; 2


    when  70...150 ; 3


    when 150...310 ; 4


    when 310...999 ; 5


    end


  end


  def dakongg


    2 ** dongshu.size * (100+base_performance*10)


  end


  def lv_price


    (@lv + 1) * (100+base_performance)


  end


  def base_performance


    Options.cf(item.rank_lv, @prefix_lv)


  end


  def ds_performance


    @dongshu.inject(0) {|r, i| r + Options.dataF[i.rank] }


  end


  def performance


    @lv + base_performance + ds_performance


  end


end


class Game_Party < Game_Unit


  def initialize


    super


    @gold = 0


    @steps = 0


    @last_item = Game_BaseItem.new


    @menu_actor_id = 0


    @target_actor_id = 0


    @actors = []


    @items = []


  end


  def consume_item(item)


    lose_item(item.id, 1) if item.is_a?(RPG::Item) && item.consumable


  end


  def item_number(item)


    return unless item


    n = 0


    all_items.each do |i|


      if i.kind_id == item.kind_id


        n += i.is_item? ? i.number : 1


      end


    end


    n


  end


  def setup_battle_test_items


    $data_items.each do |item|


      add_item(item, max_item_number(item)) if item && !item.name.empty?


    end


  end


  def has_item?(item, include_equip = false)


    return true if item_number(item) > 0


   #return include_equip ? members_equip_include?(item) : false


  end


  def members_equip_include?(item)


msgbox "判定队伍成员是否装备着指定物品"


    members.any? {|actor| actor.equips.any?{|it|it.item_id == item.item_id }}


  end


  def add_item(item, amount, rand = true)


    return unless item


    return if amount == 0


    return unadd_item(item, amount) if amount < 0


    if item.class == RPG::Item


      gain_item($game_items.idForNewItem(item), amount)


    else


      amount.times{ gain_item($game_items.idForNewItem(item, rand)) }


    end


    $game_map.need_refresh = true


  end


  def unadd_item(item, amount)


    amount.abs.times do


      all_items.each do |i|


        if i.kind_id == item.kind_id


          lose_item(i.id, 1)


          break


        end


      end


    end


    $game_map.need_refresh = true


  end


  def add_shopitem(item, number)


    if item.is_item?


      $game_items.push item


      gain_item($game_items.size-1, number)


    else


      id = item.item_id


      item = item.is_weapon? ? $data_weapons[id] : $data_armors[id]


      add_item(item, number, false)


    end


  end


  def gain_item(id, n=1)


    return unless id


    if $game_items[id].is_item?


      items.each do |item|


        if $game_items[id].kind_id == item.kind_id


          maxn = [item.number + n, 99].min - item.number


          n -= maxn


          item.number += maxn


        end


      end


      if n > 0


        $game_items[id].number = n


        @items.push(id)


      end


    else


      @items.push(id)


    end


    all_items_sort


  end


  def lose_item(id, n=1)


    return unless id


    if $game_items[id].is_item?


      items.reverse_each do |item|


        if $game_items[id].kind_id == item.kind_id


          maxn = [item.number, n].min


          item.number -= maxn


          n -= maxn


          @items.delete(item.id) if item.number == 0


        end


      end


    else


      @items.delete(id)


    end


  end


  def all_items_sort


    @items.sort!{|a, b|$game_items[a].item_id - $game_items[b].item_id}


  end


  def items


    @items.collect {|id| $game_items[id] }.select {|item| item.is_item? }


  end


  def gems


    @items.collect {|id| $game_items[id] }.select {|item| item.is_gem? }


  end


  def weapons


    @items.collect {|id| $game_items[id] }.select {|item| item.is_weapon? }


  end


  def armors


    @items.collect {|id| $game_items[id] }.select {|item| item.is_armor? }


  end


end


class Game_Battler < Game_BattlerBase


  def make_damage_value(user, item)


    value = item.damage.eval(user, self, $game_variables)


    value *= item_element_rate(user, item)


    value *= pdr if item.physical?


    value *= mdr if item.magical?


    value *= rec if item.damage.recover?


    value = apply_critical(value) if @result.critical


    value = apply_variance(value, item.damage.variance)


    value = apply_guard(value)


    @result.make_damage(value.to_i, user, item)


  end


end


class Game_Actor < Game_Battler


  def init_equips(equips)


    @equips = Array.new(equip_slots.size)


    equips.each_with_index do |item_id, i|


      next if item_id == 0


      etype_id = equip_slots[i]


      item = etype_id == 0 ? $data_weapons[item_id] : $data_armors[item_id]


      @equips[i] = $game_items.idForNewItem(item, false)


    end


    refresh


  end


  def param_rate(param_id)


    features_sum_pi(FEATURE_PARAM, param_id)


  end


  def sparam(sparam_id)


    features_sum_pi(FEATURE_SPARAM, sparam_id)


  end


  def features_sum_pi(code, id)


    r_features_pi(code, id) * r_features_sum(code, id)


  end


  def r_features_pi(code, id)


    rsum_features_with_id(code, id).inject(1.0) {|r, ft| r += (ft.value-1) }


  end


  def r_features_sum(code, id)


    rpi_features_with_id(code, id).inject(1.0) {|r, ft| r *= ft.value }


  end


  def rsum_features_with_id(code, id)


    rsum_all_features.select {|ft| ft.code == code && ft.data_id == id }


  end


  def rpi_features_with_id(code, id)


    rpi_all_features.select {|ft| ft.code == code && ft.data_id == id }


  end


  def rsum_all_features


    rsum_feature_objects.inject([]) {|r, obj| r + obj.features }


  end


  def rpi_all_features


    rpi_feature_objects.inject([]) {|r, obj| r + obj.features }


  end


  def rsum_feature_objects


    [actor] + [self.class] + equips.compact


  end


  def rpi_feature_objects


    states


  end


  def equip_slots


    return [0,0,2,3,4,4] if dual_wield?


    return [0,1,2,3,4,4]


  end


  def weapons


    @equips.select {|i| i ? $game_items[i].is_weapon? : false }.collect {|i| $game_items[i] }


  end


  def armors


    @equips.select {|i| i ? $game_items[i].is_armor? : false }.collect {|i| $game_items[i] }


  end


  def equips


    @equips.collect {|i| i ? $game_items[i] : nil }


  end


  def equip_change_ok?(slot_id)


    return true


    return false if equip_type_fixed?(equip_slots[slot_id])


    return false if equip_type_sealed?(equip_slots[slot_id])


    return true


  end


  def release_unequippable_items(item_gain = true)


    equips.each_with_index do |item, i|


      next if item


      if !equippable?(item) || item.etype_id != equip_slots[i]


        trade_item_with_party(nil, @equips[i]) if item_gain


      end


    end


  end


  def clear_equipments


    equip_slots.size.times do |i|


      change_equip(i, nil) if equip_change_ok?(i)


    end


  end


  def change_equip(slot_id, item)


    return unless trade_item_with_party(item, equips[slot_id])


    return if item && equip_slots[slot_id] != item.etype_id


    @equips[slot_id] = item ? item.id : nil


    refresh


  end


  def force_change_equip(slot_id, item)


    @equips[slot_id] = item ? item.id : nil


    release_unequippable_items(false)


    refresh


  end


  def trade_item_with_party(new_item, old_item)


    return false if new_item && !$game_party.has_item?(new_item)


    $game_party.gain_item(old_item ? old_item.id : nil)


    $game_party.lose_item(new_item ? new_item.id : nil)


    return true


  end


  def change_equip_by_id(slot_id, item_id)


msgbox "变更装备（用 ID 指定）"


    if equip_slots[slot_id] == 0


      change_equip(slot_id, item_id)


    else


      change_equip(slot_id, item_id)


    end


  end


end


class Game_Action


  def clear


    @item = nil


    @target_index = -1


    @value = 0


  end


  def set_skill(skill_id)


    @item = $data_skills[skill_id]


    self


  end


  def set_item(item)


    @item = item


    self


  end


  def item


    @item


  end


end


class Game_ActionResult


  def make_damage(value, user, item)


    @critical = false if value == 0


    @hp_damage = value if item.damage.to_hp?


    @mp_damage = value if item.damage.to_mp?


    @mp_damage = [@battler.mp, @mp_damage].min


    @hp_drain = make_drain_hp(user, item)


    @mp_drain = @mp_damage if item.damage.drain?


    @hp_drain = [@battler.hp, @hp_drain].min


    @success = true if item.damage.to_hp? || @mp_damage != 0


  end


  def make_drain_hp(user, item)


    hp_damage = (@hp_damage * @battler.element_rate(2)).to_i


    return hp_damage if item.damage.drain?


    return (hp_damage * [user.xparam(10), 1].min).to_i if user.xparam(10) > 0


    return 0


  end


  alias celica_hp_damage_text hp_damage_text


  def hp_damage_text


    celica_hp_damage_text


    if @hp_damage > 0


      fmt = @battler.actor? ? Vocab::ActorDamage : Vocab::EnemyDamage


      sprintf(fmt, @battler.name, @hp_damage)


    elsif @hp_damage < 0


      fmt = @battler.actor? ? Vocab::ActorRecovery : Vocab::EnemyRecovery


      sprintf(fmt, @battler.name, Vocab::hp, -hp_damage)


    else


      fmt = @battler.actor? ? Vocab::ActorNoDamage : Vocab::EnemyNoDamage


      sprintf(fmt, @battler.name)


    end


  end


  def hp_drain_text


    fmt = @battler.actor? ? Vocab::ActorDrain : Vocab::EnemyDrain


    sprintf("吸收了%s点%s", @hp_drain, Vocab::hp)


  end


end


class Game_Interpreter


  def command_126


    value = operate_value(@params[1], @params[2], @params[3])


    $game_party.add_item($data_items[@params[0]], value)


  end


  def command_127


    value = operate_value(@params[1], @params[2], @params[3])


    $game_party.add_item($data_weapons[@params[0]], value, true)


  end


  def command_128


    value = operate_value(@params[1], @params[2], @params[3])


    $game_party.add_item($data_armors[@params[0]], value, true)


  end


  def 开启强化画面


    SceneManager.call(Scene_MakeEquip)


  end


end


class Window_Base < Window


  def draw_item_name(item, x, y, enabled = true, width = 300)


    return unless item


    draw_icon(item.icon_index, x, y, enabled)


    change_color(performance_color(item), enabled)


    draw_text(x + 24, y, width, line_height, item.name)


  end


  def performance_color(item)


    return text_color(0) if item.is_a?(RPG::Skill)


    pf = item.performance


    if pf < 10


      performance_rank(0)


    elsif pf < 30


      performance_rank(1)


    elsif pf < 70


      performance_rank(2)


    elsif pf < 150


      performance_rank(3)


    elsif pf < 310


      performance_rank(4)


    else


      performance_rank(5)


    end


  end


  def performance_rank(n)


               #白 绿 蓝 紫 橙 粉


    text_color([ 0,28, 9,30,20,27][n])


  end


end


class Window_Selectable < Window_Base


  def active=(active)


    super


    update_cursor


    call_update_help


    call_update_equiphelp


  end


  def index=(index)


    @index = index


    update_cursor


    call_update_help


    call_update_equiphelp


  end


  def call_update_equiphelp


    update_equiphelp if active && @equiphelp_window


  end


  def update_equiphelp


    @equiphelp_window.clear


  end


  def drx


    x + index % col_max * (item_width + spacing) + item_width / 4


  end


  def dry


    y + index / col_max * item_height + item_height - oy


  end


  def equiphelp_window=(equiphelp_window)


    @equiphelp_window = equiphelp_window


    call_update_equiphelp


  end


end


class Window_EquipHelp < Window_Base


  def initialize


    super(0,0,200,600)


    self.opacity = 0


  end


  def standard_padding


    return 0


  end


  def item


    @item


  end


  def set_item(window, item)


    @item = item


    @window = window


    refresh


  end


  def clear


    contents.clear


  end


  def refresh


    clear


    return unless item


    @dy = 0


    draw_start               #描画上外框


    draw_name                #描画物品名


    if item.is_equip?


      draw_equip_kind        #描画装备类型


      draw_equip_attack_type #描画武器攻击类型


      draw_equip_params      #描画装备能力值


      draw_equip_features    #描画装备特性


      draw_equip_dongshu     #描画装备插槽


      draw_description       #描画说明


    elsif item.is_gem?


      draw_gem_type          #描画宝石类型


      draw_gem_features      #描画宝石特性


    else


      draw_item_type         #描画物品类型


      draw_item_effects      #描画物品使用效果


    end


    draw_price               #描画售格


    draw_end                 #描画下外框


    move_coordinate          #移动坐标


  end


  def draw_start


    pf_color = performance_color(item)


    contents.fill_rect(2,0,200-4,600,pf_color)


    contents.fill_rect(0,2,200,600-4,pf_color)


    contents.fill_rect(2+2,2,200-4-4,600-4,Color.new(0,0,64,160))


    contents.fill_rect(2,2+2,200-4,600-4-4,Color.new(0,0,64,160))


  end


  def draw_name


    contents.font.size = 16


    contents.font.name = "宋体"


    contents.font.bold = true


    contents.font.color = performance_color(item)


    contents.draw_text(6,6+@dy*16,200+8,16,item.name,0)


    contents.font.size = 15


    contents.font.name = "黑体"


    contents.font.bold = false


    contents.font.color = text_color(0)


    @dy += 1


  end


  def draw_description


    if item.ds


      if item.ds != ""


        contents.font.color = text_color(21)


        contents.draw_text(6, 6+@dy*16, 200, 16, item.ds)


        contents.font.color = text_color(0)


        @dy += 1


      end


    end


  end


  def draw_price


    str = item.price == 0 ? "无法出售" : "售价:#{item.price / 2}"


    contents.draw_text(6, 6+@dy*16, 200, 16, str)


    @dy += 1


  end


  def draw_gem_type


    contents.draw_text(6, 6+@dy*16, 200, 16, "宝石", 0)


    @dy += 1


  end


  def draw_gem_features


    item2 = $data_armors.compact.find {|t| t.name == item.name }


    contents.font.color = text_color(25)


    if item2


      contents.draw_text(6, 6+@dy*16, 200, 16, "镶嵌武器")


    else


      contents.draw_text(6, 6+@dy*16, 200, 16, "镶嵌通用")


    end


    @dy += 1


    item.features.each do |ft|


      str = feature_text(ft)


      next unless str


      contents.font.color = text_color(24)


      contents.draw_text(6, 6+@dy*16, 200, 16, str)


      @dy += 1


    end


    if item2


      contents.font.color = text_color(25)


      contents.draw_text(6, 6+@dy*16, 200, 16, "镶嵌防具")


      @dy += 1


      item2.features.each do |ft|


        str = feature_text(ft)


        next unless str


        contents.font.color = text_color(24)


        contents.draw_text(6, 6+@dy*16, 200, 16, str)


        @dy += 1


      end


    end


    contents.font.color = text_color(0)


  end


  def draw_item_type


    str = item.consumable ? "消耗品" : "非消耗品"


    contents.draw_text(6, 6+@dy*16, 200, 16, str, 0)


    @dy += 1


  end


  def draw_item_effects


    contents.font.color = text_color(24)


    item.effects.each do |ft|


      str = "特性显示未定义"


      case ft.code


      when 11 


        str = "回复#{ft.value2.to_i}点#{Vocab::hp}" if ft.value2 != 0


        str = "回复#{(ft.value1*100).to_i.to_s}%#{Vocab::hp}" if ft.value1 != 0


      when 12 


        str = "回复#{ft.value2.to_i}点#{Vocab::mp}" if ft.value2 != 0


        str = "回复#{(ft.value1*100).to_i.to_s}%#{Vocab::mp}" if ft.value1 != 0


      when 13 


        str = "回复#{ft.value2.to_i}点#{Vocab::tp}" if ft.value2 != 0


        str = "回复#{(ft.value1*100).to_i.to_s}%#{Vocab::tp}" if ft.value1 != 0


      when 21 


        str = "附加 #{$data_states[ft.data_id].name}"


      when 22 


        str = "解除 #{$data_states[ft.data_id].name}"


      when 31 


      when 32 


      when 33 


      when 34 


      when 41 


      when 42 


        str = "#{Vocab::param(ft.data_id)}永久增加#{ft.value1.to_i}点"


      when 43 


        str = "永久习得 #{$data_skills[ft.data_id].name}"


      when 44 


        next


      end


      contents.draw_text(6, 6+@dy*16, 200, 16, str)


      @dy += 1


    end


    contents.font.color = text_color(0)


  end


  def draw_equip_kind


    if item.is_a?(RPG::Armor)


      strA = Vocab::etype(item.etype_id)


      strB = Vocab::armor_types(item.atype_id)


    else


      bo = (item.features.select{|ft| ft.code == 54 }).any?{|ft| ft.data_id == 1}


      strA = bo ? "双手" : "单手"


      strB = Vocab::weapon_types(item.wtype_id)


    end


    contents.draw_text(6, 6+@dy*16, 200, 16, strA, 0)


    contents.draw_text(6, 6+@dy*16, 200-12, 16, strB, 2)


    @dy += 1


  end


  def draw_equip_attack_type


    str = ""


    (item.features.select{|ft| ft.code == 31 }).each do |ft|


      ts = Vocab::elements(ft.data_id)


      str += (ts + " ") unless str.include?(ts)


    end


    if str != ""


      contents.font.color = text_color(24)


      contents.draw_text(6, 6+@dy*16, 200, 16, str)


      contents.font.color = text_color(0)


      @dy += 1


    end


  end


  def draw_equip_params


    item.params.each_with_index do |param, index|


      if param != 0


        str = sprintf("%+d #{Vocab::param(index)}",param)


        contents.draw_text(6, 6+@dy*16, 200, 16, str)


        @dy += 1


      end


    end


  end


  def draw_equip_features


    contents.font.color = text_color(24)


    item.base_features.each do |ft|


      next if ft.code == 31


      str = feature_text(ft)


      next unless str


      contents.draw_text(6, 6+@dy*16, 200, 16, str)


      @dy += 1


    end


    contents.font.color = text_color(0)


  end


  def draw_equip_dongshu


    item.dongshu.each do |i|


      rect1 = Rect.new(6+1, 6+@dy*16+1, 14, 14)


      rect2 = Rect.new(120, 96, 8, 8)


      contents.stretch_blt(rect1, windowskin, rect2, 128)


      if i.item


        color = performance_color(i.item)


        contents.font.color = color


        bitmap = Cache.system("Iconset")


        rect2 = Rect.new(i.item.icon_index % 16 * 24, i.item.icon_index / 16 * 24, 24, 24)


        contents.stretch_blt(rect1, bitmap, rect2)


      else


        contents.font.color = text_color(0)


        contents.font.color.alpha = 160


      end


      contents.draw_text(6+16, 6+@dy*16, 200, 16, i.name)


      @dy += 1


      if i.item


        if item.is_armor?


          data = $data_armors.compact.find {|t| t.name == i.name }


          i = data if data


        end


        contents.font.color = text_color(24)


        i.features.each do |ft|


          next if ft.code == 31


          str = feature_text(ft)


         #next unless str


          contents.draw_text(6+16, 6+@dy*16, 200, 16, str)


          @dy += 1


        end


      end


    end


    contents.font.color = text_color(0)


  end


  def draw_end


    pf_color = performance_color(item)


    contents.clear_rect(0,10+@dy*16,200,600)


    contents.fill_rect(0,8+@dy*16,200,2,pf_color)


    contents.fill_rect(4,8+@dy*16,200-8,2,Color.new(0,0,64,160))


    contents.fill_rect(2,10+@dy*16,200-4,2,pf_color)


  end


  def move_coordinate


    self.x = @window.drx


    self.y = @window.dry 


    endy = self.y + 12+@dy*16 - @window.y


    self.y -= [endy - @window.height + 6, 0].max


    self.y = [self.y, 0].max


  end


  def feature_text(ft)


    str = "特性显示未定义"


    case ft.code


    when 11 


      str = (ft.value*100).to_i.to_s + "%" + Vocab::elements(ft.data_id) + "有效度"


    when 12 


      str = (ft.value*100).to_i.to_s + "%" + Vocab::param(ft.data_id) + "弱化有效度"


    when 13 


      str = (ft.value*100).to_i.to_s + "%" + $data_states[ft.data_id].name + "有效度"


    when 14 


      str = $data_states[ft.data_id].name + "状态无效化"


    when 21 


     #str = (ft.value*100).to_i.to_s + "% " + Vocab::param(ft.data_id)


      str = sprintf("%+d%%#{Vocab::param(ft.data_id)}", (ft.value*100-100).to_i)


    when 22 


      return if ft.value == 0


      str = sprintf("%+d%%#{Vocab::xparam(ft.data_id)}", (ft.value*100).to_i)


    when 23 


     #str = (ft.value*100).to_i.to_s + "% " + Vocab::sparam(ft.data_id)


      str = sprintf("%+d%%#{Vocab::xparam(ft.data_id)}", (ft.value*100-100).to_i)


    when 31 


      str = "攻击属性附加 " + Vocab::elements(ft.data_id)


    when 32 


      str = "+" + (ft.value*100).to_i.to_s + "%附加" + $data_states[ft.data_id].name + "状态"


    when 33 


      str = sprintf("%+d 攻击速度", ft.value.to_i)


    when 34 


      str = sprintf("%+d 攻击回数", ft.value.to_i)


    when 41 


    when 42 


    when 43 


      str = "习得#{$data_skills[ft.data_id].name}"


    when 44 


      str = "禁用#{$data_skills[ft.data_id].name}"


    when 51 


    when 52 


    when 53 


    when 54 


    when 55 


    when 61 


      str = sprintf("%+d 行动回数", ft.value.to_i)


    when 62 


    when 63 


    when 64 


      str = Vocab.zparam(ft.data_id)


    end


  end


end


class Window_ItemList < Window_Selectable


  def include?(item)


    return unless item


    case @category


    when :item


      item.is_gem? || (item.is_item? && !item.key_item?)


    when :weapon


      item.is_weapon?


    when :armor


      item.is_armor?


    when :key_item


      !item.is_gem? && item.is_item? && item.key_item?


    else


      false


    end


  end


  def draw_item(index)


    item = @data[index]


    if item


      rect = item_rect(index)


      rect.width -= 4


      draw_item_name(item, rect.x, rect.y)#, enable?(item))


      draw_item_number(rect, item)


    end


  end


  def draw_item_number(rect, item)


   #draw_text(rect, sprintf(":%2d", item.number), 2) if item.is_allitem?


    draw_text(rect, sprintf(":%2d", item.number), 2) if item.is_item?


  end


  def update_equiphelp


    @equiphelp_window.set_item(self, item)


  end


end


class Window_EquipStatus < Window_Base


  def visible_line_number


    return 8


  end


end


class Window_EquipSlot < Window_Selectable


  def visible_line_number


    6


  end


  def drx


    super + 92


  end


  def update_equiphelp


    @equiphelp_window.set_item(self, item)


  end


end


class Window_EquipItem < Window_ItemList


  def include?(item)


    return true if item == nil


    return false unless item.is_equip?


    return false if @slot_id < 0


    return false if item.etype_id != @actor.equip_slots[@slot_id]


    return @actor.equippable?(item)


  end


end


class Window_ShopBuy < Window_Selectable


  def window_width


    return 400


  end


  def make_item_list


    @data = []


    @price = {}


    @shop_goods.each do |goods|


      case goods[0]


      when 0;  item = $data_items[goods[1]]


      when 1;  item = $data_weapons[goods[1]]


      when 2;  item = $data_armors[goods[1]]


      end


      if item


        if item.is_a?(RPG::Item) || item.is_gem?


          item = Game_UsableItem.new(item)


        else


          item = Game_EquipItem.new(item, false)


        end


        @data.push(item)


        @price[item] = goods[2] == 0 ? item.price : goods[3]


      end


    end


  end


  def enable?(item)


    item && price(item) <= @money


  end


  def update_equiphelp


    @equiphelp_window.set_item(self, item)


  end


end


class Window_ShopNumber < Window_Selectable


  def window_width


    return 400


  end


  def dry


    y + item_y + line_height


  end


  def update_equiphelp


    @equiphelp_window.set_item(self, @item)


  end


  def figures


    return 3


  end


end


class Window_ShopStatus < Window_Base


  def refresh


    contents.clear


    draw_possession(4, 0)


    return unless @item


    draw_equip_info(4, line_height * 2) if @item.is_equip?


  end


end


class Window_BattleLog < Window_Selectable


  def display_hp_damage(target, item)


    return if target.result.hp_damage == 0 && item && !item.damage.to_hp?


    if target.result.hp_damage > 0


      target.perform_damage_effect


    end


    Sound.play_recovery if target.result.hp_damage < 0


    add_text(target.result.hp_damage_text)


    wait


    if target.result.hp_drain > 0


      add_text(target.result.hp_drain_text)


      wait


    end


  end


end


class Window_MakeCommand < Window_HorzCommand


  def initialize(window_width)


    @window_width = window_width


    super(0, 0)


  end


  def window_width


    @window_width


  end


  def col_max


    return 4


  end


  def make_command_list


    add_command("强化装备", :a)


    add_command("镶嵌装备", :b)


    add_command("合成装备", :c, false)


    add_command("离开",     :cancel)


  end


  def current_item_enabled?


    index == 2 ? false : true


  end


end


class Window_MakeA_ItemLise < Window_ItemList


  def initialize(x, y, width, height)


    super(x, y, width, height)


  end


  def col_max


    return 1


  end


  def current_item_enabled?


    return false unless item


    item.lv_price <= $game_party.gold


  end


  def make_item_list


    @data = $game_party.equip_items


  end


  def status_window=(status_window)


    @status_window = status_window


    call_update_help


  end


  def update_help


    super


    @help_window.set_item(item) if @help_window


    @status_window.item = item if @status_window


  end


  def update_equiphelp


    @equiphelp_window.set_item(self, item)


  end


end


class Window_MakeA_Ok < Window_Command


  def initialize


    super(Graphics.width/2-60, Graphics.height/2)


    self.hide.deactivate


  end


  def window_width


    120


  end


  def col_max


    return 1


  end


  def alignment


    return 1


  end


  def make_command_list


    add_command("强化", :ok)


    add_command("取消", :cancel)


  end


end


class Window_MakeA_Status < Window_Base


  def initialize(x, y, width, height)


    super(x, y, width, height)


    @item = nil


    @page_index = 0


    refresh


  end


  def refresh


    contents.clear


    return unless @item


    draw_A(4, 0)


    draw_B(4, 0)


    draw_C(4, 0)


  end


  def item=(item)


    @item = item


    refresh


  end


  def draw_A(x, y)


    change_color(system_color)


    draw_text(x, line_height*(y+0), 300, 24, "强化费用")


    change_color(normal_color)


    draw_text(x, line_height*(y+1), 300, 24, @item.lv_price, 2)


  end


  def draw_B(x, y)


    change_color(system_color)


    draw_text(x, line_height*(y+2), 300, 24, "强化材料")


  end


  def draw_C(x, y)


    change_color(system_color)


    draw_text(x, line_height*(y+6), 300, 24, "属性变化")


  end


end


class Window_MakeB_ItemLise < Window_ItemList


  def initialize(x, y, width, height)


    super(x, y, width, height)


  end


  def col_max


    return 1


  end


  def current_item_enabled?


    true


  end


  def make_item_list(syt)


    if syt == "A"


      @data = $game_party.equip_items


    else


      @data = $game_party.gems


    end


    @data.push(nil)


  end


  def status_window=(status_window)


    @status_window = status_window


    call_update_help


  end


  def update_help


    super


    @help_window.set_item(item) if @help_window


    @status_window.item = item if @status_window


  end


  def refresh(syt)


    make_item_list(syt)


    create_contents


    draw_all_items


    select(0)


  end


  def clear


    @data = []


    select(-1)


    create_contents


    draw_all_items


  end


  def update_equiphelp


    @equiphelp_window.set_item(self, item)


  end


end


class Window_MakeB_Ok < Window_Selectable


  def initialize(x, y, width, height)


    super(x, y, width, height)


    self.hide.deactivate


    @item = nil


  end


  def window_width


  end


  def item_max


    item ? 1 + [item.dongshu.size+1, 5].min : 1


  end


  def refresh


    contents.clear


    change_color(system_color)


    y = 0


    draw_text(4, y, 92, line_height, "装备")


    if item


      draw_item_name(item, 64, 0)


      item.dongshu.each{|d|


        y += 1


        change_color(system_color)


        draw_text(4, y*line_height, 92, line_height, "插槽")


        change_color(normal_color)


        draw_item_name(d.item, 64, y*line_height)


       #dest_rect = Rect.new(64, (1+i)*line_height+4, 240, 16)


       #src_bitmap = self.windowskin


       #src_rect = Rect.new(120,96+8,8,8)


       #contents.stretch_blt(dest_rect, src_bitmap, src_rect, 128)


       #change_color(normal_color)


       #draw_text(64, (1+i)*line_height, 240, line_height, "不可更改",1)


       #draw_text(64, (1+i)*line_height, 92, line_height, d.name)


      }


      if item.dongshu.size < 5


        y += 1


        change_color(system_color)


        draw_text(4, y*line_height, 92, line_height, "打孔")


        change_color(normal_color)


        draw_text(64+24, y*line_height, 240, line_height, "花费: #{item.dakongg}")


      end


      y += 2


      gold = 50 + item.base_performance * 5


      change_color(normal_color)


      draw_text(0, y*line_height, 240, line_height, "镶嵌宝石花费: #{gold}")


      y += 1


      draw_text(0, y*line_height, 240, line_height, "取出宝石花费: #{gold*2}")


    else


      change_color(normal_color, false)


      draw_text(64, 0,142, line_height, "请选择一件装备")


    end


  end


  def item


    @item


  end


  def item=(item)


    @item = item


    refresh 


  end


  def kind


    index == 0 ? 0 : index == item_max-1 && item.dongshu.size != 5 ? 2 : 1


  end


  def eq_gem(ritem)


    if eitem && ritem


      return if eitem.kind_id == ritem.kind_id


    end


    gold = 50 + item.base_performance * 5


    if ritem


      if eitem


        $game_party.gain_item(eitem.id)                       


        $game_party.lose_gold(gold * 2)                       


      end


      item.dongshu[index-1].add_item(ritem.id)                


      $game_party.lose_gold(50 + item.base_performance * 5)   


      $game_party.lose_item(ritem.id)                         


    else


      if eitem


        $game_party.lose_gold(gold * 2)                       


        $game_party.gain_item(eitem.id)                       


        item.dongshu[index-1].unadd_item                      


      end


    end


    refresh


  end


  def add_ds


    $game_party.lose_gold(item.dakongg)


    item.add_ds


    refresh


  end


  def current_item_enabled?


    case kind


    when 0


      true


    when 1


      50 + item.base_performance * 5 <= $game_party.gold


    when 2


      item.dakongg <= $game_party.gold


    end


  end


  def eitem


    case kind


    when 0


      item


    when 1


      item.dongshu[index-1].item if item


    end


  end


  def update_equiphelp


    @equiphelp_window.set_item(self, eitem)


  end


end


class Window_MakeB_Status < Window_Base


  def initialize(x, y, width, height)


    super(x, y, width, height)


    @item = nil


    @page_index = 0


    refresh


  end


  def refresh


    contents.clear


    return unless @item


   #draw_A(4, 0)


  end


  def item=(item)


    @item = item


  #refresh


  end


  def draw_A(x, y)


    @item.dongshu.each_with_index{|item,index|


      contents.fill_rect(x+1,line_height * (y+5+index)+1,22,22, Color.new(128,128,128))


    }


  end


end


=begin


 合成解释


   1.种类保留


     ├不同部位的合成 => 合成失败,获得材料


     └同部位的合成 => 保留高等级的一件,特性按以下方式计算


       └有配方的情况按配方,特性按以下方式计算


   2.特性保留  


     ├强化等级 => 高强化等级 + 低强化等级的高强化等级的一半每1


     │     max = [a.lv, b.lv].max


     │     min = [a.lv, b.lv].min


     │      lv = max + (min/(max/2)).ceil


     │


     ├前缀   => 相加, 超2个的情况随机保留最大等级2个


     └嵌孔数 => 保留嵌孔少的一个


       └宝石 => 随机保留最大等级


=end


class Scene_MenuBase < Scene_Base


  def create_help_window


    @help_window = Window_Help.new


    @help_window.viewport = @viewport


  end


  def create_equiphelp_window


    @equiphelp_window = Window_EquipHelp.new


    @equiphelp_window.viewport = @viewport


    @equiphelp_window.z += 1000


  end


end


class Scene_Item < Scene_ItemBase


  def start


    super


    create_help_window


    create_equiphelp_window


    create_category_window


    create_item_window


  end


  def create_category_window


    @category_window = Window_ItemCategory.new


    @category_window.viewport = @viewport


    @category_window.help_window = @help_window


    @category_window.equiphelp_window = @equiphelp_window


    @category_window.y = @help_window.height


    @category_window.set_handler(:ok,     method(:on_category_ok))


    @category_window.set_handler(:cancel, method(:return_scene))


  end


  def create_item_window


    wy = @category_window.y + @category_window.height


    wh = Graphics.height - wy


    @item_window = Window_ItemList.new(0, wy, Graphics.width, wh)


    @item_window.viewport = @viewport


    @item_window.help_window = @help_window


    @item_window.equiphelp_window = @equiphelp_window


    @item_window.set_handler(:ok,     method(:on_item_ok))


    @item_window.set_handler(:cancel, method(:on_item_cancel))


    @category_window.item_window = @item_window


  end


end


class Scene_Equip < Scene_MenuBase


  def start


    super


    create_help_window


    create_equiphelp_window


    create_status_window


    create_command_window


    create_slot_window


    create_item_window


  end


  def create_command_window


    wx = @status_window.width


    wy = @help_window.height


    ww = Graphics.width - @status_window.width


    @command_window = Window_EquipCommand.new(wx, wy, ww)


    @command_window.viewport = @viewport


    @command_window.help_window = @help_window


    @command_window.equiphelp_window = @equiphelp_window


    @command_window.set_handler(:equip,    method(:command_equip))


    @command_window.set_handler(:optimize, method(:command_optimize))


    @command_window.set_handler(:clear,    method(:command_clear))


    @command_window.set_handler(:cancel,   method(:return_scene))


    @command_window.set_handler(:pagedown, method(:next_actor))


    @command_window.set_handler(:pageup,   method(:prev_actor))


  end


  def create_item_window


    wx = 0


    wy = @slot_window.y + @slot_window.height


    ww = Graphics.width


    wh = Graphics.height - wy


    @item_window = Window_EquipItem.new(wx, wy, ww, wh)


    @item_window.viewport = @viewport


    @item_window.help_window = @help_window


    @item_window.equiphelp_window = @equiphelp_window


    @item_window.status_window = @status_window


    @item_window.actor = @actor


    @item_window.set_handler(:ok,     method(:on_item_ok))


    @item_window.set_handler(:cancel, method(:on_item_cancel))


    @slot_window.item_window = @item_window


  end


  def create_slot_window


    wx = @status_window.width


    wy = @command_window.y + @command_window.height


    ww = Graphics.width - @status_window.width


    @slot_window = Window_EquipSlot.new(wx, wy, ww)


    @slot_window.viewport = @viewport


    @slot_window.help_window = @help_window


    @slot_window.equiphelp_window = @equiphelp_window


    @slot_window.status_window = @status_window


    @slot_window.actor = @actor


    @slot_window.set_handler(:ok,       method(:on_slot_ok))


    @slot_window.set_handler(:cancel,   method(:on_slot_cancel))


  end


end


class Scene_MakeEquip < Scene_MenuBase


  def start


    super


    create_help_window


    create_equiphelp_window


    create_gold_window


    create_command_window


    create_dummy_window


    create_A_window


    create_B_window


  end


  def create_gold_window


    @gold_window = Window_Gold.new


    @gold_window.viewport = @viewport


    @gold_window.x = Graphics.width - @gold_window.width


    @gold_window.y = @help_window.height


  end


  def create_command_window


    @command_window = Window_MakeCommand.new(@gold_window.x)


    @command_window.viewport = @viewport


    @command_window.y = @help_window.height


    @command_window.equiphelp_window = @equiphelp_window


    @command_window.set_handler(:a,      method(:command_A))


    @command_window.set_handler(:b,      method(:command_B))


    @command_window.set_handler(:c,      method(:command_C))


    @command_window.set_handler(:cancel, method(:return_scene))


  end


  def create_dummy_window


    wy = @command_window.y + @command_window.height


    wh = Graphics.height - wy


    @dummy_window = Window_Base.new(0, wy, Graphics.width, wh)


    @dummy_window.viewport = @viewport


  end


  def create_A_window


    @makeA_status_window = Window_MakeA_Status.new(400, 120, 400, 480)


    @makeA_status_window.viewport = @viewport


    @makeA_status_window.hide


    @makeA_itemlist_window = Window_MakeA_ItemLise.new(0, 120, 400, 480)


    @makeA_itemlist_window.viewport = @viewport


    @makeA_itemlist_window.help_window = @help_window


    @makeA_itemlist_window.equiphelp_window = @equiphelp_window


    @makeA_itemlist_window.status_window = @makeA_status_window


    @makeA_itemlist_window.hide


    @makeA_itemlist_window.set_handler(:ok,     method(:on_A_ok))


    @makeA_itemlist_window.set_handler(:cancel, method(:on_A_cancel))


    @makeA_ok_window = Window_MakeA_Ok.new


    @makeA_ok_window.viewport = @viewport


    @makeA_ok_window.set_handler(:ok,     method(:on_A_ok_ok))


    @makeA_ok_window.set_handler(:cancel, method(:on_A_ok_cancel))


  end


  def create_B_window


    @makeB_status_window = Window_MakeB_Status.new(800, 120, 400, 480)


    @makeB_status_window.viewport = @viewport


    @makeB_status_window.hide


    @makeB_itemlist_window = Window_MakeB_ItemLise.new(400, 120, 400, 480)


    @makeB_itemlist_window.viewport = @viewport


    @makeB_itemlist_window.help_window = @help_window


    @makeB_itemlist_window.equiphelp_window = @equiphelp_window


    @makeB_itemlist_window.status_window = @makeB_status_window


    @makeB_itemlist_window.hide


    @makeB_itemlist_window.set_handler(:ok,     method(:on_B_ok))


    @makeB_itemlist_window.set_handler(:cancel, method(:on_B_cancel))


    @makeB_ok_window = Window_MakeB_Ok.new(0, 120, 400, 480)


    @makeB_ok_window.viewport = @viewport


    @makeB_ok_window.equiphelp_window = @equiphelp_window


    @makeB_ok_window.set_handler(:ok,     method(:on_B_ok_ok))


    @makeB_ok_window.set_handler(:cancel, method(:on_B_ok_cancel))


  end


  def command_A


    @dummy_window.hide


    @makeA_itemlist_window.show.activate


    @makeA_itemlist_window.refresh


    @makeA_itemlist_window.select(0)


    @makeA_status_window.show


  end


  def command_B


    @dummy_window.hide


    @makeB_itemlist_window.show


   #@makeB_itemlist_window.refresh


   #@makeA_itemlist_window.select(0)


   #@makeB_status_window.show


    @makeB_ok_window.show.activate


    @makeB_ok_window.refresh


    @makeB_ok_window.select(0)


  end


  def command_C


    @dummy_window.hide


    @category_window.show.activate


    @sell_window.show


    @sell_window.unselect


    @sell_window.refresh


  end


  def on_A_ok


    @item = @makeA_itemlist_window.item


    @makeA_itemlist_window.deactivate


    @makeA_ok_window.show.activate


  end


  def on_A_cancel


    @command_window.activate


    @dummy_window.show


    @makeA_itemlist_window.hide


    @makeA_status_window.hide


    @makeA_status_window.item = nil


    @help_window.clear


    @equiphelp_window.clear


  end


  def on_A_ok_ok


    $game_party.lose_gold(@item.lv_price)


    @item.lv_up


    @makeA_itemlist_window.activate


    @makeA_itemlist_window.refresh


    @makeA_ok_window.hide


    @gold_window.refresh


  end


  def on_A_ok_cancel


    @makeA_itemlist_window.activate


    @makeA_ok_window.hide


  end


  def on_B_ok


    case @makeB_ok_window.kind


    when 0


      @makeB_ok_window.item = @makeB_itemlist_window.item


    when 1


      @makeB_ok_window.eq_gem(@makeB_itemlist_window.item)


      @gold_window.refresh


    when 2


    end


    on_B_cancel


  end


  def on_B_cancel


    @makeB_ok_window.activate


    @makeB_itemlist_window.clear


    @help_window.clear


   #@equiphelp_window.clear


  end


  def on_B_ok_ok


    case @makeB_ok_window.kind


    when 0


      @makeB_ok_window.deactivate


      @makeB_itemlist_window.activate


      @makeB_itemlist_window.refresh("A")


    when 1


      @makeB_ok_window.deactivate


      @makeB_itemlist_window.activate


      @makeB_itemlist_window.refresh("B")


    when 2


      @makeB_ok_window.add_ds


      @makeB_ok_window.activate


    end


    @gold_window.refresh


  end


  def on_B_ok_cancel


    @command_window.activate


    @dummy_window.show


    @makeB_ok_window.item = nil


    @makeB_ok_window.hide


    @makeB_itemlist_window.hide


    @help_window.clear


   #@equiphelp_window.clear


  end


  def money


    @gold_window.value


  end


  def currency_unit


    @gold_window.currency_unit


  end


  def buying_price


    @buy_window.price(@item)


  end


  def selling_price


    @item.price / 2


  end


end


class Scene_Shop < Scene_MenuBase


  def start


    super


    create_help_window


    create_equiphelp_window


    create_gold_window


    create_command_window


    create_dummy_window


    create_number_window


    create_status_window


    create_buy_window


    create_category_window


    create_sell_window


  end


  def create_command_window


    @command_window = Window_ShopCommand.new(@gold_window.x, @purchase_only)


    @command_window.viewport = @viewport


    @command_window.y = @help_window.height


    @command_window.equiphelp_window = @equiphelp_window


    @command_window.set_handler(:buy,    method(:command_buy))


    @command_window.set_handler(:sell,   method(:command_sell))


    @command_window.set_handler(:cancel, method(:return_scene))


  end


  def create_number_window


    wy = @dummy_window.y


    wh = @dummy_window.height


    @number_window = Window_ShopNumber.new(0, wy, wh)


    @number_window.viewport = @viewport


    @number_window.equiphelp_window = @equiphelp_window


    @number_window.hide


    @number_window.set_handler(:ok,     method(:on_number_ok))


    @number_window.set_handler(:cancel, method(:on_number_cancel))


  end


  def create_buy_window


    wy = @dummy_window.y


    wh = @dummy_window.height


    @buy_window = Window_ShopBuy.new(0, wy, wh, @goods)


    @buy_window.viewport = @viewport


    @buy_window.help_window = @help_window


    @buy_window.equiphelp_window = @equiphelp_window


    @buy_window.status_window = @status_window


    @buy_window.hide


    @buy_window.set_handler(:ok,     method(:on_buy_ok))


    @buy_window.set_handler(:cancel, method(:on_buy_cancel))


  end


  def create_category_window


    @category_window = Window_ItemCategory.new


    @category_window.viewport = @viewport


    @category_window.help_window = @help_window


    @category_window.equiphelp_window = @equiphelp_window


    @category_window.y = @dummy_window.y


    @category_window.hide.deactivate


    @category_window.set_handler(:ok,     method(:on_category_ok))


    @category_window.set_handler(:cancel, method(:on_category_cancel))


  end


  def create_sell_window


    wy = @category_window.y + @category_window.height


    wh = Graphics.height - wy


    @sell_window = Window_ShopSell.new(0, wy, Graphics.width, wh)


    @sell_window.viewport = @viewport


    @sell_window.help_window = @help_window


    @sell_window.equiphelp_window = @equiphelp_window


    @sell_window.hide


    @sell_window.set_handler(:ok,     method(:on_sell_ok))


    @sell_window.set_handler(:cancel, method(:on_sell_cancel))


    @category_window.item_window = @sell_window


  end


  def del_on_buy_cancel


    @command_window.activate


    @dummy_window.show


    @buy_window.hide


    @status_window.hide


    @status_window.item = nil


    @help_window.clear


    @equiphelp_window.clear


  end


  def del_on_sell_cancel


    @sell_window.unselect


    @category_window.activate


    @status_window.item = nil


    @help_window.clear


    @equiphelp_window.clear


  end


  def do_buy(number)


    $game_party.lose_gold(number * buying_price)


    $game_party.add_shopitem(@item, number)


  end


  def do_sell(number)


    $game_party.gain_gold(number * selling_price)


    $game_party.lose_item(@item.id, number)


  end


  def max_buy


    buying_price == 0 ? 99 : [99, money / buying_price].min


  end


  def max_sell


    @item.is_item? ? $game_party.item_number(@item) : 1


  end


end


class Scene_Battle < Scene_Base


  def on_item_ok


    @item = @item_window.item


    BattleManager.actor.input.set_item(@item)


    if !@item.need_selection?


      @item_window.hide


      next_command


    elsif @item.for_opponent?


      select_enemy_selection


    else


      select_actor_selection


    end


    $game_party.last_item.object = @item


  end


end

奉先 · 发表于 2022-7-31 22:22:49

求大神解答

帐号		自动登录	找回密码
密码			注册会员

[已经过期] 【ACE】如何修改此腳本的參數

加入我们，或者，欢迎回来。

评分

浏览过的版块

[已经过期] 【ACE】 如何修改此腳本的參數

加入我们，或者，欢迎回来。

评分

浏览过的版块

[已经过期] 【ACE】如何修改此腳本的參數