Langton's ant: Difference between revisions
Content added Content deleted
m (→{{header|Wren}}: Changed to Wren S/H) |
(Added Uiua solution) |
||
| Line 8,931: | Line 8,931: | ||
## ############ # |
## ############ # |
||
</pre> |
</pre> |
||
=={{header|Uiua}}== |
|||
[https://www.uiua.org/pad?src=0_12_0-dev_1__IyBEcmF3IExhbmd0b24ncyBBbnQuCgpOIOKGkCAxMDAKIyBpbml0aWFsaXNlIGRpciBwb3MgbWFwClvCrzEgMF0gWzUwIDUwXSDihq9OX04gMQojIFJ1biB1bnRpbCBvdXQgb2YgYm91bmRzCuKXjOKXjOKNoigKICDiipko4p-cKOKNnOKKoSgtOjEpKSkKICDin6jijZwo4oqhMXzCrynih4x84oeM4o2cKOKKoTF8wq8p4p-pOuKKmSjiiqEsLCkKICDin5wrCnwg4omlMOKLhS_ihqcKKQo= Run it in Uiua Pad!] |
|||
<syntaxhighlight lang="Uiua"> |
|||
# Draw Langton's Ant. |
|||
N ← 100 |
|||
# initialise dir pos map |
|||
[¯1 0] [50 50] ↯N_N 1 |
|||
# Run until out of bounds |
|||
◌◌⍢( |
|||
⊙(⟜(⍜⊡(-:1))) |
|||
⟨⍜(⊡1|¯)⇌|⇌⍜(⊡1|¯)⟩:⊙(⊡,,) |
|||
⟜+ |
|||
| ≥0⋅/↧ |
|||
) |
|||
</syntaxhighlight> |
|||
{{out}} |
|||
[[File:Uiua Langton's Ant.png|thumb|center]] |
|||
=={{header|VBA}}== |
=={{header|VBA}}== |
||