FPS Display Mod RGSS3

module Graphics
  @fps, @fps_tmp = 0, []
  class << self
    attr_reader :fps

    alias fps_update update unless method_defined?(:fps_update)
    def update
      t = Time.now
      fps_update
      @fps_tmp[frame_count % frame_rate] = Time.now != t
      @fps = 0
      frame_rate.times {|i| @fps += 1 if @fps_tmp[i]}
      fps_sprite.src_rect.y = @fps * 16
    end

    def fps_sprite
      if !@fps_sprite or @fps_sprite.disposed?
        @fps_sprite = Sprite.new
        @fps_sprite.z = 0x7FFFFFFF
        @fps_sprite.bitmap = Bitmap.new(24, 16*120)
        @fps_sprite.bitmap.font.name = "Arial"
        @fps_sprite.bitmap.font.size = 16
        @fps_sprite.bitmap.font.color.set(255, 255, 255)
        @fps_sprite.bitmap.fill_rect(@fps_sprite.bitmap.rect, Color.new(0, 0, 0))
        120.times {|i| @fps_sprite.bitmap.draw_text(0, i*16, 24, 16, "% 3d"%i, 1)}
        @fps_sprite.src_rect.height = 16
        @fps_sprite.visible = $TEST || $BTEST
        # Compatibility with mithran script
        @fps_sprite.gobj_exempt if @fps_sprite.respond_to?("gobj_exempt")
      end
      return @fps_sprite
    end
  end
end