ドリトルでリサージュ図形を描いてみる
psetメソッドを使って円が描ければ、グラフィックのプログラム演習に必ず出てくる、あの有名なリサージュ図形を描くのは簡単だ。ただ、ドリトルの場合の三角関数の単位は度なので、ラジアンから度に変換（ラジアン*180/π）する必要がある。
//psetメソッドでリサージュ図形を描く
描画：pset=[ |x y color size|
ラベル! 作る (size)(size) 大きさ (x)(y) 位置 (color) 色 書く
].
pi=3.14159.
n=0.
[n<800]！の間[
x=200*sin((n/40)*180/pi).
y=150*sin((n/30)*180/pi).
描画! (x)(y)(青)(2) pset.
n=n+1
]実行.
//--------- ここまで ----------
0 Comments:
コメントを投稿
<< Home