Langton's ant: Difference between revisions
m
→{{header|Easyprog.online}}
Line 1,744:
=={{header|Easyprog.online}}==
[https://easyprog.online/ide/run.html?code=len%20f%5B%5D%20100%20%2A%20100%0Afunc%20show%20.%20.%0Acolor%20999%0Amove%200%200%0Arect%20100%20100%0Acolor%20000%0Afor%20r%20range%20100%0Afor%20c%20range%20100%0Aif%20f%5Br%20%2A%20100%20%2B%20c%5D%20%3D%201%0Amove%20c%20r%0Arect%201%201%0A.%0A.%0A.%0A.%0Adx%5B%5D%20%3D%20%5B%200%201%200%20-1%20%5D%0Ady%5B%5D%20%3D%20%5B%20-1%200%201%200%20%5D%0Afunc%20run%20x%20y%20.%20.%0Awhile%20x%20%3E%3D%200%20and%20x%20%3C%20100%20and%20y%20%3E%3D%200%20and%20y%20%3C%20100%0Ab%20%3D%20f%5B100%20%2A%20y%20%2B%20x%5D%0Af%5B100%20%2A%20y%20%2B%20x%5D%20%3D%201%20-%20b%0Ad%20%2B%3D%201%20%2B%202%20%2A%20b%0Ad%20%3D%20d%20mod%204%0Ax%20%2B%3D%20dx%5Bd%5D%0Ay%20%2B%3D%20dy%5Bd%5D%0A.%0A.%0Acall%20run%2070%2040%0Acall%20show Run it]
<lang>len f[] 100 * 100
Line 1,774 ⟶ 1,776:
call run 70 40
call show</lang>
=={{header|EchoLisp}}==
| |||