战斗中的对话选项

uishi121 · 发表于 2021-6-7 19:03:47

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有账号？注册会员

×

请教一下各位大大，
小弟想要做到的效果如下：
「在战斗中出现对话选项，并设定X秒内选择正确的选项，
如果时间内没有选择，就会判定战斗失败」
是否得要用脚本来达成？小弟是脚本白痴，有点困难，
但用纯事件自己搞了很久还是办不到，
逼不得已只好上来求助大大们，还请给小弟一条明路。

guoxiaomi · 发表于 2021-6-7 21:56:35

本帖最后由 guoxiaomi 于 2021-6-7 23:51 编辑

~~只用事件是做不到的，因为并行事件在战斗中不处理~~

……可以在对话前打开计时器，计时器结束的时候战斗会自动结束，然后再判断？

RPGzh500223 · 发表于 2021-6-8 10:34:59

大概写了下，简单的事件测试能用

说明：超时、取消、选择错误选项都执行取消的事件指令
      指定正确的选项索引，单选为数字，多选为数组
      地图、战斗都适用，不影响正常的选择

使用：（中间别加其他指令）
      【脚本】next_timer_choose(*, *)
      【显示选择项】

class Game_Temp
attr_accessor :timer_choosing, :timer_right_option
alias ori_initialize initialize
def initialize
ori_initialize
@timer_choosing = false
@timer_right_option = nil
end
end
class Interpreter
def next_timer_choose(duration, right_index)
@list[@index + 1].parameters[1] = 5
$game_system.timer = duration * Graphics.frame_rate
$game_system.timer_working = true
$game_temp.timer_choosing = true
$game_temp.timer_right_option = right_index
return
end
end
class Window_Message < Window_Selectable
alias ori_terminate_message terminate_message
def terminate_message
ori_terminate_message
if $game_temp.timer_choosing == true
$game_temp.timer_choosing = false
$game_temp.timer_right_option = nil
$game_system.timer_working = false
end
end
def update
super
# 渐变的情况下
if @fade_in
self.contents_opacity += 24
if @input_number_window != nil
@input_number_window.contents_opacity += 24
end
if self.contents_opacity == 255
@fade_in = false
end
return
end
# 输入数值的情况下
if @input_number_window != nil
@input_number_window.update
# 确定
if Input.trigger?(Input::C)
$game_system.se_play($data_system.decision_se)
$game_variables[$game_temp.num_input_variable_id] =
@input_number_window.number
$game_map.need_refresh = true
# 释放输入数值窗口
@input_number_window.dispose
@input_number_window = nil
terminate_message
end
return
end
# 显示信息中的情况下
if @contents_showing
# 如果不是在显示选择项中就显示暂停标志
if $game_temp.choice_max == 0
self.pause = true
end
#—————————————————↓—————————————————————
if $game_temp.timer_choosing == true && $game_system.timer < 1
$game_system.se_play($data_system.cancel_se)
$game_temp.choice_proc.call($game_temp.choice_cancel_type - 1)
terminate_message
return
end
#—————————————————↑—————————————————————
# 取消
if Input.trigger?(Input::B)
if $game_temp.choice_max > 0 and $game_temp.choice_cancel_type > 0
$game_system.se_play($data_system.cancel_se)
$game_temp.choice_proc.call($game_temp.choice_cancel_type - 1)
terminate_message
end
end
# 确定
if Input.trigger?(Input::C)
if $game_temp.choice_max > 0
#—————————————————↓—————————————————————
if $game_temp.timer_choosing == true
judge = case $game_temp.timer_right_option
when Numeric then
$game_temp.timer_right_option == self.index
when Array then
$game_temp.timer_right_option.include?(self.index)
end
if judge == true
$game_system.se_play($data_system.decision_se)
$game_temp.choice_proc.call(self.index)
else
$game_system.se_play($data_system.buzzer_se)
$game_temp.choice_proc.call($game_temp.choice_cancel_type - 1)
end
else
$game_system.se_play($data_system.decision_se)
$game_temp.choice_proc.call(self.index)
end
#—————————————————↑—————————————————————
end
terminate_message
end
return
end
# 在渐变以外的状态下有等待显示的信息与选择项的场合
if @fade_out == false and $game_temp.message_text != nil
@contents_showing = true
$game_temp.message_window_showing = true
reset_window
refresh
Graphics.frame_reset
self.visible = true
self.contents_opacity = 0
if @input_number_window != nil
@input_number_window.contents_opacity = 0
end
@fade_in = true
return
end
# 没有可以显示的信息、但是窗口为可见的情况下
if self.visible
@fade_out = true
self.opacity -= 48
if self.opacity == 0
self.visible = false
@fade_out = false
$game_temp.message_window_showing = false
end
return
end
end
end
# 下面是一个延伸问题，战斗出现选项时FPS骤降
# 暂时解决，但不知会否引出其他bug
class Scene_Battle
def update
# 执行战斗事件中的情况下
if $game_system.battle_interpreter.running?
# 刷新解释器
$game_system.battle_interpreter.update
# 强制行动的战斗者不存在的情况下
if $game_temp.forcing_battler == nil
# 执行战斗事件结束的情况下
unless $game_system.battle_interpreter.running?
# 继续战斗的情况下、再执行战斗事件的设置
unless judge
setup_battle_event
end
end
# 如果不是结束战斗回合的情况下
if @phase != 5
# 刷新状态窗口
# ————————————————————————————————
@status_window.refresh unless $game_temp.message_window_showing
# ————————————————————————————————
end
end
end
# 系统 (计时器)、刷新画面
$game_system.update
$game_screen.update
# 计时器为 0 的情况下
if $game_system.timer_working and $game_system.timer == 0
# 中断战斗
$game_temp.battle_abort = true
end
# 刷新窗口
@help_window.update
@party_command_window.update
@actor_command_window.update
@status_window.update
@message_window.update
# 刷新活动块
@spriteset.update
# 处理过渡中的情况下
if $game_temp.transition_processing
# 清除处理过渡中标志
$game_temp.transition_processing = false
# 执行过渡
if $game_temp.transition_name == ""
Graphics.transition(20)
else
Graphics.transition(40, "Graphics/Transitions/" +
$game_temp.transition_name)
end
end
# 显示信息窗口中的情况下
if $game_temp.message_window_showing
return
end
# 显示效果中的情况下
if @spriteset.effect?
return
end
# 游戏结束的情况下
if $game_temp.gameover
# 切换到游戏结束画面
$scene = Scene_Gameover.new
return
end
# 返回标题画面的情况下
if $game_temp.to_title
# 切换到标题画面
$scene = Scene_Title.new
return
end
# 中断战斗的情况下
if $game_temp.battle_abort
# 还原为战斗前的 BGM
$game_system.bgm_play($game_temp.map_bgm)
# 战斗结束
battle_end(1)
return
end
# 等待中的情况下
if @wait_count > 0
# 减少等待计数
@wait_count -= 1
return
end
# 强制行动的角色存在、
# 并且战斗事件正在执行的情况下
if $game_temp.forcing_battler == nil and
$game_system.battle_interpreter.running?
return
end
# 回合分支
case @phase
when 1 # 自由战斗回合
update_phase1
when 2 # 同伴命令回合
update_phase2
when 3 # 角色命令回合
update_phase3
when 4 # 主回合
update_phase4
when 5 # 战斗结束回合
update_phase5
end
end
end

复制代码

uishi121 · 发表于 2021-6-8 19:31:06

RPGzh500223 发表于 2021-6-8 10:34
大概写了下，简单的事件测试能用

说明：超时、取消、选择错误选项都执行取消的事件指令

谢谢大大！有达到我想要的效果了！
虽然跟Fuki对话框有冲突到 ~ 目前正在疑难排解中！

[已经解决] 战斗中的对话选项

加入我们，或者，欢迎回来。

评分

浏览过的版块

开拓者