Project1

标题: 同一地图既有并行处理移动又有移动事件会有时卡一段 [打印本页]

---

作者: 89444640    时间: 2017-1-11 15:51
标题: 同一地图既有并行处理移动又有移动事件会有时卡一段
如例所示
Project3.rar (187.35 KB, 下载次数: 64)

2017-1-11 15:51 上传

点击文件名下载附件

在地图中存在并行处理的复杂移动事件
然后在与其他npc对话 npc执行移动等待之类时候，会出现卡住一小段时间，感觉应该是并行处理的等待与执行当前事件移动的等待冲突了吧？
这个有方法解决吗？或者一个地图只能有一个并行处理的移动事件？

---

作者: Mr.Jin    时间: 2017-1-11 21:29

RUBY 代码复制

class Interpreter
  def update
    # 初始化循环计数
    @loop_count = 0
    # 循环
    loop do
      # 循环计数加 1
      @loop_count += 1
      # 如果执行了 100 个事件指令
      if @loop_count > 100
        # 为了防止系统崩溃、调用 Graphics.update
        Graphics.update
        @loop_count = 0
      end
      # 如果地图与事件启动有差异
      if $game_map.map_id != @map_id
        # 事件 ID 设置为 0
        @event_id = 0
      end
      # 子注释器存在的情况下
      if @child_interpreter != nil
        # 刷新子注释器
        @child_interpreter.update
        # 子注释器执行结束的情况下
        unless @child_interpreter.running?
          # 删除字注释器
          @child_interpreter = nil
        end
        # 如果子注释器还存在
        if @child_interpreter != nil
          return
        end
      end
      # 信息结束待机的情况下
      if @message_waiting
        return
      end
      # 移动结束待机的情况下
      if @moving_character != nil           # 等待移动结束
        if @moving_character.move_route_forcing
          return
        end
        @moving_character = nil
      end
      # 输入按钮待机中的情况下
      if @button_input_variable_id > 0
        # 执行按钮输入处理
        input_button
        return
      end
      # 等待中的情况下
      if @wait_count > 0
        # 减少等待计数
        @wait_count -= 1
        return
      end
      # 如果被强制行动的战斗者存在
      if $game_temp.forcing_battler != nil
        return
      end
      # 如果各画面的调用标志已经被设置
      if $game_temp.battle_calling or
         $game_temp.shop_calling or
         $game_temp.name_calling or
         $game_temp.menu_calling or
         $game_temp.save_calling or
         $game_temp.gameover
        return
      end
      # 执行内容列表为空的情况下
      if @list == nil
        # 主地图事件的情况下
        if @main
          # 设置启动中的事件
          setup_starting_event
        end
        # 什么都没有设置的情况下
        if @list == nil
          return
        end
      end
      # 尝试执行事件列表、返回值为 false 的情况下
      if execute_command == false
        return
      end
      # 推进索引
      @index += 1
    end
  end
  def command_209
    # 获取角色
    @character = get_character(@parameters[0])
    # 角色不存在的情况下
    if @character == nil
      # 继续
      return true
    end
    # 强制移动路线
    @character.force_move_route(@parameters[1])
    # 继续
    return true
  end
  def command_210
    # 如果不在战斗中
    unless $game_temp.in_battle
      @moving_character = @character
    end
    # 继续
    return true
  end
end

class Interpreter


  def update


    # 初始化循环计数


    @loop_count = 0


    # 循环


    loop do


      # 循环计数加 1


      @loop_count += 1


      # 如果执行了 100 个事件指令


      if @loop_count > 100


        # 为了防止系统崩溃、调用 Graphics.update


        Graphics.update


        @loop_count = 0


      end


      # 如果地图与事件启动有差异


      if $game_map.map_id != @map_id


        # 事件 ID 设置为 0


        @event_id = 0


      end


      # 子注释器存在的情况下


      if @child_interpreter != nil


        # 刷新子注释器


        @child_interpreter.update


        # 子注释器执行结束的情况下


        unless @child_interpreter.running?


          # 删除字注释器


          @child_interpreter = nil


        end


        # 如果子注释器还存在


        if @child_interpreter != nil


          return


        end


      end


      # 信息结束待机的情况下


      if @message_waiting


        return


      end


      # 移动结束待机的情况下


      if @moving_character != nil           # 等待移动结束


        if @moving_character.move_route_forcing


          return


        end


        @moving_character = nil


      end


      # 输入按钮待机中的情况下


      if @button_input_variable_id > 0


        # 执行按钮输入处理


        input_button


        return


      end


      # 等待中的情况下


      if @wait_count > 0


        # 减少等待计数


        @wait_count -= 1


        return


      end


      # 如果被强制行动的战斗者存在


      if $game_temp.forcing_battler != nil


        return


      end


      # 如果各画面的调用标志已经被设置


      if $game_temp.battle_calling or


         $game_temp.shop_calling or


         $game_temp.name_calling or


         $game_temp.menu_calling or


         $game_temp.save_calling or


         $game_temp.gameover


        return


      end


      # 执行内容列表为空的情况下


      if @list == nil


        # 主地图事件的情况下


        if @main


          # 设置启动中的事件


          setup_starting_event


        end


        # 什么都没有设置的情况下


        if @list == nil


          return


        end


      end


      # 尝试执行事件列表、返回值为 false 的情况下


      if execute_command == false


        return


      end


      # 推进索引


      @index += 1


    end


  end


  def command_209


    # 获取角色


    @character = get_character(@parameters[0])


    # 角色不存在的情况下


    if @character == nil


      # 继续


      return true


    end


    # 强制移动路线


    @character.force_move_route(@parameters[1])


    # 继续


    return true


  end


  def command_210


    # 如果不在战斗中


    unless $game_temp.in_battle


      @moving_character = @character


    end


    # 继续


    return true


  end


end

RGSS1对Interpreter的设计还不是很成熟,
我按照RGSS2的写法做了一些修改,
你可以粘贴到原工程的Main脚本页上方试一试。

也可以直接下载这个工程：
Project3改.zip (202.28 KB, 下载次数: 75)

2017-1-11 21:31 上传

点击文件名下载附件

---

作者: 89444640    时间: 2017-1-12 08:16


非常感谢，导入工程测试也正常。
希望不会产生冲突~

20190920补充：自我提醒作用
使用本脚本后，会造成有多个事件或者npc移动时候，等待移动结束以最靠近等待移动结束的事件为基准进行等待，而不是默认的以移动最长的事件进行等待，
因此就是说：

#等待移动结束是以"最后的移动事件" 为基准
#有多个移动路线的情况，把续时间最长的放在最下面

只要不是只有一个npc在执行动作，一定要注意让时间最长的在下面，否则需要进行麻烦的测试，然后再最后一个事件补上等待XX帧。

---

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

Powered by Discuz! X3.1