テトリスがたった7行のプログラムで動いてしまうと伝えましたが、
http://game.resalejp.com/?eid=679861
「ぷよぷよ」もたった10行で動いてしまいます。
テトリスと同様、メモ帳に引用内をコピーしてhtmlで保存、ブラウザでひらいけばぷよぷよがスタートです。
こちらはｘが回転、カーソルが移動になっています。
他のキーを押すと、エラーが出る可能性があります。
function T(){h=100,B=Math.floor(Math
.random(l=8,p=-1)*16+4)}function Y(){for(S="",i=104;i--;i%8||(S+=""))n=N[i]
,S+=n?~n?"●":"■":"＿";document.body.innerHTML
=S;N=[K-50?h-=M[h+l-K]|M[h-K]?0:K:M[h+p]?0:(x=p,p=-l,l=x)];for(K=0;++i>2;N[h+l]=B%4+1;if(!(++e%10))if(h-=8,M[h]+M[h+l])for(M=N,T(f=0);f
=!f;){for(i=112;i--;g=C[i]=0);for(;g=!g;)for(i=0;i0&n>=c;c++)for(j=4;j--;t>102
|C[t]|M[i]-M[t]||(C[t]=E[++n]=t))x=p,p=-l,l=x,t=E[c]+p;if(n>3)for(;n;)f=M[E[n--
]]=0}}M[100]||setTimeout(Y,49)}for(M=N=[C=[i=113]];--i;M[i-1]=i%8>1&i>7?0:-1);Y
(T(e=K=0));
DSやPS2にも移植されているぷよぷよの根幹のデータはこんなものなのだと思うと感慨深いですね。
http://game.resalejp.com
アーティクルリソース：http://articlejapan.com/
|
