七行プログラミング part5
レス数が900を超えています。1000を超えると表示できなくなるよ。
0919デフォルトの名無しさん
2008/06/15(日) 10:16:17a[1920],b[1920],*p,i,j;main(c){for(a[839]=a[840]=a[918]=a[919]=a[999]=1;;)for(i
=0,puts("\e[1;1H"),memcpy(b,a,7680);++i<23;puts(""))for(j=1;j<79;)p=b+i*80+j++,
putchar(a[p-b]?42:32),c=p[-81]+p[-80]+p[-79]+p[-1]+p[1]+p[79]+p[80]+p[81],c!=2
&&(a[p-b]=c==3);}
レス数が900を超えています。1000を超えると表示できなくなるよ。