よっぱらいゲーム

9月の更新がナシで終わってしまうところだった。危ない。

いつぞやに作った七行プログラミングを。慣性のある動きで障害物を避けて進む、いわゆる「よっぱらいゲーム」です。7行詰め込み作業はパズルのようで楽しいのですよ。


よっぱらいゲームソース

<body onload='A=Array((S=N.style).left=L.offsetLeft);Y=L.offsetTop;for(i=y=z=k=
c=0;i<30;A[i++]=20);T=setInterval(function(){A[30]=Math.random()*(c>300?20:50-c
/10)|0;A.shift(n="");S.top=(y+=z-=k?3:-3)+Y;for(i=0;i<20;n+="<br>",i++)for(j=0;
j<30;n+=A[j++]==i?"■":" ");L.innerHTML=n+c++;h=(y*20/(L.offsetHeight-Y)+.5)|0
;if(h<0||h>19||A[0]==h)clearTimeout(T)},50)'onkeydown=k=1 onkeyup=k=0><pre id=N
style="position:absolute"></pre><pre id=L>