【强势更新】技能消耗物品（SkillNeedItem）

负零 · 发表于 2010-7-26 06:54:48

目前出现一bug【默认脚本下】...请允许一个不太懂脚本的人这样描述
在地图上打开技能菜单，用键盘上W键不能查看下一角色技能，且无论光标最初指向哪个角色，打开的永远都是队列中第一个人的技能栏...有人提出过吗或者我火星了

Project2.rar (261.45 KB, 下载次数: 42)

DeathKing · 发表于 2010-7-25 10:34:13

回复六祈的帖子

{:nm_4:} 很好，FSL协议正是需要大家一起来找BUG，然后去修正他，这样的快速开发模式。下面我已经将你提出来的BUG修补好了，请你在上面把判定的部分更新上，并写上更新内容：

Game_Actor#skill_can_use?方法的问题是纯粹忘记了要用alias，{:nm_2:}

#===============================================================================
# ■ FSL 技能消耗物品
# FSL Skill Need Item
#-------------------------------------------------------------------------------
# 设定一些值，当拥有制定物品的制定个数及以上时才可发动特技。发动特技会
# 消耗掉这些物品。
#
# 在技能的“注释”中如下书写（请确保使用的是西文半角而不是全角)：
# <need_item 物品id，对应数量物品id，对应数量 …… >
# <need_item 1,1 2,2 3,3>
#
#-------------------------------------------------------------------------------
# 更新作者： DeathKing 六祈
# 许可协议： FSL -NOS ADK
# 项目分类： VX \ 数据工程
# 衍生关系：
# 项目版本： 1.4.0725
# 建立日期： 2010年05月29日
# 最后更新： 2010年07月25日
# 引用网址：
#-------------------------------------------------------------------------------
# - 1.1.0725 （2010.07.25） By 六祈
# * 修正了Game_Actor#skill_can_use?方法的错误；
# * 修正了Window_SNItem.skill_can_use?方法的错误；
#
# - 1.1.0719 （2010.07.19） By DeathKing
# * ADK的升级，可兼容沉影不器的读取装备注释脚本；
#
# - 1.1.0714 （2010.07.14） By DeathKing
# * 修改了消耗物品的算法；
#
# - 1.1.0607 （2010.06.07） By DeathKing
# * 改变了设置方法；
#
# - 1.0.0529 （2010.05.29） By DeathKing
# * 初始版本完成；
#
#===============================================================================
#-------------------------------------------------------------------------------
# ▼ 登记FSL
#-------------------------------------------------------------------------------
$fscript = {} if $fscript == nil
$fscript["SkillNeedItem"] = "1.4.0725"
#-------------------------------------------------------------------------------
# ▼ 通用配置模块
#-------------------------------------------------------------------------------
module FSL
module Conf
module SNItem
# 技能消耗物品存在着一些不是十分完美的地方，由于战斗系统并不是即时的，
# 我们不能随时对物品进行检查，事实上，我们尝试过很多方法，最后都没有成
# 功。因此我们放弃了对玩家的提示，这个脚本只有在技能实际上被使用时才会
# 扣除物品，因此如果技能发动时，条件不满足，技能将会丢失。
# ~~~~~~~~~~~~~~~~~~~~~~~~~
# 窗口的相关配置，一般不修改
WINDOW_X = 272 # X 544 / 2
WINDOW_Y = 112 # Y 56 * 2
WINDOW_W = 274 # 宽
WINDOW_H = 640 # 高
BACK_OPACITY = 200 # 透明度，255为不透明
TEXT_NEED = "需要：" # “需要：”一词的字符
TEXT_NEED_X = WINDOW_X - 104 # “需要：”字符的 X 坐标
TEXT_ITEM_NUM_X = WINDOW_X - 52 # 物品数量的 X 坐标
end
end
end
#==============================================================================
# ■ Window_SNItem
#------------------------------------------------------------------------------
# 　需要的物品的窗口。
#==============================================================================
class Window_SNItem < Window_Base
include FSL::Conf::SNItem
#--------------------------------------------------------------------------
# ● 初始化对像
# x : 窗口 X 座标
# y : 窗口 Y 座标
# width : 窗口宽度
# height : 窗口高度
#--------------------------------------------------------------------------
def initialize(x=WINDOW_X, y=WINDOW_Y, width=WINDOW_W, height=WINDOW_H)
super(x, y, width, height)
self.back_opacity = BACK_OPACITY
self.visible = false
end
#--------------------------------------------------------------------------
# ● 判定技能可否使用（需要的物品是否满足）
# skill : 技能
#--------------------------------------------------------------------------
def self.skill_can_use?(skill)
# 如果传递过来的skill为空
return false if skill == nil
# 读取need_item项的参数
need_item = skill.read_notes["need_item"]
# need_item参数为空的话返回true
return true if need_item == nil
# 重新生成参数列表
need_item_clone = []
need_item.each do |e|
need_item_clone << [ e.split(",")[0].to_i , e.split(",")[1].to_i ]
end
need_item = need_item_clone
# 遍历
need_item.each_index do |i|
# 生成物品id
item_id = need_item[i][0]
# 生成物品数量
item_num = need_item[i][1]
# 是否拥有物品，是的话返回物品的索引，不是的话返回nil
item_exist = $game_party.items.index($data_items[item_id])
# 不存在就返回false
return false if item_exist == nil
# 返回物品
test_item = $game_party.items[item_exist]
# 如果不可用就返回
return false if ($game_party.item_number(test_item) < item_num)
end
return true
end
#--------------------------------------------------------------------------
# ● 刷新窗口
# skill : 技能
# index : 技能在技能窗口的索引，用来判定本
# 窗口应该显示在左边还是右边
#--------------------------------------------------------------------------
def refresh( skill, index = 0)
# 清除之前产生的位图
self.contents.clear
# 如果skill为空就返回false
return false if skill == nil
# 先让需要窗口不可见
self.visible = false
# 读取参数
need_item = skill.read_notes["need_item"]
# 如果参数不是个数组就将需要窗口隐藏并返回false
return false unless need_item.is_a? Array
# 重新生成参数列表
need_item_clone = []
need_item.each do |e|
need_item_clone << [ e.split(",")[0].to_i , e.split(",")[1].to_i ]
end
need_item = need_item_clone
# 如果参数列表为空就返回
return false unless need_item.size >= 1
# 判定索引以决定窗口位置
self.x = index % 2 == 0 ? WINDOW_X : 0
# 改变窗口大小
self.height = need_item.size * 24 + 32
# 将窗口置为可见
self.visible = true
create_contents
# 遍历参数列表
need_item.each_index do |i|
# 生成物品id
item_id = need_item[i][0]
# 生成物品数量
item_num = need_item[i][1]
# 生成物品
item = $data_items[item_id]
# 判定物品是否足够
enabled = $game_party.item_number(item) >= item_num ? true : false
# 绘制文字
draw_item_name(item, 0, WLH * i, enabled)
self.contents.font.color.alpha = enabled ? 255 : 128
self.contents.draw_text(TEXT_NEED_X, WLH * i, 96, WLH, TEXT_NEED) #
self.contents.draw_text(TEXT_ITEM_NUM_X, WLH * i, 32, WLH, item_num) #
end # need_item.each_index
end
#--------------------------------------------------------------------------
# ● 执行对物品消耗
# skill : 技能
#--------------------------------------------------------------------------
def self.exec_cost( skill )
# 传递错误就直接返回false
return false if skill == nil
# 读取need_item项的参数
need_item = skill.read_notes["need_item"]
# 如果参数不是个数组就将需要窗口隐藏并返回false
return true unless need_item.is_a? Array
need_item.each do |e|
id = e.split(",")[0].to_i
num = e.split(",")[1].to_i
$game_party.gain_item($data_items[id], -num)
end
end
end # Window_SNItem
#==============================================================================
# ■ Game_Actor
#------------------------------------------------------------------------------
# 　处理角色的类。本类在 Game_Actors 类 ($game_actors) 的内部使用、
# Game_Party 类请参考 ($game_party) 。
#==============================================================================
class Game_Actor
alias snitem_skill_can_use? skill_can_use?
#--------------------------------------------------------------------------
# ● 可用技能判断
# skill : 技能
#--------------------------------------------------------------------------
def skill_can_use?(skill)
return false unless Window_SNItem.skill_can_use?(skill)
snitem_skill_can_use?(skill)
end
end
#==============================================================================
# ■ Scene_Skill
#------------------------------------------------------------------------------
# 　处理特技画面的类。
#==============================================================================
class Scene_Skill < Scene_Base
alias snitem_initialize initialize
alias snitem_terminate terminate
alias snitem_update update
alias snitem_use_skill_nontarget use_skill_nontarget
#--------------------------------------------------------------------------
# ● 初始化对像
# actor_index : 角色位置
#--------------------------------------------------------------------------
def initialize( actor_index = 0, equip_index = 0 )
snitem_initialize
@snitem_window = Window_SNItem.new
end
#--------------------------------------------------------------------------
# ● 结束处理
#--------------------------------------------------------------------------
def terminate
snitem_terminate
@snitem_window.dispose
end
#--------------------------------------------------------------------------
# ● 更新画面
#--------------------------------------------------------------------------
def update
snitem_update
@snitem_window.refresh( @skill_window.skill, @skill_window.index )
end
#--------------------------------------------------------------------------
# ● 非同伴目标使用物品
#--------------------------------------------------------------------------
def use_skill_nontarget
# 执行对物品的消耗
Window_SNItem.exec_cost(@skill)
# 调用原方法
snitem_use_skill_nontarget
end
end # Scene_Skill
#==============================================================================
# ■ Scene_Battle
#------------------------------------------------------------------------------
# 　处理战斗画面的类。
#=============================================================================
class Scene_Battle < Scene_Base
include FSL::Conf::SNItem
alias snitem_update_skill_selection update_skill_selection
alias snitem_start_skill_selection start_skill_selection
alias snitem_end_skill_selection end_skill_selection
alias snitem_execute_action_skill execute_action_skill
#--------------------------------------------------------------------------
# ● 开始技能选择
#--------------------------------------------------------------------------
def start_skill_selection
snitem_start_skill_selection
# 创建需要道具窗口，并把y坐标上移
@snitem_window = Window_SNItem.new(270,56)
end
#--------------------------------------------------------------------------
# ● 结束技能选择
#--------------------------------------------------------------------------
def end_skill_selection
if @skill_window != nil
@snitem_window.dispose
@snitem_window = nil
end
snitem_end_skill_selection
end
#--------------------------------------------------------------------------
# ● 更新技能选择
#--------------------------------------------------------------------------
def update_skill_selection
# 刷新技能
@snitem_window.refresh( @skill_window.skill, @skill_window.index )
# 调用原方法内容
snitem_update_skill_selection
end
#--------------------------------------------------------------------------
# ● 执行战斗行动：使用技能
#--------------------------------------------------------------------------
def execute_action_skill
# 执行原内容
snitem_execute_action_skill
# 生成skill
skill = @active_battler.action.skill
Window_SNItem.exec_cost( skill )
end
end # Scene_Battle

