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

This is a multi-part message in MIME format.

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

Hi,

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).

Regards,

[[Yehuda]]

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

<encoded_portion_removed>
vMeR4mOAHMgV4I2CXMg8VmOITGMRAAA7
--------------37CD2E1A5E45--

---------------------------------------------------------------





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

Quote:

> 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
end

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

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
end

to turn_ang
op(360/:points+:cute_ang)/2
end
======================================

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.

Regards...

[[Yehuda]]

---------------------------------------------------------------





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