7줄의 프로그램으로 테트리스 만들기 (재탕)
전에 한 번 올렸던 건데, 오늘 어쩌다 다시 언급되었던 일이 있어서, 생각난 김에 재탕으로 또 소개해 드립니다.
아래 7줄의 내용을 메모장 같은데 복사해서 붙이시고, "kwakishandsome.htm" 이라는 이름으로 저장하십시오. (따옴표 필요) 그리고 그걸 더블클릭해서 실행시켜 보시면, 테트리스를 하실 수 있습니다.
<body onKeyDown=K=event.keyCode><script>X=[Z=[B=A=12]];h=e=K=t=P=0;function Y()
{C=[d=K-38];c=0;for(i=4;i--*K;K-13?c+=!Z[h+p+d]:c-=!Z[h+(C[i]=p*A-Math.round(p/
A)*145)])p=B[i];!t|c+4?c-4?0:h+=d:B=C;for(f=K=i=0;i<4;f+=Z[A+p])X[p=h+B[i++]]=1
if(e=!e){if(f|B){for(l=228;i--;)Z[h+B[i]]=k=1;for(B=[[-7,-20,6,17,-9,3,6][t=++t
%7]-4,0,1,t-6?-A:-1];l--;h=5)if(l%A)l-=l%A*!Z[l];else for(P+=k++,j=l+=A;--j>A;)
Z[j]=Z[j-A]}h+=A}for(i=S="";i<240;X[i]=Z[i]|=++i%A<2|i>228)i%A?0:S+="<br>",S+=X
[i]?"■":"□";document.body.innerHTML=S+P;Z[5]||setTimeout(Y,99-P)}Y()</script>
심심할 때 해봐야겠어요 귀엽네요.
빨라서 금방 죽었어요. '-';
마지막 줄의 99를 더 큰 숫자로 바꾸면 느리게 내려옵니다. 꼭 클리어하시길~
쫓기지 않고 느긋하게 할 수 있어서 좋네요. 1000으로 해봤더니 명상하는 기분이에요.
글자가 깨지거나 뭐가뭔지 잘 안보이시는 분들은 첫줄과 마지막줄을 조금만 바꿔주시면 됩니다.
첫줄의 body 태그 - <body onKeyDown=K=event.keyCode style="font-size:30px;line-height:11px;letter-spacing:-5px;">
마지막줄의 네모2개 - "■":"□" ------> 유니코드를 썼더니 제대로 보이질 않네요.
어쨌던 저 네모박스가 잘 안나타는 분들은 유니코드로 바꿔 주시면 됩니다.
까만 네모는 ■ 구요, 하얀 네모는 □ 입니다. 그리고 숫자뒤에 세미콜론 ; 붙이셔야 하구요.
꼭 저 파일이름으로 저장해야하는 것은 아니지요?
다른 파일이름으로 해도 실행은 됩니다만, 자연스럽고 직관적인 코드를 짠다는 측면에서 이 파일이름으로 하시는 것을 권해 드립니다.
신기신기
혹시 내려오는 블록의 회전은 안되나요?
되면 무슨 키를 사용해야 하는지요?
엔터키를 누르시면 됩니다.
"kwak is handsome....." ㅎㅎㅎㅎ