第二货币对装备无效

woshizhu99999

脚本如下

1. #第二货币设置
   
2. $SECOND_CURRENCY_SWITCH = 100
   
3. $SECOND_CURRENCY_NAME = "**"
   
4. #第二货币方法
   
5. class Game_Party < Game_Unit
   
6.   attr_reader    :spegold
   
7.   alias initialize_normal_sc initialize
   
8.   def initialize
   
9.     initialize_normal_sc
   
10.     @spegold = 0
    
11.   end
    
12.   alias gain_gold_normal_sc gain_gold
    
13.   def gain_gold(amount)
    
14.     if $game_switches[$SECOND_CURRENCY_SWITCH]
    
15.       @spegold = [[@spegold + amount, 0].max, max_gold].min
    
16.     else
    
17.       gain_gold_normal_sc(amount)
    
18.     end
    
19.   end
    
20. end
    
21. #第二货币的显示
    
22. class Window_Gold < Window_Base
    
23.   #覆盖方法！可能引起冲突
    
24.   def initialize
    
25.     super(0, 0, window_width, fitting_height(2))
    
26.     self.opacity = 100
    
27.     refresh
    
28.   end
    
29.   alias refresh_normal_sc refresh
    
30.   def refresh
    
31.     refresh_normal_sc
    
32.     draw_currency_value($game_party.spegold, $SECOND_CURRENCY_NAME, 4, 24, contents.width - 8)
    
33.   end
    
34. end
    
35. #战斗胜利不获得第二货币
    
36. module BattleManager
    
37.   #覆盖方法！可能引起冲突
    
38.   def self.gain_gold
    
39.     if $game_troop.gold_total > 0
    
40.       text = sprintf(Vocab::ObtainGold, $game_troop.gold_total)
    
41.       $game_message.add('\.' + text)
    
42.       $game_party.gain_gold_normal_sc($game_troop.gold_total)
    
43.     end
    
44.     wait_for_message
    
45.   end
    
46. end
    
47. #用第二货币买东西
    
48. module RPG
    
49.   class Item
    
50.     def price
    
51.       if $game_switches[$SECOND_CURRENCY_SWITCH]
    
52.         note.split(/[\r\n]+/).each { |line|
    
53.           case line
    
54.           when /<第二货币价格:(\d+)>/i
    
55.             return $1.to_i
    
56.           end
    
57.         }
    
58.         return 0
    
59.       else
    
60.         return @price
    
61.       end
    
62.     end
    
63.   end
    
64. end
    
65. #商店中购买灵魄物品显示灵魄
    
66. class Window_ShopNumber < Window_Selectable
    
67.   alias draw_total_price_normal_sc draw_total_price
    
68.   def draw_total_price
    
69.     if $game_switches[$SECOND_CURRENCY_SWITCH]
    
70.       @currency_unit = $SECOND_CURRENCY_NAME
    
71.     end
    
72.     draw_total_price_normal_sc
    
73.   end
    
74. end
    
75. class Scene_Shop < Scene_MenuBase
    
76.   alias money_normal_sc money
    
77.   def money
    
78.     if $game_switches[$SECOND_CURRENCY_SWITCH]
    
79.       return $game_party.spegold
    
80.     else
    
81.       return money_normal_sc
    
82.     end
    
83.   end
    
84.   alias create_gold_window_normal_sc create_gold_window
    
85.   def create_gold_window
    
86.     create_gold_window_normal_sc
    
87.     @gold_window.y -= 10
    
88.   end
    
89. end

复制代码

用同样的方法在商店可以看见物品的价格，但是装备的价格却是0

345912390

你需要对物品设置第二货币价格，在物品 的备注中输入

1. <第二货币价格:100>#100为设置的价格

复制代码

不想在RPG::BaseItem中加入price属性就多改了一点，用以下 脚本替换你发的那个

RUBY 代码复制

#第二货币设置
$SECOND_CURRENCY_SWITCH = 100
$SECOND_CURRENCY_NAME = "**"
#第二货币方法
class Game_Party < Game_Unit
  attr_reader    :spegold
  alias initialize_normal_sc initialize
  def initialize
    initialize_normal_sc
    @spegold = 0
  end
  alias gain_gold_normal_sc gain_gold
  def gain_gold(amount)
    if $game_switches[$SECOND_CURRENCY_SWITCH]
      @spegold = [[@spegold + amount, 0].max, max_gold].min
    else
      gain_gold_normal_sc(amount)
    end
  end
end
#第二货币的显示
class Window_Gold < Window_Base
  #覆盖方法！可能引起冲突
  def initialize
    super(0, 0, window_width, fitting_height(2))
    self.opacity = 100
    refresh
  end
  alias refresh_normal_sc refresh
  def refresh
    refresh_normal_sc
    draw_currency_value($game_party.spegold, $SECOND_CURRENCY_NAME, 4, 24, contents.width - 8)
  end
