a[i++]=$0{for($0=v=j=_;u=substr(a[j%3],j/3+1,1);++j%9||$0=$0substr("472590*3618",v%23%12+1,1>v=_))v=v(u<1)}1>i%=3
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page