七行プログラミング part5

このエントリーをはてなブックマークに追加
879デフォルトの名無しさん
a[1920],b[1920],*p,i,j;main(t){for(a[839]=a[840]=a[999]=a[918]=a[919]=1;;){for(
puts("\e[1;1H"),i=0;++i<23;puts("")){for(j=1;j<79;)p=b+i*80+j++,putchar(p[a-b]?
p[-81]++,p[-80]++,p[-79]++,p[-1]++,p[1]++,p[79]++,p[80]++,p[81]++,42:32);}for(i
=j=0;i<24;)j<80?(b[t=i*80+j++]!=2&&(a[t]=b[t]==3),b[t]=0):(i++,j=0);}}