Fractal tree: Difference between revisions

(Add Plain English)
Line 856:
<lang>func tree x y deg n . .
if n > 0
linewidthset_linewidth n * 0.4
movemove_pen x y
x += cos deg * n * 1.43 * (randomf + 0.5)
y += sin deg * n * 1.43 * (randomf + 0.5)
linedraw_line x y
call tree x y deg - 20 n - 1
call tree x y deg + 20 n - 1
.
.
call tree 50 90 -90 10</lang>
on mouse_down
clear_screen
call tree 50 90 -90 10
.</lang>
 
=={{header|F_Sharp|F#}}==
2,060

edits