复制代码

九夜神尊 · 发表于 2010-7-25 08:24:58

LZ要看仔细了，谁说非要占用公共事件槽？
这个公共事件是在判断技能可否使用的时候调用的公共事件，完全是插入到脚本里面。

我想你还真以为我的就是用公共事件实现的，也许是我的表述能力太差
不过还是再请你看一遍我说的，这完全是脚本语句。

在判断技能可否使用，也就是显示这个技能名字的颜色的时候
就要执行一次这个公共事件，这个公共事件在递交了可否使用的同时，也递交了需要的物品
这个公共事件根本不需要放到技能公共事件槽，你要看仔细了，
这只不过是把你本来需要在技能名字后面加逗号以完成技能名字以及消耗物品的方法
搬到了事件上面，这样直观易懂。
如果需要占用公共事件槽，那么我还判断技能ＩＤ做什么。
还是那句话，仔细看，别把我当新手看，说实话，我学RM4年有了，重做一个整的系统没问题。

六祈 · 发表于 2010-7-25 03:21:47

本帖最后由六祈于 2010-7-25 05:40 编辑

回复 DeathKing 的帖子
死君有没有考虑过通过读取已经设定过的Battler_Action来获得已经需要的物品？

通过修改你脚本中Window_SNItem的类方法实现了一下

