=begin
■ゲームウインドウ表示倍率変更　RGSS2 DAIpage■ v1.0

●機能と使い方●
スクリプトで、
Graphics.zoom(n)
とするとゲームウインドウがn倍に拡大縮小します。小数指定も可能。

=end
#==============================================================================
# ■ Graphics
#==============================================================================
module Graphics
  module_function
  #--------------------------------------------------------------------------
  # ● ゲームウインドウの倍率
  #--------------------------------------------------------------------------
  def zoom(n)
    w, h = Graphics.width * n, Graphics.height * n
    gsm = Win32API.new("user32", "GetSystemMetrics", "i", "i")
    mw  = Win32API.new("user32", "MoveWindow", "liiiil", "l")
    fw  = Win32API.new("user32", "FindWindowEx", "llpp", "i")
    sw, sh = gsm.call(0), gsm.call(1)
    mw.call(fw.call(0, 0, "RGSS Player", 0), (sw - w) / 2, (sh - h) / 2, w, h, 1)
  end
end