查看: 2764|回复: 3

[RMVA发布] 技能消耗变量 VA

[复制链接]
梦石
0
星屑
2457
在线时间
912 小时
注册时间
2014-10-14
回帖
1155

开拓者

发表于 2017-10-5 22:01:08 | 显示全部楼层 |阅读模式
购买主题 已有 30 人购买  本主题需向作者支付 2 星屑 才能浏览
------落尽红樱君不见,轻绘梨花泪沾衣。~~~
梦石
0
星屑
1521
在线时间
392 小时
注册时间
2012-8-28
回帖
52
发表于 2017-10-6 16:17:14 | 显示全部楼层
支持一下

点评

谢谢  发表于 2017-10-6 21:47
回复

使用道具 举报

梦石
0
星屑
9292
在线时间
2504 小时
注册时间
2011-5-20
回帖
14521

开拓者

发表于 2018-1-27 20:23:02 | 显示全部楼层
我这里使用没有显示你效果图中的那个窗口,不过判定能否使用的部分是正常的

这里我稍微简化了一下你的脚本
[fold=简化版]
  1. #设定
  2. module MFXRB
  3.   module S_V
  4.     X = 700
  5.     Y = 0
  6.     W = 200
  7.     H = 200
  8.     WS = 50 #无色变量ID
  9.     HS = 51 #黑色
  10.     LS = 52#蓝色
  11.     ZS = 53#紫色
  12.     JS = 54#金色
  13.     WSC = [192,192,192]#无色颜色R,G,B
  14.     HSC = [255,255,255]
  15.     LSC = [0,0,255]
  16.     ZSC = [236,103,225]
  17.     JSC = [255,223,112]
  18.     WSCN = "无色"
  19.     HSCN = "黑色"
  20.     LSCN = "蓝色"
  21.     ZSCN = "紫色"
  22.     JSCN = "金色"
  23.   end
  24. end
  25. class Window_Skill_V < Window_Selectable
  26.   include MFXRB::S_V
  27.   def initialize
  28.     super(X, Y,W, H)
  29.     refresh
  30.     activate
  31.   end
  32.   def refresh
  33.     contents.clear
  34.     i=0
  35.     %w(W H L Z J).each do |a|
  36.       c1 = "#{a}SC"
  37.       c2 = "#{a}SCN"
  38.       c3 = "#{a}S"
  39.       eval %{
  40.       change_color(Color.new(#{c1}[0],#{c1}[1],#{c1}[2]))
  41.       draw_text(0, Y + line_height * i, 180, line_height, #{c2})
  42.       draw_text(100, Y + line_height * i, 180, line_height, $game_variables[#{c3}])
  43.       }
  44.       i+=1
  45.     end
  46.   end
  47. end
  48. class Scene_Battle < Scene_Base
  49.   alias create_all_windows_m create_all_windows
  50.   def create_all_windows
  51.     create_all_windows_m
  52.     c_skv
  53.   end
  54.   def c_skv
  55.     @skv = Window_Skill_V.new
  56.   end
  57.   alias rs refresh_status
  58.   def refresh_status
  59.     rs
  60.     @skv.refresh
  61.   end
  62. end
  63. class RPG::Skill
  64.   %w(W H L Z J).each do |a|
  65.     name = "#{a.downcase}s_cost"
  66.     define_method name do
  67.       /<#{a}S_COST\s*(\d+)>/ =~ note ? $1.to_i : 0
  68.     end
  69.   end
  70. end
  71. class Game_Actor
  72.   include MFXRB::S_V
  73.   alias xxx001_skill_cost_payable? skill_cost_payable?
  74.   def skill_cost_payable?(skill)
  75.     %w(W H L Z J).each do |a|
  76.       eval %{return false if $game_variables[#{a}S]<skill.#{a.downcase}s_cost}
  77.     end
  78.     xxx001_skill_cost_payable?(skill)
  79.   end
  80.   alias xxx001_pay_skill_cost pay_skill_cost
  81.   def pay_skill_cost(skill)
  82.     xxx001_pay_skill_cost(skill)
  83.     %w(W H L Z J).each do |a|
  84.       eval %{$game_variables[#{a}S]-=skill.#{a.downcase}s_cost}
  85.     end
  86.   end
  87. end
复制代码
[/fold]
[img]http://service.t.sina.com.cn/widget/qmd/5339802982/c02e16bd/7.png
回复

使用道具 举报

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

本版积分规则

Powered by Discuz! X5.0 © 2001-2026 Discuz! Team.

在本版发帖返回顶部