设为首页收藏本站|繁體中文

Project1

 找回密码
 注册会员
搜索
查看: 12301|回复: 24
打印 上一主题 下一主题

[已经解决] 貌似 VA里 没多种货币啊

[复制链接]

Lv3.寻梦者

死亡颂唱者

梦石
0
星屑
1154
在线时间
1794 小时
注册时间
2011-10-21
帖子
2245

开拓者

1
发表于 2012-7-15 15:38:22 | 显示全部楼层
本帖最后由 acn00269 于 2012-7-15 16:09 编辑

直接给你脚本吧..
  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
复制代码
使用方法:在物品备注填写 <金币:X> 即购买该物品需要金币X
这家伙很懒,什么也没有留下
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

拿上你的纸笔,建造一个属于你的梦想世界,加入吧。
 注册会员
找回密码

站长信箱:[email protected]|手机版|小黑屋|无图版|Project1游戏制作

GMT+8, 2024-5-20 20:18

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表