def self.skill_can_use?(skill,actor_id)
# 如果传递过来的skill为空
return false if skill == nil
# 读取need_item项的参数
need_item = skill.read_notes["need_item"]
# need_item参数为空的话返回true
return true if need_item == nil
# 重新生成参数列表
need_item_clone = []
need_item.each do |e|
need_item_clone << [ e.split(",")[0].to_i , e.split(",")[1].to_i ]
end
need_item = need_item_clone
# 遍历
party_items = Hash.new{0}
$game_party.items.each do |it|
party_items[it.id] = $game_party.item_number(it)
end
unless actor_id == 0
0.upto(actor_id-1) do |ai|
action = $game_party.members[ai].action
next if action.kind != 1
temp_cost = $data_skills[action.skill_id].read_notes["need_item"]
next if temp_cost == nil
temp_cost = temp_cost.collect{|e|[e.split(",")[0].to_i,e.split(",")[1].to_i]}
temp_cost.each do |e|
party_items[e[0]] -= e[1]
end
end
end
need_item.each do |e|
return false if (party_items[e[0]] < e[1])
end
return true
end

复制代码

改变了参数的数量，所以在Game_Actor#skill_can_use?中调用这个类方法时传递self.index过去

class Game_Actor
#--------------------------------------------------------------------------
# ● 可用技能判断
# skill : 技能
#--------------------------------------------------------------------------
def skill_can_use?(skill)
return false unless Window_SNItem.skill_can_use?(skill,self.index)
return false unless skill_learn?(skill)
return true
end
end

复制代码

