いいですね!! 162 行の下に option defint と書くとちょっと速くなります。 rgb(0,255,0) の代わりに #lime を使うとかなり速くなります。 同様に rgb(255,0,0) の代わりに #red を使うとかなり速くなります。 print 4*c/10000000 は print format$("%.15f", 4*c/10000000) の方が小数点以下の桁数が多く表示できます。