HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2012
0124
深沢gzoomについて3解決


深沢

リンク

2012/1/24(Tue) 08:39:21|NO.44510

こんにちは。
HSPはかなり昔から使っているのですが、gzoom の使い方がわかりません。
お手数ですが、中央にある画像をまっすぐアップさせてくるソースを
上げてもらえないでしょうか。
どうぞよろしくお願い致します。



この記事に返信する


杉村祐介

リンク

2012/1/24(Tue) 10:07:07|NO.44513

mes "あ"
repeat redraw 1:await 10:redraw 0 gzoom 16+cnt,16+cnt,0,0,0,16,16 loop

こんな感じですか?
どうしても中心からでないとというなら、
celputの方がやりやすいかも。

buffer 1,16,16
mes "あ" celdiv 1,16,16,8,8 ; gsel 0 repeat redraw 1:await 10:redraw 0 pos 250,250 celput 1,0,(0.1*cnt),(0.1*cnt) loop



あり

リンク

2012/1/24(Tue) 10:52:03|NO.44517

gzoomでコピーした画像の中心はカレントポジションに
表示するサイズの半分の値を足した位置なので
中心にしたい座標から表示サイズの半分を引いた値が
表示する座標になります。

screen 1 circle 0, 0, 100, 100 ; 100x100の円を描く zx = 10 ; 最初に表示するXサイズ zy = 10 ; 最初に表示するYサイズ gsel 0, 1 repeat cx = 320 - zx / 2 ; 表示するX座標 cy = 240 - zy / 2 ; 表示するY座標 pos cx , cy gzoom zx, zy, 1, 0, 0, 100, 100 zx + 2 ; 表示サイズを増やす際に値が奇数だと zy + 2 ; 小数点切捨ての誤差が出てぶれる title "表示座標X=" + cx + " 表示座標Y=" + cy await 33 if cy <= 0 : break ; 画面一杯に拡大したら終了 loop



深沢

リンク

2012/1/24(Tue) 13:39:27|NO.44520

おお!できました!
大変お世話になりました。
ありがとうございました。



ONION software Copyright 1997-2021(c) All rights reserved.