Rosetta Code

Langton's ant: Difference between revisions

Page Discussion

Langton's ant (view source)

Revision as of 18:16, 31 August 2022

2,914 bytes added ,  1 year ago
→‎{{header|APL}}: Correct coordinate chirality
(→‎{{header|APL}}: Add implementation)
(→‎{{header|APL}}: Correct coordinate chirality)
Line 507:
dir←1+4|dir+2×grid[⊂ant]
grid[⊂ant]←1-grid[⊂ant]
⍝ coordinates are matrix order: row,col. So up is -1 0, right is 0 1, down is 1 0, and left is 0 -1
ant+←(4 2⍴0 2⍴¯1 1 0 0 1 ¯1 0 0 ¯1)[dir;]
grid ant dir
}
Line 514 ⟶ 515:
 
{{Out}}
The final contents of <tt>pic</tt> (eliding leading and trailing blank lines)
<pre>.......................⌺⌺.⌺.⌺.........................⌺⌺..⌺⌺⌺⌺⌺⌺⌺⌺⌺⌺⌺⌺..⌺⌺..........................................
......................⌺.⌺⌺⌺.⌺⌺...............⌺⌺..⌺..........⌺⌺⌺⌺..⌺.........................................
.....................⌺⌺⌺⌺...⌺.⌺.............⌺.⌺⌺............⌺⌺...⌺⌺⌺........................................
.....................⌺⌺⌺⌺⌺.⌺..⌺⌺............⌺....⌺..⌺.........⌺..⌺.⌺........................................
......................⌺...⌺⌺.⌺⌺.⌺...........⌺.......⌺⌺⌺.........⌺.⌺.⌺⌺..⌺⌺....................................
.......................⌺⌺⌺...⌺..⌺⌺..............⌺⌺⌺..⌺⌺.⌺⌺.....⌺.....⌺...⌺..⌺.⌺⌺⌺.................................
........................⌺...⌺⌺.⌺⌺.⌺...............⌺⌺..⌺⌺.⌺..⌺.⌺...⌺⌺.⌺⌺⌺⌺.⌺⌺..⌺⌺⌺..⌺.⌺..................................
.........................⌺⌺⌺...⌺..⌺⌺.............⌺⌺⌺...⌺⌺⌺.....⌺.⌺.⌺⌺⌺..⌺⌺.⌺..⌺⌺.⌺⌺⌺.⌺..................................
..........................⌺..⌺.⌺⌺⌺.⌺⌺.⌺.⌺⌺⌺...⌺..⌺⌺⌺⌺..⌺.⌺.⌺⌺⌺⌺⌺...⌺.....⌺.............................................
...........................⌺⌺⌺...⌺..⌺⌺...................⌺.⌺⌺⌺.⌺.⌺⌺⌺⌺⌺⌺.⌺⌺.⌺⌺..⌺⌺⌺⌺.⌺...⌺⌺.⌺⌺⌺...............................
............................⌺...⌺⌺.⌺⌺⌺⌺⌺.⌺..................⌺⌺⌺⌺⌺...⌺.⌺⌺.⌺⌺.⌺⌺.⌺.⌺.⌺⌺.⌺.⌺⌺⌺.⌺...............................
...........................⌺⌺..⌺⌺⌺...⌺..⌺⌺..........⌺⌺⌺⌺..⌺.⌺...⌺...⌺⌺⌺.⌺⌺.⌺...⌺.⌺...................................
..........................⌺⌺.....⌺...⌺⌺.⌺⌺.⌺..........⌺⌺..⌺...⌺⌺.⌺⌺.........⌺..⌺................................
.........................⌺.⌺⌺..⌺⌺...⌺⌺⌺...⌺..⌺⌺.................⌺⌺..⌺..⌺⌺⌺.⌺⌺.⌺.⌺...⌺⌺⌺...............................
.........................⌺...⌺⌺⌺⌺.⌺⌺...⌺...⌺⌺.⌺⌺.⌺..⌺⌺⌺...⌺⌺.⌺⌺...⌺⌺..⌺⌺⌺..⌺............................................
..........................⌺.....⌺..⌺⌺⌺.⌺⌺..⌺..⌺⌺.⌺⌺⌺⌺.⌺.⌺..⌺.⌺...⌺...⌺⌺⌺............................................
........................⌺⌺..⌺........⌺...⌺⌺.⌺⌺⌺⌺⌺.⌺.............⌺..⌺⌺⌺.⌺..⌺....⌺⌺.⌺..⌺⌺⌺..⌺............................
.......................⌺...⌺⌺.⌺⌺⌺⌺..⌺⌺⌺⌺.⌺⌺⌺⌺⌺..⌺⌺..⌺⌺.⌺⌺⌺...⌺..⌺⌺.⌺.....⌺...⌺⌺⌺.............................................
......................⌺...⌺....⌺.⌺.⌺...⌺⌺..⌺...⌺⌺.⌺⌺.⌺.⌺.⌺⌺⌺.⌺..⌺.⌺.⌺..⌺⌺⌺..⌺..........................................
......................⌺......⌺...⌺⌺⌺⌺.⌺⌺⌺⌺.....⌺⌺⌺...⌺..⌺⌺...⌺.⌺⌺..⌺⌺⌺.⌺⌺..⌺...⌺⌺⌺........................................
.......................⌺....⌺....⌺..⌺⌺⌺⌺.....⌺.⌺⌺⌺⌺⌺⌺⌺⌺⌺⌺⌺..⌺⌺..⌺⌺.⌺..⌺.⌺..⌺⌺⌺..⌺............................................
.......................⌺⌺..⌺....⌺⌺..⌺..⌺⌺⌺⌺⌺⌺⌺⌺⌺..⌺⌺..⌺⌺⌺⌺.⌺.⌺⌺⌺...⌺..⌺⌺..⌺...⌺⌺⌺.............................................
........................................⌺.⌺⌺⌺⌺..⌺⌺.⌺⌺.⌺..⌺...⌺⌺⌺.⌺⌺⌺.⌺⌺.⌺⌺...⌺⌺.⌺..⌺⌺...⌺.⌺..⌺⌺⌺..⌺...........................
......................⌺...⌺⌺...⌺⌺⌺.⌺⌺⌺....⌺.⌺.⌺⌺......⌺⌺⌺...⌺..⌺⌺.⌺⌺⌺⌺⌺⌺.⌺..⌺...⌺⌺..⌺...⌺⌺⌺....................................
.......................⌺...⌺⌺................⌺...⌺⌺.⌺⌺.⌺.⌺.....⌺⌺⌺⌺⌺.⌺.⌺⌺⌺⌺⌺.....⌺...⌺.⌺..⌺⌺⌺..⌺..........................
.......................⌺..⌺..⌺.⌺⌺..⌺..⌺...⌺........⌺⌺⌺...⌺..⌺⌺.⌺⌺⌺⌺⌺.⌺⌺.⌺.....⌺....⌺⌺..⌺...⌺⌺⌺.............................
.......................⌺⌺...⌺⌺⌺⌺⌺⌺⌺⌺⌺⌺...⌺⌺.⌺⌺⌺⌺⌺..⌺.⌺⌺⌺⌺...⌺........⌺...⌺⌺.⌺⌺.⌺.⌺..⌺⌺⌺..⌺........................................
...........................⌺⌺.⌺⌺⌺⌺.⌺⌺...⌺..⌺⌺⌺⌺...⌺..⌺...⌺⌺...⌺⌺⌺⌺⌺...⌺..⌺⌺......................⌺⌺..⌺...⌺⌺⌺.................
.........................⌺.⌺..⌺..⌺..⌺.⌺....⌺.........⌺.⌺⌺...⌺⌺.⌺⌺.⌺.⌺⌺⌺⌺⌺........⌺.⌺..⌺⌺⌺..⌺.............................
.........................⌺⌺..⌺⌺..⌺..⌺⌺.⌺.⌺.⌺⌺.⌺⌺....⌺.⌺.......⌺⌺⌺...⌺..⌺⌺..⌺⌺..........⌺⌺..⌺...⌺⌺⌺.........................
.........................⌺.⌺⌺⌺⌺..⌺⌺.⌺.⌺.⌺⌺⌺⌺⌺⌺⌺⌺.⌺................⌺...⌺⌺.⌺⌺.⌺..⌺⌺..................⌺.⌺..⌺⌺⌺..⌺..............
.........................⌺.⌺⌺..⌺..⌺...⌺⌺.⌺⌺.......⌺...⌺.....⌺⌺⌺...⌺..⌺⌺..⌺⌺..................⌺⌺..⌺...⌺⌺⌺.............
.........................⌺⌺⌺⌺.⌺⌺...⌺⌺..⌺⌺..⌺......⌺..⌺.........⌺...⌺⌺.⌺⌺..⌺⌺...⌺................⌺.⌺..⌺⌺⌺..⌺............
........................⌺⌺⌺.⌺...⌺....⌺⌺..⌺⌺.......⌺...⌺⌺⌺⌺⌺⌺...⌺⌺⌺...⌺...⌺..⌺⌺⌺.................⌺⌺..⌺...⌺⌺⌺...........
........................⌺⌺⌺⌺.⌺⌺⌺.⌺⌺⌺⌺....⌺⌺⌺⌺..⌺⌺...........⌺....⌺...⌺...⌺⌺.⌺⌺⌺⌺...⌺..................⌺.⌺..⌺⌺⌺..⌺..........
.......................⌺..⌺.⌺.⌺⌺.⌺..⌺⌺....⌺⌺⌺⌺..⌺⌺......⌺⌺⌺....⌺...⌺.⌺......⌺.⌺⌺.⌺..................⌺⌺..⌺...⌺⌺⌺.........
......................⌺⌺⌺⌺⌺.⌺⌺.⌺⌺⌺.⌺⌺....⌺⌺....⌺⌺.........⌺⌺⌺....⌺.⌺⌺.....⌺.⌺⌺..⌺.⌺⌺...................⌺.⌺..⌺⌺⌺..⌺........
......................⌺⌺⌺⌺..⌺.⌺⌺.⌺.................⌺....⌺...⌺⌺.⌺.⌺.....⌺⌺.......................⌺⌺..⌺...⌺⌺⌺.......
......................⌺⌺.⌺⌺.⌺⌺...................⌺.⌺......⌺.⌺⌺⌺⌺⌺..⌺...⌺.......................⌺.⌺..⌺⌺⌺..⌺......
............................⌺⌺..............⌺...⌺⌺⌺⌺⌺..........⌺⌺.⌺⌺⌺⌺⌺⌺..........................⌺⌺..⌺...⌺⌺⌺.....
....................⌺.⌺⌺⌺⌺..⌺⌺.⌺..................⌺⌺⌺..⌺⌺..⌺.⌺⌺.⌺.⌺.⌺...⌺⌺.⌺.⌺⌺......................⌺.⌺..⌺⌺⌺..⌺....
....................⌺⌺⌺..⌺⌺⌺.⌺..⌺...............⌺⌺..⌺.⌺⌺⌺⌺⌺⌺⌺.⌺...⌺..⌺⌺⌺....⌺⌺.⌺........................⌺⌺..⌺...⌺⌺⌺...
.....................⌺..⌺..⌺.⌺⌺.⌺............⌺..⌺..⌺⌺⌺⌺⌺⌺.⌺⌺...⌺..⌺.⌺⌺...⌺...⌺.........................⌺.⌺..⌺⌺⌺..⌺..
......................⌺⌺......⌺⌺..........⌺....⌺.⌺.⌺⌺.⌺..⌺⌺⌺⌺⌺⌺.⌺⌺⌺⌺⌺⌺⌺...⌺.................................⌺⌺..⌺...⌺⌺⌺.
.............................⌺⌺.........⌺.⌺⌺⌺⌺.⌺⌺.⌺.⌺⌺⌺⌺....⌺⌺..⌺⌺.⌺.⌺⌺.⌺....................................⌺.⌺..⌺⌺⌺..⌺
.......................................⌺....⌺⌺⌺⌺...⌺..⌺.⌺⌺⌺⌺⌺⌺.⌺⌺....⌺⌺⌺....................................⌺⌺..⌺.⌺⌺⌺.
..........................................⌺...⌺.⌺⌺.⌺.⌺⌺⌺.⌺..⌺⌺..⌺⌺...⌺⌺⌺...................................⌺.⌺.⌺.⌺.⌺
.............................................⌺⌺⌺⌺⌺⌺⌺....⌺..⌺⌺.⌺⌺.⌺.....⌺..................................⌺⌺.⌺⌺⌺⌺.
.....................................⌺⌺⌺⌺..⌺⌺.⌺⌺..⌺⌺⌺⌺.⌺⌺.⌺⌺.⌺⌺..⌺.....⌺.........................................⌺.⌺⌺.⌺.
....................................⌺....⌺.⌺...⌺⌺⌺.⌺⌺.⌺⌺⌺....⌺.⌺⌺⌺⌺....⌺.......................................⌺⌺⌺⌺..
...................................⌺⌺⌺.......⌺⌺⌺.⌺.⌺.⌺⌺⌺⌺⌺....⌺.⌺......⌺.......................................⌺⌺...</pre>
...................................⌺.⌺...⌺⌺⌺.⌺⌺⌺⌺.⌺⌺.⌺...⌺⌺.⌺⌺⌺.⌺⌺.....⌺............................
.........................................⌺⌺.⌺⌺..⌺⌺⌺⌺....⌺⌺⌺⌺.⌺.⌺.⌺.....⌺............................
....................................⌺....⌺..⌺⌺...⌺⌺⌺..⌺⌺⌺.....⌺⌺⌺......⌺............................
....................................⌺⌺...⌺⌺.⌺⌺⌺.⌺⌺⌺⌺..⌺......⌺⌺⌺...⌺⌺..⌺............................
....................................⌺⌺.⌺.⌺⌺⌺⌺.....⌺...⌺..⌺.⌺⌺.⌺⌺⌺.⌺⌺...⌺............................
...................................⌺⌺⌺⌺.⌺⌺...⌺⌺.⌺⌺⌺⌺..⌺.⌺..⌺..⌺..⌺⌺⌺...⌺............................
...................................⌺.⌺⌺.⌺⌺⌺..⌺.⌺.⌺⌺.⌺.⌺.....⌺.⌺.....⌺.⌺.............................
.......................................⌺.⌺..⌺....⌺⌺.⌺⌺..⌺.⌺..⌺⌺⌺.⌺⌺.................................
.......................................⌺⌺.⌺....⌺..⌺⌺⌺⌺⌺.⌺....⌺....⌺..⌺.⌺............................
......................................⌺.⌺⌺.⌺..⌺....⌺⌺.⌺⌺.⌺..⌺⌺⌺......⌺⌺⌺............................
....................................⌺.⌺...⌺..⌺..⌺..⌺..⌺⌺⌺...⌺⌺..⌺⌺....⌺.............................
...................................⌺⌺⌺.⌺.⌺⌺⌺⌺⌺.⌺⌺⌺⌺⌺⌺.⌺⌺⌺.⌺⌺⌺⌺⌺⌺⌺.⌺.⌺⌺..............................
...................................⌺.⌺.⌺....⌺⌺⌺⌺⌺...⌺⌺..⌺⌺⌺⌺⌺.⌺⌺⌺⌺⌺.................................
.....................................⌺..⌺⌺...⌺......⌺..⌺.⌺⌺..⌺⌺⌺.⌺⌺⌺................................
..................................⌺⌺⌺⌺...⌺⌺⌺⌺⌺.⌺⌺⌺⌺⌺⌺⌺⌺⌺...⌺.⌺......................................
.............................⌺⌺....⌺..⌺.....⌺⌺⌺.⌺.⌺...⌺.⌺⌺⌺..⌺⌺⌺....................................
............................⌺..⌺..⌺⌺⌺⌺.⌺⌺...⌺⌺⌺.⌺⌺...⌺⌺⌺.⌺⌺.....⌺⌺..................................
...........................⌺⌺⌺....⌺.⌺⌺.⌺.⌺⌺⌺⌺⌺...⌺....⌺..⌺..⌺⌺.⌺⌺⌺..................................
...........................⌺.⌺⌺⌺⌺⌺.⌺.⌺...⌺⌺..⌺⌺.....⌺....⌺...⌺..⌺...................................
...............................⌺⌺⌺⌺⌺⌺.⌺⌺⌺⌺..⌺⌺.⌺...⌺..⌺⌺..⌺.⌺.⌺⌺....................................
.............................⌺⌺......⌺.⌺⌺⌺.⌺⌺..⌺⌺⌺⌺...⌺...⌺⌺⌺.......................................
..............................⌺..⌺.⌺⌺⌺⌺⌺..⌺...⌺.⌺⌺...⌺..⌺..⌺........................................
..............................⌺⌺.⌺⌺⌺.⌺⌺⌺⌺⌺⌺⌺.....⌺.....⌺.⌺⌺.........................................
.............................⌺.⌺..⌺⌺.⌺⌺......⌺...⌺⌺....⌺............................................
............................⌺..⌺.⌺⌺⌺⌺........⌺⌺⌺..⌺⌺..⌺.............................................
............................⌺.⌺⌺.⌺⌺⌺............⌺⌺..⌺⌺..............................................
.............................⌺⌺.....................................................................
..............................⌺⌺....................................................................</pre>
 
=={{header|AutoHotkey}}==
Markjreed
1,480

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/329344"