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


HSPTV!掲示板


未解決 解決 停止 削除要請

2007
0129
T.U.曲線を含む幾何学図形の描画3解決


T.U.

リンク

2007/1/29(Mon) 17:16:34|NO.5296

始めまして。ただ今、HSPにて単純な幾何学模様を呈示する視覚実験
を計画しております。そこで、色々多角形を描画しております。
下記のサイトを参考にさせていただきまして、直線の集まりから
成る多角形は描画することができました。
pal_DrawPolygon int,int を用いました。

http://www.vector.co.jp/soft/win95/prog/se209258.html

ここでお聞きしたいのですが、曲線を含む場合にはどのように
したらよいでしょうか?書きたい図形は二つございます。

一つは、上手くいえないのですが、「風になびいているような正方形」
でして、Wordで、「オートシェイプ」→「星とリボン」を開きまして、
一番下の行の右から二つ目にある図形でございます。
40*40の正方形に上手く収まるように書きたいです。

もう一つは、「アーチ型」でございます。
Wordで、「オートシェイプ」→「ブロック矢印」を開きまして
、一番右下にある矢印図形のうち、先の△部分をとった図形です。
これも、同じ大きさに描きたいです。

どちらも、中を塗りつぶしたものと、塗りつぶさず外枠のみを描く
ものとの、二通りを描きたいです。
単に教えてくださいませという情けない質問で申し訳ございません。
どなたか教えてくださいましたら幸いでございます。



この記事に返信する


GENKI

リンク

2007/1/29(Mon) 23:49:22|NO.5304

> でして、Wordで、「オートシェイプ」→「星とリボン」を開きまして、
> 一番下の行の右から二つ目にある図形でございます。

 サインカーブっぽいけどサインカーブじゃないですね。
サインカーブでもおおよそ似た感じになります。


 ということで塗りつぶさないのはこんな感じ。

;アーチ cx = 100 cy = 100 r = 100 circle cx-r, cy-r, cx+r, cy+r, 0 r = 80 circle cx-r, cy-r, cx+r, cy+r, 0 color 255,255,255 boxf cx-100,cy,cx+100,cy+100 ;sinカーブ color cx = 100 cy = 300 x = 0.0 repeat 360 x0 = x : y0 = y y = sin(x/180*3.1415)*100 pset x+cx, y+cy line x0+cx, y0+cy, x+cx, y+cy x++ loop
 塗りつぶす場合は、アーチならcircle命令の塗りつぶしを使って塗りつぶす。
サインカーブはlineで塗っていく。といのが手かな。
実際に使うときは作業用ウィンドウで作図してgcopyするといいと思います。


WinAPIを探せばもっといい命令あるかもしれませんね。



T.U.

リンク

2007/1/30(Tue) 06:10:49|NO.5306

GENKI様

迅速なるご回答頂きまして、本当にありがとうございました。
試してみまして、うまくいきました。
御世話になりました。



kz3

リンク

2007/1/30(Tue) 15:25:57|NO.5309

マルチポスト先の投稿を始末してください。



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