然后就可以实现如果只有两个物品的话，一号角色和二号角色都使用连续进攻则三号角色不能使用，esc回去改变二号的行动，三号或者四号又可以使用

这只是个基础，还有很多细节需要完善

顺便提一下这个脚本中的bug，原版只要满足第一个物品的条件就返回true了（因为你在循环中就果断的return了一个可真可假的结果- -）

第二个bug：skill_can_use?被你重写之后，不考虑使用场合了。。。连续进攻在菜单里也能使用

DeathKing · 发表于 2010-7-25 02:27:49

回复 九夜神尊 的帖子

事件是完全可能达到的，但是最后能做到的效果全然不在脚本之上。其实这个方法我已经想过了，但是由于非即使的战斗系统那个ESC键很蛋疼，很抽风，没有办法。

当然，也可以Step by Step跟踪按键来统计消耗。

其实仔细想想，用公共事件反而会变得麻烦，由于占用了技能本来还要使用的一个公共事件槽，还要判定技能从而继续执行一个公共事件。同时，只需要极少技能发动消耗物品时完全可以考虑用公共事件，但是，这个数量到达一定程度的时候，整个页面将变得难以阅读和维护，况且全局变量是丑陋的，很难定位，如果真为了“界面”而传递一个值，不如直接交由这个“界面”来完成。

楼上可能有所不知，如果你传递了一个值，而窗口并没有刷新，那么窗口的内容是不会改变的。因此，窗口会先预读你的公共事件（为了获取需要的值），这时候你的公共事件就已经消耗了物品。

所谓的“人性化”是因人而异的，不存在使每个人都感到高兴的方法，能集思广益，当然也是很好的。

九夜神尊 · 发表于 2010-7-25 01:00:57

为LZ提供一个简单的方法吧，虽说我的脚本能力可能不及ＬＺ
但是我的怪方法倒是挺多。

以下是教程

如果是不懂的人，会第一个想到，在公共事件里面设置使用技能以后消耗某某不就可以了么？
当然，你会回答什么我们都清楚。首先就是不能判断物品是否充足。
以及就是你那貌似人性化的界面。

当然，你们后面的谈论，貌似要解决扩充很多很多条件的技能发动
那我就给你们提供一个建议吧
看图片

就这一个简单的方法实现了全域判断技能可否使用，而且使用者也会倍感容易学，冲突自然很少

但是你会想，大概这样就没有你那貌似人性化的界面了，在使用之前就能看到需要哪些物品

那，你在添加一点点脚本

这样就能轻松在脚本里面获得需要的物品，当然你也可以利用获得的这些变量直接在脚本里面判断以减轻
作者的工作量，但是任何条件判断都能使用的优点就……

怎么样解决你说的不是即使战斗导致物品技能提示上的问题，我提供一个协议
你可以参考一下

假设，超级治疗需要回复药6个，简单治疗需要回复药3个
那么LZ担心的是，在战斗中，如果有回复药6个，那就可以选择两个技能了，
如果这两个技能在两个角色上，那么战斗中肯定会出现不理想的事情，没有９个回复药
但是一样两个技能都发动了。或者像LZ那样，直接后面发动的技能就失效

我给的方法是这样的
第一个超级治疗，需要回复药6个，那么选择了超级治疗，就应该在中转站记录了已经
提交了6个回复药的申请，下一个技能如果在需要回复药，就应该在实际物品中
减去这6个回复药，然后在判断。
这样应该比LZ 原来的解决方案要人性化一些呢？

就这些，蛋疼之作

tsy0302 · 发表于 2010-7-24 02:41:58

提示: 作者被禁止或删除内容自动屏蔽

DeathKing · 发表于 2010-7-23 08:33:42

回复 tsy0302 的帖子

http://wiki.pockethouse.com/index.php?title=Main_Page

收录了Yangfly的所有脚本。下面是一个成套的系统。

http://www.pockethouse.com/mambo/Melody_1.00l.zip

tsy0302 · 发表于 2010-7-22 22:32:27

提示: 作者被禁止或删除内容自动屏蔽

DeathKing · 发表于 2010-7-22 10:54:51

本帖最后由 DeathKing 于 2010-7-22 10:56 编辑

我把我发过的脚本删改了下，目前可以实现消耗指定物品/需要指定物品但不消耗/消耗生命(或者%)/金钱，理论上 ...
tsy0302 发表于 2010-7-22 06:15

yangfly的战斗引擎是神物，不只是这个脚本。我完全没有在这个脚本上mod的必要。Yangfly的战斗引擎是即使的，因此对条件的判断也是即使的，所以不会“浪费技能”。

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

[RMVX发布] 【强势更新】技能消耗物品（SkillNeedItem）

点评

点评

贵宾