900*600の画像をgzoomを用いて縦横比を保持したまま拡大(縮小)したいのですが
下記のような感じだと、当然比率が変わってしまいます。
どの様にすればよろしいでしょうか。
repeat
redraw 0
//矢印で増加を取得
stick a,3,1 ;1+2
s=""
if a&1 : s=-1
if a&2 : s=1
xwid = xwid+s
ywid = ywid+s
//gzoomで拡大
gzoom 900+xwid,600+ywid,1,0,0,900,600,1
~~~~~↓~~~~~~~~~~~~~
ここが変?
redraw 1
loop
よろしくお願いします。