Tetris in Haskell & GLUT ★操作 Q アプリ終了 カーソルキー左右 ブロック移動 カーソルキー下 ブロックを落とす スペースキー ブロック時計回転 Z ブロック逆時計回転