end
#战斗胜利不获得第二货币
module BattleManager
  #覆盖方法！可能引起冲突
  def self.gain_gold
    if $game_troop.gold_total > 0
      text = sprintf(Vocab::ObtainGold, $game_troop.gold_total)
      $game_message.add('\.' + text)
      $game_party.gain_gold_normal_sc($game_troop.gold_total)
    end
    wait_for_message
  end
end
#用第二货币买东西
module RPG
  class Item
    def price
      if $game_switches[$SECOND_CURRENCY_SWITCH]
        note.split(/[\r\n]+/).each { |line|
          case line
          when /<第二货币价格:(\d+)>/i
            return $1.to_i
          end
        }
        return 0
      else
        return @price
      end
    end
  end
  class EquipItem
    def price
      if $game_switches[$SECOND_CURRENCY_SWITCH]
        note.split(/[\r\n]+/).each { |line|
          case line
          when /<第二货币价格:(\d+)>/i
            return $1.to_i
          end
        }
        return 0
      else
        return @price
      end
    end
  end
end
#商店中购买灵魄物品显示灵魄
class Window_ShopNumber < Window_Selectable
  alias draw_total_price_normal_sc draw_total_price
  def draw_total_price
    if $game_switches[$SECOND_CURRENCY_SWITCH]
      @currency_unit = $SECOND_CURRENCY_NAME
    end
    draw_total_price_normal_sc
  end
end
class Scene_Shop < Scene_MenuBase
  alias money_normal_sc money
  def money
    if $game_switches[$SECOND_CURRENCY_SWITCH]
      return $game_party.spegold
    else
      return money_normal_sc
    end
  end
  alias create_gold_window_normal_sc create_gold_window
  def create_gold_window
    create_gold_window_normal_sc
    @gold_window.y -= 10
  end
end

#第二货币设置


$SECOND_CURRENCY_SWITCH = 100


$SECOND_CURRENCY_NAME = "**"


#第二货币方法


class Game_Party < Game_Unit


  attr_reader    :spegold


  alias initialize_normal_sc initialize


  def initialize


    initialize_normal_sc


    @spegold = 0


  end


  alias gain_gold_normal_sc gain_gold


  def gain_gold(amount)


    if $game_switches[$SECOND_CURRENCY_SWITCH]


      @spegold = [[@spegold + amount, 0].max, max_gold].min


    else


      gain_gold_normal_sc(amount)


    end


  end


end


#第二货币的显示


class Window_Gold < Window_Base


  #覆盖方法！可能引起冲突


  def initialize


    super(0, 0, window_width, fitting_height(2))


    self.opacity = 100


    refresh


  end


  alias refresh_normal_sc refresh


  def refresh


    refresh_normal_sc


    draw_currency_value($game_party.spegold, $SECOND_CURRENCY_NAME, 4, 24, contents.width - 8)


  end


end


#战斗胜利不获得第二货币


module BattleManager


  #覆盖方法！可能引起冲突


  def self.gain_gold


    if $game_troop.gold_total > 0


      text = sprintf(Vocab::ObtainGold, $game_troop.gold_total)


      $game_message.add('\.' + text)


      $game_party.gain_gold_normal_sc($game_troop.gold_total)


    end


    wait_for_message


  end


end


#用第二货币买东西


module RPG


  class Item


    def price


      if $game_switches[$SECOND_CURRENCY_SWITCH]


        note.split(/[\r\n]+/).each { |line|


          case line


          when /<第二货币价格:(\d+)>/i


            return $1.to_i


          end


        }


        return 0


      else


        return @price


      end


    end


  end


  class EquipItem


    def price


      if $game_switches[$SECOND_CURRENCY_SWITCH]


        note.split(/[\r\n]+/).each { |line|


          case line


          when /<第二货币价格:(\d+)>/i


            return $1.to_i


          end


        }


        return 0


      else


        return @price


      end


    end


  end


end


#商店中购买灵魄物品显示灵魄


class Window_ShopNumber < Window_Selectable


  alias draw_total_price_normal_sc draw_total_price


  def draw_total_price


    if $game_switches[$SECOND_CURRENCY_SWITCH]


      @currency_unit = $SECOND_CURRENCY_NAME


    end


    draw_total_price_normal_sc


  end


end


class Scene_Shop < Scene_MenuBase


  alias money_normal_sc money


  def money


    if $game_switches[$SECOND_CURRENCY_SWITCH]


      return $game_party.spegold


    else


      return money_normal_sc


    end


  end


  alias create_gold_window_normal_sc create_gold_window


  def create_gold_window


    create_gold_window_normal_sc


    @gold_window.y -= 10


  end


