Langtons Ant by tybalt89

$x+=(-1,99,1,-99)[$d=3&$d-(vec($_,$x||=3e3,8)^=3)%17]for($_=($/.$"x98)x99)x<>;s/^\s*^ //gmuntil/
#/;s/ $//gmuntil/#
/;print

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page