Fractal tree: Difference between revisions
m
→{{header|D}}
m (→{{header|D}}) |
|||
Line 764:
return result;
}</lang>
=={{header|Easyprog.online}}==
[https://easyprog.online/ide?code=floatvars%0Afunc%20tree%20x%20y%20angle%20depth%20.%20.%0Aif%20depth%20%3E%200%0Axn%20%3D%20x%20%2B%20cos%20angle%20%2A%20depth%20%2A%201.8%0Ayn%20%3D%20y%20%2B%20sin%20angle%20%2A%20depth%20%2A%201.8%0Amove%20x%20y%0Aline%20xn%20yn%0Acall%20tree%20xn%20yn%20angle%20-%2020%20depth%20-%201%0Acall%20tree%20xn%20yn%20angle%20%2B%2020%20depth%20-%201%0A.%0A.%0Acall%20tree%2050%2090%20-90%209 Run it]
<lang easyprog.online>floatvars
func tree x y angle depth . .
if depth > 0
xn = x + cos angle * depth * 1.8
yn = y + sin angle * depth * 1.8
move x y
line xn yn
call tree xn yn angle - 20 depth - 1
call tree xn yn angle + 20 depth - 1
.
.
call tree 50 90 -90 9</lang>
=={{header|F_Sharp|F#}}==
| |||