=begin
===============================================================================
伪-横向翻页的状态窗口 By喵呜喵5
===============================================================================
【说明】
将打开菜单后右侧显示人物状态的窗口修改成了横向翻页的模式
因为修改的方式相当投机取巧,所以有一个小BUG:
这个状态窗口不会显示翻页的光标
=end
$m5script = {} if $m5script.nil?
$m5script["M5HorzMenuStatus"] = true
#==============================================================================
# 脚本部分
#==============================================================================
class Window_MenuStatus < Window_Selectable
alias m5_2013_1120_initialize initialize
def initialize(x, y)
m5_2013_1120_initialize(x, y)
self.arrows_visible = false
end
def process_cursor_move
return unless cursor_movable?
last_index = @index
cursor_down (Input.trigger?(:DOWN)) if Input.repeat?(:DOWN) and cursor_can_down?
cursor_up (Input.trigger?(:UP)) if Input.repeat?(:UP) and cursor_can_up?
cursor_pagedown if Input.repeat?(:RIGHT)
cursor_pageup if Input.repeat?(:LEFT)
Sound.play_cursor if @index != last_index
end
def cursor_can_up?
row != self.top_row
end
def cursor_can_down?
row != self.bottom_row
end
end