Chaos game: Difference between revisions
m
→{{header|Common Lisp}}
m (→{{header|REXX}}: re-aligned statements and added whitespace., added wording to the output section about a BIF.) |
|||
Line 371:
(values 255 0 0)))
(write-png-file "chaos.png" image)))</lang>
=={{header|Easyprog.online}}==
[https://easyprog.online/ide/run.html?code=floatvars%0Acolor%20900%0Ax%5B%5D%20%3D%20%5B%200%20100%2050%20%5D%0Ay%5B%5D%20%3D%20%5B%2093%2093%207%20%5D%0Ax%20%3D%20randomf%20%2A%20100%0Ay%20%3D%20randomf%20%2A%20100%0Afor%20i%25%20range%20100000%0Amove%20x%20y%0Arect%200.3%200.3%0Ah%25%20%3D%20random%203%0Ax%20%3D%20%28x%20%2B%20x%5Bh%25%5D%29%20/%202%0Ay%20%3D%20%28y%20%2B%20y%5Bh%25%5D%29%20/%202%0A. Run it]
<lang>floatvars
color 900
x[] = [ 0 100 50 ]
y[] = [ 93 93 7 ]
x = randomf * 100
y = randomf * 100
for i% range 100000
move x y
rect 0.3 0.3
h% = random 3
x = (x + x[h%]) / 2
y = (y + y[h%]) / 2
.</lang>
=={{header|Go}}==
| |||