Feb 14th

[J. Landman Gay]

Malte Pfaff-Brill wrote:
> on mouseUp
>    local tX,tY,tOutput
>    if there is no grc "output" then 
>       create grc "output"
>       set the style of it to "curve"
>    end if
>    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
>    end repeat
>    set the points of grc "output" to tOutput
> end mouseUp

How do you DO that? I can hardly add.

Lovely, Malte.

-- 
Jacqueline Landman Gay         |     jacque at hyperactivesw.com
HyperActive Software           |     http://www.hyperactivesw.com