II的代码仓库

这个脚本用于在VX上动态显示存档窗体。

MINUS = 32
STEPS = 2
class Scene_File
  alias fxxx_create create_savefile_windows
  def create_savefile_windows
    fxxx_create
    @savefile_windows[1].height -= MINUS
    @savefile_windows[2].height -= MINUS
    @savefile_windows[3].height -= MINUS
    @savefile_windows[1].y -= MINUS * 0
    @savefile_windows[2].y -= MINUS * 1
    @savefile_windows[3].y -= MINUS * 2
    @savefile_windows[1].follow = @savefile_windows[0]
    @savefile_windows[2].follow = @savefile_windows[1]
    @savefile_windows[3].follow = @savefile_windows[2]
  end
  def cursor_down(wrap)
    last = @savefile_windows[@index]
    if @index < @item_max - 1 or wrap
      @index = (@index + 1) % @item_max
    end
    now = @savefile_windows[@index]
    for i in 0..MINUS / STEPS
      last.height -= STEPS
      now.height  += STEPS
      @savefile_windows[1].update
      @savefile_windows[2].update
      @savefile_windows[3].update
      Graphics.update
    end
  end
  def cursor_up(wrap)
    last = @savefile_windows[@index]
    if @index > 0 or wrap
      @index = (@index - 1 + @item_max) % @item_max
    end
    now = @savefile_windows[@index]
    for i in 0..MINUS / STEPS
      last.height -= STEPS
      now.height  += STEPS
      @savefile_windows[1].update
      @savefile_windows[2].update
      @savefile_windows[3].update
      Graphics.update
    end
  end
end

class Window_SaveFile
  attr_accessor :follow
  alias fxxx_update update
  def update
    fxxx_update
    if @follow != nil
      self.y = @follow.y + @follow.height
    end
  end
end