Decoration (fractal)

Help Contents Examples Decoration (fractal)
Cubic (3d fractal) DNA (3d)

Decoration (fractal)

Example: Decoration.eli Modified: February 17, 2001 Version: 2.0 Author: Pavel Boychev E-mail: pavel@elica.net

Copyright © 2001 Elica Group

This recursion example will draw an L-system fractal based on a varied the Koch curve.

run "geomland
run "turtle

to requ :len
	if :len<1
	[
		forward :len
	]
	[
		requ :len/2
		make local "boo
		if (random) < 0.5 [make "boo 1] [make "boo -1]

		left :boo*60
		requ :len/3
		make local "zoo
		make "zoo random 120
		right :boo * :zoo
		color lime
		forward 14
		back 14
		color green
		right :boo * (120-:zoo)
		requ :len/3
		left :boo*60
		requ :len/3
	]
end

hide
penup
back 175
pendown
color green

repeat 3 
[
	requ 50
	right 120
	requ 50
	right 120
	requ 50
]

Cubic (3d fractal) DNA (3d)