Differences

This shows you the differences between two versions of the page.

--- graphicsimagejkspirro [2016/01/01 22:37]
+++ graphicsimagejkspirro [2020/02/28 10:46] (current)
@@ Line 1: / Line 1: @@
+{{:en:kahn_joel_round_spiral.png?200|}}
+Round Spiral by Joel Kahn  (June 2010)
+<code>
+# Contributed by Joel Kahn
+fastgraphics
+cls
+clg
+r=0:g=0:b=0
+x=250.0:y=250.0
+m=1.0
+graphsize 500, 500
+while x>0.0 and x<500.0 and y>0.0 and y<500.0
+   m=m+4.0/m
+   x=x+cos(m)
+   y=y+sin(m)
+   r=r+1
+   if r>255 then
+      r=1
+      g=g+1
+   end if
+   if g>255 then
+      g=1
+      b=b+1
+   end if
+   color r, g, b
+   plot x,y
+end while
+refresh
+</code>

DokuWiki