Quicksave Script

class Scene_Map
  alias quicksave_update update
  def update
    quicksave_update
    if Input.trigger?(Input::F8) && !$game_player.moving? && @mode.nil?
      pbSave
      @mode = 0
      @vp = Viewport.new(0,0,Graphics.width,Graphics.height)
      @vp.z = 100000
      @disk = Sprite.new(@vp)
      @disk.bitmap = BitmapCache.load_bitmap("Graphics/Pictures/saveDisk")
      @disk.x, @disk.y = 8, 8
      @disk.opacity = 0
      @arrow = Sprite.new(@vp)
      @arrow.bitmap = BitmapCache.load_bitmap("Graphics/Pictures/saveArrow")
      @arrow.x, @arrow.y = 8, -4
      @arrow.opacity = 0
    end
    if @mode == 0
      @disk.opacity += 16
      @mode = 1 if @disk.opacity >= 255
    end
    if @mode == 1
      @arrow.opacity += 16
      @mode = 2 if @arrow.opacity >= 255
    end
    if @mode == 2
      @arrow.y += 1
      @mode = 3 if @arrow.y >= 22
    end
    if @mode == 3
      @arrow.opacity -= 16
      @disk.opacity -= 16
      if @disk.opacity <= 0
        @arrow.dispose
        @disk.dispose
        @vp.dispose
        @mode = nil
      end
    end
  end
end