FC2ブログ

La.系ぶろぐ

個人的いろいろメモ。シャープペンのメモにちょっぴりゲ○ツの悪口が混じってるただのチラ裏。

7行テトリス

また横着してトラバ省略。

「ビットで押し込めば短くならね?」と思って挑戦してみましたが……
<body id=D onKeyDown=K=event.keyCode-38><script>Z=[f=B=A=12];function Y(){for(X
=[c=0],q=i=4;i--*K;X[i]=p*A-(p/9|0)*145,d=h+(K+25?p+K:X[i]),c|=Z[d/A|0]&1<p=B[i];for(c?0:K+25?h+=K:t?B=X:0;q--;X[s=p/A|0]|=r=1<if(e=!e)if(h+=A,f)for(h=89,B=[[-7,-20,6,17,-9,3,3][t=++t%7]-4,0,k=1,t-6?-A:2],Z
[l=m=25]=-1;--l;)(Z[m-1]=Z[l]|X[l]|-2047)==-1?(P+=k++):--m;K=f=0;for(S=P,q=5;S
+="
",++q<26;)for(i=X[q]|Z[q];i;i>>>=1)S+=i&1?"■":"_";D.innerHTML=S;Z[6]&
32||setTimeout(Y,99-P)}Y(h=e=K=t=P=0)</script>
(タグの括弧を全角にしてあります……こういうのどう打つんだっけ?)
うう……勝てない……先人とはこんな偉大な物だったのか……
しかし、会社の一日を綺麗につぶしてしまった。てか、こういうのって楽しいよね^^(コラ
スポンサーサイト



PageTop

コメント


管理者にだけ表示を許可する