revolution at derbrill.de
Sat Feb 13 17:23:43 EST 2010
if there is no grc "output" then
create grc "output"
set the style of it to "curve"
repeat with i=-2*pi to 2*pi step 0.01
put round(item 1 of the loc of this cd+sin(PI+i/2)*200*(1-sin(abs(i)/2.0))*sin(abs(i))) into tX
put round(item 2 of the loc of this cd+10*sqrt(20+200*(1-sin(abs(i)/2.0))*cos((i)))) into tY
put tx,ty&cr after tOutput
set the points of grc "output" to tOutput
More information about the Use-livecode