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

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

========================--============
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]]

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