昨日、ロゴについて知りました。90年代に生まれた私は、これまで出会ったことがありませんでした。そこで、Joshua Bell が作成したオンラインのLogo Interpretercircle
を使い始め、同心円を作成する関数を作成することにしました。これは私が書いたものです:
cs
to circle
penup forward :radius right 90
pendown repeat 360 [forward 3.14 * :radius / 180 right 1]
penup left 90 back :radius pendown
end
make "radius 30
repeat 160 [circle make "radius :radius + 30]
興味深いことに、描画キャンバスはトロイダル配列です。したがって、円は重なり合ってしまいます。30 の倍数で半径を増やして 160 個の同心円を描くと、次のようなイメージが得られました。
これは本当に驚くべきことです。一見、本物の夜空の絵のように見えて、星空を描く一般的なアルゴリズムはあるのだろうかと考えさせられました。
ところで、よく見ると、30 x 30
ピクセルの正方形のグリッドが見えます。境界が黒いので少しわかりにくいです。