LOGO-L> Recursive Stars 
Author Message
 LOGO-L> Recursive Stars

This is a multi-part message in MIME format.

Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit


The attached images of fractalic-nature stars were all created by the
same Logo program. It asks 3 inputs: The cute angle of the star, its
side's size and the level (depth) of the output.

You might want to know that this sort of things we investigate and then
reproduce in the Recursive Graphics course at the Beit Berl college. You
can try yourself reproduce them (in color they are real eye catchers).



Content-Type: image/gif; name="stars.gif"
Content-Transfer-Encoding: base64
Content-Disposition: inline; filename="stars.gif"



Wed, 17 May 2000 03:00:00 GMT  
 LOGO-L> Recursive Stars


> Hi Yehuda,
> could you please send me the code for the recursive stars. It looks ideal for
> MicroWorlds using sliders as variable inputs. I will publish my results on the
> web so that you can play with it. I will even include credits to you.
> Thanks,
> Ray

Here it is:

to main          ; Stars, Nov 30, 1997
cs ht
pr[Input number of points, cute
                angle, size and level]
do rw rw rw rw

to do :points :cute_ang :size :level
if :level<1[stop]
rt 180
repeat :points[shape rt turn_ang]
rt 180

to shape
rt turn_ang fd :size lt :cute_ang/2
do :points :cute_ang .4*:size :level-1
lt :cute_ang/2
bk :size

to turn_ang

Try it with inputs like:

        5 30 70 4
        6 25 60 3

I believe that the program will run as-is on any Logo version.




Thu, 18 May 2000 03:00:00 GMT  
 [ 2 post ] 

 Relevant Pages 

1. LOGO-L> Re: Recursive Stars

2. LOGO-L> Recursive Stars

3. LOGO-L> beta version star-logo

4. LOGO-L> Re: Christmas Stars

5. LOGO-L> Christmas Stars

6. LOGO-L> Christmas stars

7. LOGO-L> stars

8. LOGO-L> Re: Poly Star

9. LOGO-L> star box

10. LOGO-L> davi's star

11. LOGO-L> David's Star

12. LOGO-L> davi's star again


Powered by phpBB® Forum Software