end

woshizhu99999

345912390 发表于 2014-8-29 11:51
你需要对物品设置第二货币价格，在物品 的备注中输入

这样对物品有用，对装备没用啊...加了这个装备的价格还是0

taroxd

woshizhu99999 发表于 2014-8-29 13:08
这样对物品有用，对装备没用啊...加了这个装备的价格还是0

第49行，Item 改成 BaseItem 试试看。不过我不保证有用

woshizhu99999

taroxd 发表于 2014-8-29 13:29
第49行，Item 改成 BaseItem 试试看。不过我不保证有用

额...改了之后全部价格都变成0了

VIPArcher

woshizhu99999 发表于 2014-8-30 07:33
额...改了之后全部价格都变成0了

试试看用这个?

1. =begin
   
2. ===============================================================================
   
3.   变量商店 By喵呜喵5
   
4. ===============================================================================
   
5. 【说明】
   
6.   
   
7.   可以使用变量在商店进行购物
   
8.   
   
9.   首先先在事件中使用脚本命令输入：shop_set(变量的ID,"变量的单位")，例如：  
   
10.   shop_set(1,"节操")
    
11.   
    
12.   接着使用事件中的商店处理时，购买物品不会消耗金钱而是消耗对应的变量
    
13.   
    
14.   使用命令shop_set可以恢复原来使用金钱购物的商店
    
15.   
    
16. =end
    
17. $m5script = {} if $m5script.nil?
    
18. $m5script["M5VARShop"] = true
    
19. module M5VARShop
    
20. #==============================================================================
    
21. #  设定部分
    
22. #==============================================================================
    
23. 
    
24.   PRICE = false   #true
    
25.   
    
26.   #设置为true的情况下，变量商店物品的出售价格为【数据库中】物品售价的一半
    
27.   #设置为false的情况下， 变量商店物品的出售价格为【该商店】物品售价的一半
    
28.   
    
29.   VAR = 1
    
30.   
    
31.   #这里设置一个没有使用到的变量的ID，游戏中请不要修改这个ID的变量数值
    
32. 
    
33. #==============================================================================
    
34. #  设定结束
    
35. #==============================================================================
    
36. end
    
37. class Game_Interpreter
    
38.   def shop_set(gold=0,unit="")
    
39.     gold = 0 if gold == M5VARShop::VAR
    
40.     $game_variables[M5VARShop::VAR]=[gold,unit]
    
41.   end
    
42. end
    
43. class Window_Gold_New < Window_Gold
    
44.   def initialize(gold,unit)
    
45.     @gold,@unit = gold,unit
    
46.     super()
    
47.   end
    
48.   def value
    
49.     @gold == 0 ? super : $game_variables[@gold]   
    
50.   end
    
51.   def currency_unit
    
52.     (@gold == 0 || @unit == "") ? super : @unit
    
53.   end
    
54. end
    
55. class Scene_Shop
    
56.   def create_gold_window
    
57.     $game_variables[M5VARShop::VAR] = [0,""] if \
    
58.     !$game_variables[M5VARShop::VAR].is_a?(Array)
    
59.     @gold_window = Window_Gold_New.new($game_variables[M5VARShop::VAR][0],$game_variables[M5VARShop::VAR][1])
    
60.     @gold_window.viewport = @viewport
    
61.     @gold_window.x = Graphics.width - @gold_window.width
    
62.     @gold_window.y = @help_window.height
    
63.   end
    
64.   alias m5_20140318_do_buy  do_buy  
    
65.   def do_buy(number)
    
66.     if $game_variables[M5VARShop::VAR][0] == 0
    
67.       m5_20140318_do_buy(number)
    
68.     else
    
69.       $game_variables[$game_variables[M5VARShop::VAR][0]] -= number * buying_price
    
70.       $game_party.gain_item(@item, number)
    
71.     end   
    
72.   end
    
73.   alias m5_20140318_do_sell do_sell
    
74.   def do_sell(number)
    
75.     if $game_variables[M5VARShop::VAR][0] == 0
    
76.       m5_20140318_do_sell(number)
    
77.     else
    
78.       $game_variables[$game_variables[M5VARShop::VAR][0]] += number * selling_price
    
79.       $game_party.lose_item(@item, number)
    
80.     end
    
81.   end
    
82.   alias m5_20140318_selling_price selling_price
    
83.   def selling_price
    
84.     return m5_20140318_selling_price if M5VARShop::PRICE || $game_variables[M5VARShop::VAR][0] == 0
    
85.     buying_price / 2
    
86.   end
    
87. end

复制代码

woshizhu99999

VIPArcher 发表于 2014-9-1 14:30
试试看用这个?

总感觉这个没有我现在用的好用，不过也行，感谢