ビットマップ,マーク,フォントの移動によるアニメーションの例です。
起動 すると番号の入力を要求されますので 1~3 の数をキーボード から入力してください。1 の場合はビットマップ・ファイルから図形を読み込みます。 2 を入力すると円マークが選択されます。3 の場合には回転する記号が選ばれます。 番号を入力したら,グラフィクス・ウィンドウ内でマウスをドラッグしてください。 対応する初速度で選ばれた図形が打ち出されます。終了するにはウィンドウ内で左ボ タンをクリックしてください。
ビットマップ,マーク,フォントの出力例(画像をクリックすると出力時の大きさになります):
|
|
|
bounce.f ( 3,596 バイト ) で使われている GrWin ルーチン :
GWANCHOR GWCAPLIN GWFLUSH GWFNT2BMP GWGETBMP GWGETTXT GWINDOW GWKYBRD GWLDCSIZ GWLINE GWLOADBMP GWMOUSE GWOPEN GWPUTBMP GWPUTMRK GWQUIT GWRECT GWSETBMP GWSETMRK GWSETOGN GWSETPEN GWSETTXT GWSIZE GWSLEEP GWVWMODCreated: Mon Jul 21 23:03:52 JST 2003