Project1

标题: 这次有经验悬赏，跪求RMVA第二货币脚本 [打印本页]

---

作者: 672707197    时间: 2012-2-25 22:28
标题: 这次有经验悬赏，跪求RMVA第二货币脚本


跪求啊，第二货币脚本，这次不要再给我移到开水区了，一共485经验全都贡献出去了，哪位大侠帮帮忙 ，我是新人+穷人，跪求


‘‘──672707197于2012-2-25 22:30补充以下内容

大侠别移，顺便说一下，最好不要是纯事件滴，以前看到rmvx有第二货币的脚本，哪位大神能帮帮忙，把那个改了换到va中能用也行感激不尽
’’
再次追加10经验……无力的飘过dsu_plus_rewardpost_czw

---

作者: xmheart    时间: 2012-2-26 00:13
你试过VX那个了吗？那个以事件为主的已经可以把。。。。。（关键是这功能我还没用得着）

---

作者: 判约之轮    时间: 2012-2-26 09:50
第二货币？这个不需要脚本吧？
只需要新建立一个贵重物品就可以的吧~

---

作者: 672707197    时间: 2012-2-26 10:21
说详细点呗，我是新手 ，这个如果不是脚本也行，问题是贵重物品不也是用同样的货币买卖吗


‘‘──672707197于2012-2-26 10:42补充以下内容

这个为回复杂兵天下= =
虽然说没有，但是我很勇敢滴查了百度，but还是木有，于是就猥琐滴翻译了一下，JP Manager百度翻译给出的解释是推广经理，长见识了哈，以后记住这个词。
————————————————————————我是可爱的分割线————————————————————————————————
沙发板凳两位童鞋，我是新手，理解不了，能不能说的详细点，或者来个牛人解释下，继续期待中
’’

---

作者: 杂兵天下的马甲    时间: 2012-2-26 10:54


让我来承包这个工程吧。。。。

RUBY 代码复制

#第二货币设置
$SECOND_CURRENCY_SWITCH = 1
$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))
    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
end

#第二货币设置


$SECOND_CURRENCY_SWITCH = 1


$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))


    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


end

排版有一点小问题，无大碍。打开一号开关之后，事件获得金钱会变为获得灵魄，失去金钱亦然。同时商店购物也会变成使用灵魄购买。在物品备注中写入<第二货币价格:1>之类的东西，此物品就会可以用灵魄购买。不过必须打开一号开关才能用灵魄购买物品。

---

作者: 雪流星    时间: 2012-2-26 11:17
我也正在改写我的脚本

---

作者: zlm10010    时间: 2012-2-26 11:27
脚本什么的，看都看不太懂

---

作者: 雪流星    时间: 2012-2-26 12:20

杂兵天下的马甲 发表于 2012-2-25 20:54
让我来承包这个工程吧。。。。
#第二货币设置
$SECOND_CURRENCY_SWITCH = 1

不只第二而已，就是原VX的多重货币脚本，不过我正在重新改写。

不过你这个应该已经符合LZ的要求了
那我那个就能无限期拖延

去写其他脚本去也

---

作者: 672707197    时间: 2012-2-26 14:10

杂兵天下的马甲 发表于 2012-2-26 10:54
让我来承包这个工程吧。。。。
#第二货币设置
$SECOND_CURRENCY_SWITCH = 1

额，严重bug啊，购买界面显示的还是一号货币的名称，而且可以无限购买，只要有购买一个物品的钱就可以买所拥有第一货币÷第二货币单价个（这个是病句），能不能解决下……


‘‘──672707197于2012-2-26 14:12补充以下内容

大侠，还是别无限期拖延了，你楼上的楼上的楼上（＝　＝）的脚本出现了ｂｕｇ，你还是来帮帮忙吧{:4_90:}
’’

---

作者: 杂兵天下的马甲    时间: 2012-2-26 17:26


好了，这是更新版,排版也修复好了，商店中灵魄和金币不会被挡住了。

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

复制代码

���
84行问题已经好了。

---

作者: 672707197    时间: 2012-2-26 18:17
@杂兵天下的马甲84行出现了问题，大侠看下呗

---

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

Powered by Discuz! X3.1