Re: LOGO-L> MicroWorlds Code Conversion

["Olga Tuzova" <olgatu@ort.spb.ru>]

> Date:          Thu, 15 May 1997 20:05:05 +1030
> From:          Julie Clune <ebony@camtech.net.au>
> To:            JENEVOLD@aol.com
> Cc:            logo-l@gsn.org
> Subject:       LOGO-L> MicroWorlds Code Conversion
> Reply-to:      Julie Clune <ebony@camtech.net.au>

> Dear Keith,
> 
> I would love to try out your Fractal tree, but I can't work out how I
> can  MicroWorldise your Fractal Tree.  What do i do with define?  Do I
> need it?  I don't need for it to stay in a one-liner form.  I would just
> like to see it work.
> 
> Also, what does reset do?  Is there an alternative command in MW I could
> use, or can I do without it?
> 
> Regards
> 
> Julie Clune
> Information Technology Teacher
> Glenelg Inc
> South Australia
> 
> JENEVOLD@aol.com wrote:
> > 
> 
> > Fractal Tree, 21W
> > define "t [[x] [if :x > 1 [t :x*.6 rt 60 t :x*.6 fd :x]]] t 300
> > 

I think the MW many-lines-form of the fractal tree might look like 
this.

to reset
cg pd ht
setpensize 1
setc 9
end

to t :x
if :x < 1 [stop]
t  :x * .6 rt 60
t  :x * .6 fd :x
end

to recurs_tree
reset
t 300
end

Note, reset isn't a comand, it's a procedure.

Good luck,
Olga.
---------------------------------------------------------------
Please post messages to the Logo forum to logo-l@gsn.org.  Mail
questions about the list administration to logofdn@gsn.org.  To
unsubscribe send    unsubscribe logo-l    to majordomo@gsn.org.