如何让横向排列的多个选择项可以循环

rt6543ew

就是光标停留在最后一个选择项时再按右键可以回到第一个选择项

酋长的图腾

将下面脚本插入Main之前、Window_Selectable之后即可。

RUBY 代码复制

#==============================================================================
# ■ Window_Selectable
#------------------------------------------------------------------------------
# 　拥有光标的移动以及滚动功能的窗口类。
#==============================================================================
 
class Window_Selectable < Window_Base
  #--------------------------------------------------------------------------
  # ● 刷新画面
  #--------------------------------------------------------------------------
  def update
    super
    # 可以移动光标的情况下
    if self.active and @item_max > 0 and @index >= 0
      # 方向键下被按下的情况下
      if Input.repeat?(Input::DOWN)
        # 列数不是 1 并且方向键的下的按下状态不是重复的情况、
        # 或光标位置在(项目数-列数)之前的情况下
        if (@column_max == 1 and Input.trigger?(Input::DOWN)) or
           @index < @item_max - @column_max
          # 光标向下移动
          $game_system.se_play($data_system.cursor_se)
          @index = (@index + @column_max) % @item_max
        end
      end
      # 方向键上被按下的情况下
      if Input.repeat?(Input::UP)
        # 列数不是 1 并且方向键的下的按下状态不是重复的情况、
        # 或光标位置在列之后的情况下
        if (@column_max == 1 and Input.trigger?(Input::UP)) or
           @index >= @column_max
          # 光标向上移动
          $game_system.se_play($data_system.cursor_se)
          @index = (@index - @column_max + @item_max) % @item_max
        end
      end
      # 方向键右被按下的情况下
      if Input.repeat?(Input::RIGHT)
        # 列数为 2 以上并且、光标位置在(项目数 - 1)之前的情况下
        if @column_max >= 2 and @index < @item_max - 1
          # 光标向右移动
          $game_system.se_play($data_system.cursor_se)
          @index += 1
        #===================
        elsif @column_max >= 2 and @index + 1 == @item_max 
          @index = 0
        end
        #===================
      end
      # 方向键左被按下的情况下
      if Input.repeat?(Input::LEFT)
        # 列数为 2 以上并且、光标位置在 0 之后的情况下
        if @column_max >= 2 and @index > 0
          # 光标向左移动
          $game_system.se_play($data_system.cursor_se)
          @index -= 1
        end
      end
      # R 键被按下的情况下
      if Input.repeat?(Input::R)
        # 显示的最后行在数据中最后行上方的情况下
        if self.top_row + (self.page_row_max - 1) < (self.row_max - 1)
          # 光标向后移动一页
          $game_system.se_play($data_system.cursor_se)
          @index = [@index + self.page_item_max, @item_max - 1].min
          self.top_row += self.page_row_max
        end
      end
      # L 键被按下的情况下
      if Input.repeat?(Input::L)
        # 显示的开头行在位置 0 之后的情况下
        if self.top_row > 0
          # 光标向前移动一页
          $game_system.se_play($data_system.cursor_se)
          @index = [@index - self.page_item_max, 0].max
          self.top_row -= self.page_row_max
        end
      end
    end
    # 刷新帮助文本 (update_help 定义了继承目标)
    if self.active and @help_window != nil
      update_help
    end
    # 刷新光标矩形
    update_cursor_rect
  end
end

#==============================================================================


# ■ Window_Selectable


#------------------------------------------------------------------------------


# 　拥有光标的移动以及滚动功能的窗口类。


#==============================================================================


 


class Window_Selectable < Window_Base


  #--------------------------------------------------------------------------


  # ● 刷新画面


  #--------------------------------------------------------------------------


  def update


    super


    # 可以移动光标的情况下


    if self.active and @item_max > 0 and @index >= 0


      # 方向键下被按下的情况下


      if Input.repeat?(Input::DOWN)


        # 列数不是 1 并且方向键的下的按下状态不是重复的情况、


        # 或光标位置在(项目数-列数)之前的情况下


        if (@column_max == 1 and Input.trigger?(Input::DOWN)) or


           @index < @item_max - @column_max


          # 光标向下移动


          $game_system.se_play($data_system.cursor_se)


          @index = (@index + @column_max) % @item_max


        end


      end


      # 方向键上被按下的情况下


      if Input.repeat?(Input::UP)


        # 列数不是 1 并且方向键的下的按下状态不是重复的情况、


        # 或光标位置在列之后的情况下


        if (@column_max == 1 and Input.trigger?(Input::UP)) or


           @index >= @column_max


          # 光标向上移动


          $game_system.se_play($data_system.cursor_se)


          @index = (@index - @column_max + @item_max) % @item_max


        end


      end


      # 方向键右被按下的情况下


      if Input.repeat?(Input::RIGHT)


        # 列数为 2 以上并且、光标位置在(项目数 - 1)之前的情况下


        if @column_max >= 2 and @index < @item_max - 1


          # 光标向右移动


          $game_system.se_play($data_system.cursor_se)


          @index += 1


        #===================


        elsif @column_max >= 2 and @index + 1 == @item_max 


          @index = 0


        end


        #===================


      end


      # 方向键左被按下的情况下


      if Input.repeat?(Input::LEFT)


        # 列数为 2 以上并且、光标位置在 0 之后的情况下


        if @column_max >= 2 and @index > 0


          # 光标向左移动


          $game_system.se_play($data_system.cursor_se)


          @index -= 1


        end


      end


      # R 键被按下的情况下


      if Input.repeat?(Input::R)


        # 显示的最后行在数据中最后行上方的情况下


        if self.top_row + (self.page_row_max - 1) < (self.row_max - 1)


          # 光标向后移动一页


          $game_system.se_play($data_system.cursor_se)


          @index = [@index + self.page_item_max, @item_max - 1].min


          self.top_row += self.page_row_max


        end


      end


      # L 键被按下的情况下


      if Input.repeat?(Input::L)


        # 显示的开头行在位置 0 之后的情况下


        if self.top_row > 0


          # 光标向前移动一页


          $game_system.se_play($data_system.cursor_se)


          @index = [@index - self.page_item_max, 0].max


          self.top_row -= self.page_row_max


        end


      end


    end


    # 刷新帮助文本 (update_help 定义了继承目标)


    if self.active and @help_window != nil


      update_help


    end


    # 刷新光标矩形


    update_cursor_rect


  end


end