WebSVN – HelenOS – Diff – /branches/dd/uspace/app/tetris/tetris.c


/*  $OpenBSD: tetris.c,v 1.21 2006/04/20 03:24:12 ray Exp $ */
/*  $NetBSD: tetris.c,v 1.2 1995/04/22 07:42:47 cgd Exp $   */
 
/*-
 * Copyright (c) 1992, 1993
 *  The Regents of the University of California.  All rights reserved.
 *
 * This code is derived from software contributed to Berkeley by
 * Chris Torek and Darren F. Provine.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 *  @(#)tetris.c    8.1 (Berkeley) 5/31/93
 */
 
/** @addtogroup tetris Tetris
 * @brief Tetris ported from OpenBSD
 * @{
 */
/** @file
 */
 
static const char copyright[] =
    "@(#) Copyright (c) 1992, 1993\n"
    "\tThe Regents of the University of California.  All rights reserved.\n";
 
#include <sys/time.h>
#include <sys/types.h>
#include <err.h>
#include <errno.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <getopt.h>
 
#include "input.h"
#include "scores.h"
#include "screen.h"
#include "tetris.h"
 
cell board[B_SIZE];
 
int Rows;
int Cols;
 
const struct shape *curshape;
const struct shape *nextshape;
 
long fallrate;
int score;
char key_msg[100];
int showpreview;
int classic;
 
static void elide(void);
static void setup_board(void);
static const struct shape *randshape(void);
 
static void usage(void);
 
static int firstgame = 1;
 
/*
 * Set up the initial board. The bottom display row is completely set,
 * along with another (hidden) row underneath that. Also, the left and
 * right edges are set.
 */
static void setup_board(void)
{
    int i;
    cell *p = board;
   
    for (i = B_SIZE; i; i--)
        *p++ = (i <= (2 * B_COLS) || (i % B_COLS) < 2) ? 0x0000ff : 0x000000;
}
 
/*
 * Elide any full active rows.
 */
static void elide(void)
{
    int rows = 0;
    int i;
    int j;
    int base;
    cell *p;
   
    for (i = A_FIRST; i < A_LAST; i++) {
        base = i * B_COLS + 1;
        p = &board[base];
        for (j = B_COLS - 2; *p++ != 0;) {
            if (--j <= 0) {
                /* This row is to be elided */
                rows++;
                memset(&board[base], 0, sizeof(cell) * (B_COLS - 2));
               
                scr_update();
                tsleep();
               
                while (--base != 0)
                    board[base + B_COLS] = board[base];
               
                scr_update();
                tsleep();
               
                break;
            }
        }
    }
   
    switch (rows) {
    case 1:
        score += 10;
        break;
    case 2:
        score += 30;
        break;
    case 3:
        score += 70;
        break;
    case 4:
        score += 150;
        break;
    default:
        break;
    }
}
 
const struct shape *randshape(void)
{
    const struct shape *tmp = &shapes[random() % 7];
    int i;
    int j = random() % 4;
   
    for (i = 0; i < j; i++)
        tmp = &shapes[classic ? tmp->rotc : tmp->rot];
   
    return (tmp);
}
 
static void srandomdev(void)
{
    struct timeval tv;
   
    gettimeofday(&tv, NULL);
    srandom(tv.tv_sec + tv.tv_usec / 100000);
}
 
static void tetris_menu_draw(int level)
{
    clear_screen();
    moveto(5, 10);
    puts("Tetris\n\n");
   
    moveto(8, 10);
    printf("Level = %d (press keys 1 - 9 to change)", level);
    moveto(9, 10);
    printf("Preview is %s (press 'p' to change)", (showpreview ? "on ": "off"));
    moveto(12, 10);
    printf("Press 'h' to show hiscore table.");
    moveto(13, 10);
    printf("Press 's' to start game.");
    moveto(14, 10);
    printf("Press 'q' to quit game.");
    moveto(20, 10);
    printf("In game controls:");
    moveto(21, 0);
    puts(key_msg);
}
 
static int tetris_menu(int *level)
{
    tetris_menu_draw(*level);
    while (1) {
        int i = getchar();
       
        switch(i) {
            case 'p':
                showpreview = !showpreview;
                moveto(9, 21);
                if (showpreview)
                    printf("on ");
                else
                    printf("off");
                break;
            case 'h':
                loadscores();
                showscores(firstgame);
                tetris_menu_draw(*level);
                break;
            case 's':
                firstgame = 0;
                return 1;
            case 'q':
                return 0;
            case '1':
            case '2':
            case '3':
            case '4':
            case '5':
            case '6':
            case '7':
            case '8':
            case '9':
                *level = i - '0';
                moveto(8, 18);
                printf("%d", *level);
                break;
        }
    }
}
 
int main(int argc, char *argv[])
{
    int pos;
    int c;
    const char *keys;
    int level = 2;
    char key_write[6][10];
    int i;
    int j;
    int ch;
   
    keys = "jkl pq";
   
    classic = 0;
    showpreview = 1;
   
    while ((ch = getopt(argc, argv, "ck:ps")) != -1)
        switch(ch) {
        case 'c':
            /*
             * this means:
             *  - rotate the other way
             *  - no reverse video
             */
            classic = 1;
            break;
        case 'k':
            if (str_size(keys = optarg) != 6)
                usage();
            break;
        case 'p':
            showpreview = 1;
            break;
        case 's':
            showscores(0);
            exit(0);
        default:
            usage();
        }
   
    argc -= optind;
    argv += optind;
   
    if (argc)
        usage();
   
    for (i = 0; i <= 5; i++) {
        for (j = i + 1; j <= 5; j++) {
            if (keys[i] == keys[j])
                errx(1, "duplicate command keys specified.");
        }
       
        if (keys[i] == ' ')
            str_cpy(key_write[i], sizeof(key_write[i]), "<space>");
        else {
            key_write[i][0] = keys[i];
            key_write[i][1] = '\0';
        }
    }
   
    snprintf(key_msg, sizeof(key_msg),
        "%s - left   %s - rotate   %s - right   %s - drop   %s - pause   %s - quit",
        key_write[0], key_write[1], key_write[2], key_write[3],
        key_write[4], key_write[5]);
   
    scr_init();
    if (loadscores() != EOK)
        initscores();
 
    while (tetris_menu(&level)) {
        fallrate = 1000000 / level;
       
        scr_clear();
        setup_board();
       
        srandomdev();
        scr_set();
       
        pos = A_FIRST * B_COLS + (B_COLS / 2) - 1;
        nextshape = randshape();
        curshape = randshape();
       
        scr_msg(key_msg, 1);
       
        while (1) {
            place(curshape, pos, 1);
            scr_update();
            place(curshape, pos, 0);
            c = tgetchar();
            if (c < 0) {
                /*
                 * Timeout.  Move down if possible.
                 */
                if (fits_in(curshape, pos + B_COLS)) {
                    pos += B_COLS;
                    continue;
                }
               
                /*
                 * Put up the current shape `permanently',
                 * bump score, and elide any full rows.
                 */
                place(curshape, pos, 1);
                score++;
                elide();
               
                /*
                 * Choose a new shape.  If it does not fit,
                 * the game is over.
                 */
                curshape = nextshape;
                nextshape = randshape();
                pos = A_FIRST * B_COLS + (B_COLS / 2) - 1;
               
                if (!fits_in(curshape, pos))
                    break;
               
                continue;
            }
           
            /*
             * Handle command keys.
             */
            if (c == keys[5]) {
                /* quit */
                break;
            }
           
            if (c == keys[4]) {
                static char msg[] =
                    "paused - press RETURN to continue";
               
                place(curshape, pos, 1);
                do {
                    scr_update();
                    scr_msg(key_msg, 0);
                    scr_msg(msg, 1);
                    (void) fflush(stdout);
                } while (rwait((struct timeval *) NULL) == -1);
               
                scr_msg(msg, 0);
                scr_msg(key_msg, 1);
                place(curshape, pos, 0);
                continue;
            }
           
            if (c == keys[0]) {
                /* move left */
                if (fits_in(curshape, pos - 1))
                    pos--;
                continue;
            }
           
            if (c == keys[1]) {
                /* turn */
                const struct shape *new =
                    &shapes[classic ? curshape->rotc : curshape->rot];
               
                if (fits_in(new, pos))
                    curshape = new;
                continue;
            }
           
            if (c == keys[2]) {
                /* move right */
                if (fits_in(curshape, pos + 1))
                    pos++;
                continue;
            }
           
            if (c == keys[3]) {
                /* move to bottom */
                while (fits_in(curshape, pos + B_COLS)) {
                    pos += B_COLS;
                    score++;
                }
                continue;
            }
           
            if (c == '\f') {
                scr_clear();
                scr_msg(key_msg, 1);
            }
        }
       
        scr_clear();
        loadscores();
        insertscore(score, level);
        savescores();
        score = 0;
    }
   
    scr_clear();
    printf("\nGame over.\n");
    scr_end();
   
    return 0;
}
 
void usage(void)
{
    fprintf(stderr, "usage: tetris [-ps] [-k keys]\n");
    exit(1);
}
 
/** @}
 */
 

Rev 4668	Rev 4688
1	/* $OpenBSD: tetris.c,v 1.21 2006/04/20 03:24:12 ray Exp $ */	1	/* $OpenBSD: tetris.c,v 1.21 2006/04/20 03:24:12 ray Exp $ */
2	/* $NetBSD: tetris.c,v 1.2 1995/04/22 07:42:47 cgd Exp $ */	2	/* $NetBSD: tetris.c,v 1.2 1995/04/22 07:42:47 cgd Exp $ */
3		3
4	/*-	4	/*-
5	* Copyright (c) 1992, 1993	5	* Copyright (c) 1992, 1993
6	* The Regents of the University of California. All rights reserved.	6	* The Regents of the University of California. All rights reserved.
7	*	7	*
8	* This code is derived from software contributed to Berkeley by	8	* This code is derived from software contributed to Berkeley by
9	* Chris Torek and Darren F. Provine.	9	* Chris Torek and Darren F. Provine.
10	*	10	*
11	* Redistribution and use in source and binary forms, with or without	11	* Redistribution and use in source and binary forms, with or without
12	* modification, are permitted provided that the following conditions	12	* modification, are permitted provided that the following conditions
13	* are met:	13	* are met:
14	* 1. Redistributions of source code must retain the above copyright	14	* 1. Redistributions of source code must retain the above copyright
15	* notice, this list of conditions and the following disclaimer.	15	* notice, this list of conditions and the following disclaimer.
16	* 2. Redistributions in binary form must reproduce the above copyright	16	* 2. Redistributions in binary form must reproduce the above copyright
17	* notice, this list of conditions and the following disclaimer in the	17	* notice, this list of conditions and the following disclaimer in the
18	* documentation and/or other materials provided with the distribution.	18	* documentation and/or other materials provided with the distribution.
19	* 3. Neither the name of the University nor the names of its contributors	19	* 3. Neither the name of the University nor the names of its contributors
20	* may be used to endorse or promote products derived from this software	20	* may be used to endorse or promote products derived from this software
21	* without specific prior written permission.	21	* without specific prior written permission.
22	*	22	*
23	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND	23	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE	24	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE	25	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE	26	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL	27	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS	28	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)	29	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT	30	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY	31	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF	32	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33	* SUCH DAMAGE.	33	* SUCH DAMAGE.
34	*	34	*
35	* @(#)tetris.c 8.1 (Berkeley) 5/31/93	35	* @(#)tetris.c 8.1 (Berkeley) 5/31/93
36	*/	36	*/
37		37
38	/** @addtogroup tetris Tetris	38	/** @addtogroup tetris Tetris
39	* @brief Tetris ported from OpenBSD	39	* @brief Tetris ported from OpenBSD
40	* @{	40	* @{
41	*/	41	*/
42	/** @file	42	/** @file
43	*/	43	*/
44		44
45	static const char copyright[] =	45	static const char copyright[] =
46	"@(#) Copyright (c) 1992, 1993\n"	46	"@(#) Copyright (c) 1992, 1993\n"
47	"\tThe Regents of the University of California. All rights reserved.\n";	47	"\tThe Regents of the University of California. All rights reserved.\n";
48		48
49	#include <sys/time.h>	49	#include <sys/time.h>
50	#include <sys/types.h>	50	#include <sys/types.h>
51	#include <err.h>	51	#include <err.h>
52	#include <errno.h>	52	#include <errno.h>
53	#include <stdio.h>	53	#include <stdio.h>
54	#include <stdlib.h>	54	#include <stdlib.h>
55	#include <string.h>	55	#include <string.h>
56	#include <unistd.h>	56	#include <unistd.h>
57	#include <getopt.h>	57	#include <getopt.h>
58		58
59	#include "input.h"	59	#include "input.h"
60	#include "scores.h"	60	#include "scores.h"
61	#include "screen.h"	61	#include "screen.h"
62	#include "tetris.h"	62	#include "tetris.h"
63		63
64	cell board[B_SIZE];	64	cell board[B_SIZE];
65		65
66	int Rows;	66	int Rows;
67	int Cols;	67	int Cols;
68		68
69	const struct shape *curshape;	69	const struct shape *curshape;
70	const struct shape *nextshape;	70	const struct shape *nextshape;
71		71
72	long fallrate;	72	long fallrate;
73	int score;	73	int score;
74	char key_msg[100];	74	char key_msg[100];
75	int showpreview;	75	int showpreview;
76	int classic;	76	int classic;
77		77
78	static void elide(void);	78	static void elide(void);
79	static void setup_board(void);	79	static void setup_board(void);
80	static const struct shape *randshape(void);	80	static const struct shape *randshape(void);
81		81
82	static void usage(void);	82	static void usage(void);
83		83
84	static int firstgame = 1;	84	static int firstgame = 1;
85		85
86	/*	86	/*
87	* Set up the initial board. The bottom display row is completely set,	87	* Set up the initial board. The bottom display row is completely set,
88	* along with another (hidden) row underneath that. Also, the left and	88	* along with another (hidden) row underneath that. Also, the left and
89	* right edges are set.	89	* right edges are set.
90	*/	90	*/
91	static void setup_board(void)	91	static void setup_board(void)
92	{	92	{
93	int i;	93	int i;
94	cell *p = board;	94	cell *p = board;
95		95
96	for (i = B_SIZE; i; i--)	96	for (i = B_SIZE; i; i--)
97	p++ = (i <= (2 B_COLS) \|\| (i % B_COLS) < 2) ? 0x0000ff : 0x000000;	97	p++ = (i <= (2 B_COLS) \|\| (i % B_COLS) < 2) ? 0x0000ff : 0x000000;
98	}	98	}
99		99
100	/*	100	/*
101	* Elide any full active rows.	101	* Elide any full active rows.
102	*/	102	*/
103	static void elide(void)	103	static void elide(void)
104	{	104	{
105	int rows = 0;	105	int rows = 0;
106	int i;	106	int i;
107	int j;	107	int j;
108	int base;	108	int base;
109	cell *p;	109	cell *p;
110		110
111	for (i = A_FIRST; i < A_LAST; i++) {	111	for (i = A_FIRST; i < A_LAST; i++) {
112	base = i * B_COLS + 1;	112	base = i * B_COLS + 1;
113	p = &board[base];	113	p = &board[base];
114	for (j = B_COLS - 2; *p++ != 0;) {	114	for (j = B_COLS - 2; *p++ != 0;) {
115	if (--j <= 0) {	115	if (--j <= 0) {
116	/* This row is to be elided */	116	/* This row is to be elided */
117	rows++;	117	rows++;
118	memset(&board[base], 0, sizeof(cell) * (B_COLS - 2));	118	memset(&board[base], 0, sizeof(cell) * (B_COLS - 2));
119		119
120	scr_update();	120	scr_update();
121	tsleep();	121	tsleep();
122		122
123	while (--base != 0)	123	while (--base != 0)
124	board[base + B_COLS] = board[base];	124	board[base + B_COLS] = board[base];
125		125
126	scr_update();	126	scr_update();
127	tsleep();	127	tsleep();
128		128
129	break;	129	break;
130	}	130	}
131	}	131	}
132	}	132	}
133		133
134	switch (rows) {	134	switch (rows) {
135	case 1:	135	case 1:
136	score += 10;	136	score += 10;
137	break;	137	break;
138	case 2:	138	case 2:
139	score += 30;	139	score += 30;
140	break;	140	break;
141	case 3:	141	case 3:
142	score += 70;	142	score += 70;
143	break;	143	break;
144	case 4:	144	case 4:
145	score += 150;	145	score += 150;
146	break;	146	break;
147	default:	147	default:
148	break;	148	break;
149	}	149	}
150	}	150	}
151		151
152	const struct shape *randshape(void)	152	const struct shape *randshape(void)
153	{	153	{
154	const struct shape *tmp = &shapes[random() % 7];	154	const struct shape *tmp = &shapes[random() % 7];
155	int i;	155	int i;
156	int j = random() % 4;	156	int j = random() % 4;
157		157
158	for (i = 0; i < j; i++)	158	for (i = 0; i < j; i++)
159	tmp = &shapes[classic ? tmp->rotc : tmp->rot];	159	tmp = &shapes[classic ? tmp->rotc : tmp->rot];
160		160
161	return (tmp);	161	return (tmp);
162	}	162	}
163		163
164	static void srandomdev(void)	164	static void srandomdev(void)
165	{	165	{
166	struct timeval tv;	166	struct timeval tv;
167		167
168	gettimeofday(&tv, NULL);	168	gettimeofday(&tv, NULL);
169	srandom(tv.tv_sec + tv.tv_usec / 100000);	169	srandom(tv.tv_sec + tv.tv_usec / 100000);
170	}	170	}
171		171
172	static void tetris_menu_draw(int level)	172	static void tetris_menu_draw(int level)
173	{	173	{
174	clear_screen();	174	clear_screen();
175	moveto(5, 10);	175	moveto(5, 10);
176	puts("Tetris\n\n");	176	puts("Tetris\n\n");
177		177
178	moveto(8, 10);	178	moveto(8, 10);
179	printf("Level = %d (press keys 1 - 9 to change)", level);	179	printf("Level = %d (press keys 1 - 9 to change)", level);
180	moveto(9, 10);	180	moveto(9, 10);
181	printf("Preview is %s (press 'p' to change)", (showpreview ? "on ": "off"));	181	printf("Preview is %s (press 'p' to change)", (showpreview ? "on ": "off"));
182	moveto(12, 10);	182	moveto(12, 10);
183	printf("Press 'h' to show hiscore table.");	183	printf("Press 'h' to show hiscore table.");
184	moveto(13, 10);	184	moveto(13, 10);
185	printf("Press 's' to start game.");	185	printf("Press 's' to start game.");
186	moveto(14, 10);	186	moveto(14, 10);
187	printf("Press 'q' to quit game.");	187	printf("Press 'q' to quit game.");
188	moveto(20, 10);	188	moveto(20, 10);
189	printf("In game controls:");	189	printf("In game controls:");
190	moveto(21, 0);	190	moveto(21, 0);
191	puts(key_msg);	191	puts(key_msg);
192	}	192	}
193		193
194	static int tetris_menu(int *level)	194	static int tetris_menu(int *level)
195	{	195	{
196	tetris_menu_draw(*level);	196	tetris_menu_draw(*level);
197	while (1) {	197	while (1) {
198	int i = getchar();	198	int i = getchar();
199		199
200	switch(i) {	200	switch(i) {
201	case 'p':	201	case 'p':
202	showpreview = !showpreview;	202	showpreview = !showpreview;
203	moveto(9, 21);	203	moveto(9, 21);
204	if (showpreview)	204	if (showpreview)
205	printf("on ");	205	printf("on ");
206	else	206	else
207	printf("off");	207	printf("off");
208	break;	208	break;
209	case 'h':	209	case 'h':
210	loadscores();	210	loadscores();
211	showscores(firstgame);	211	showscores(firstgame);
212	tetris_menu_draw(*level);	212	tetris_menu_draw(*level);
213	break;	213	break;
214	case 's':	214	case 's':
215	firstgame = 0;	215	firstgame = 0;
216	return 1;	216	return 1;
217	case 'q':	217	case 'q':
218	return 0;	218	return 0;
219	case '1':	219	case '1':
220	case '2':	220	case '2':
221	case '3':	221	case '3':
222	case '4':	222	case '4':
223	case '5':	223	case '5':
224	case '6':	224	case '6':
225	case '7':	225	case '7':
226	case '8':	226	case '8':
227	case '9':	227	case '9':
228	*level = i - '0';	228	*level = i - '0';
229	moveto(8, 18);	229	moveto(8, 18);
230	printf("%d", *level);	230	printf("%d", *level);
231	break;	231	break;
232	}	232	}
233	}	233	}
234	}	234	}
235		235
236	int main(int argc, char *argv[])	236	int main(int argc, char *argv[])
237	{	237	{
238	int pos;	238	int pos;
239	int c;	239	int c;
240	char *keys;	240	const char *keys;
241	int level = 2;	241	int level = 2;
242	char key_write[6][10];	242	char key_write[6][10];
243	int i;	243	int i;
244	int j;	244	int j;
245	int ch;	245	int ch;
246		246
247	keys = "jkl pq";	247	keys = "jkl pq";
248		248
249	classic = 0;	249	classic = 0;
250	showpreview = 1;	250	showpreview = 1;
251		251
252	while ((ch = getopt(argc, argv, "ck:ps")) != -1)	252	while ((ch = getopt(argc, argv, "ck:ps")) != -1)
253	switch(ch) {	253	switch(ch) {
254	case 'c':	254	case 'c':
255	/*	255	/*
256	* this means:	256	* this means:
257	* - rotate the other way	257	* - rotate the other way
258	* - no reverse video	258	* - no reverse video
259	*/	259	*/
260	classic = 1;	260	classic = 1;
261	break;	261	break;
262	case 'k':	262	case 'k':
263	if (str_size(keys = optarg) != 6)	263	if (str_size(keys = optarg) != 6)
264	usage();	264	usage();
265	break;	265	break;
266	case 'p':	266	case 'p':
267	showpreview = 1;	267	showpreview = 1;
268	break;	268	break;
269	case 's':	269	case 's':
270	showscores(0);	270	showscores(0);
271	exit(0);	271	exit(0);
272	default:	272	default:
273	usage();	273	usage();
274	}	274	}
275		275
276	argc -= optind;	276	argc -= optind;
277	argv += optind;	277	argv += optind;
278		278
279	if (argc)	279	if (argc)
280	usage();	280	usage();
281		281
282	for (i = 0; i <= 5; i++) {	282	for (i = 0; i <= 5; i++) {
283	for (j = i + 1; j <= 5; j++) {	283	for (j = i + 1; j <= 5; j++) {
284	if (keys[i] == keys[j])	284	if (keys[i] == keys[j])
285	errx(1, "duplicate command keys specified.");	285	errx(1, "duplicate command keys specified.");
286	}	286	}
287		287
288	if (keys[i] == ' ')	288	if (keys[i] == ' ')
289	str_cpy(key_write[i], sizeof(key_write[i]), "<space>");	289	str_cpy(key_write[i], sizeof(key_write[i]), "<space>");
290	else {	290	else {
291	key_write[i][0] = keys[i];	291	key_write[i][0] = keys[i];
292	key_write[i][1] = '\0';	292	key_write[i][1] = '\0';
293	}	293	}
294	}	294	}
295		295
296	snprintf(key_msg, sizeof(key_msg),	296	snprintf(key_msg, sizeof(key_msg),
297	"%s - left %s - rotate %s - right %s - drop %s - pause %s - quit",	297	"%s - left %s - rotate %s - right %s - drop %s - pause %s - quit",
298	key_write[0], key_write[1], key_write[2], key_write[3],	298	key_write[0], key_write[1], key_write[2], key_write[3],
299	key_write[4], key_write[5]);	299	key_write[4], key_write[5]);
300		300
301	scr_init();	301	scr_init();
302	if (loadscores() != EOK)	302	if (loadscores() != EOK)
303	initscores();	303	initscores();
304		304
305	while (tetris_menu(&level)) {	305	while (tetris_menu(&level)) {
306	fallrate = 1000000 / level;	306	fallrate = 1000000 / level;
307		307
308	scr_clear();	308	scr_clear();
309	setup_board();	309	setup_board();
310		310
311	srandomdev();	311	srandomdev();
312	scr_set();	312	scr_set();
313		313
314	pos = A_FIRST * B_COLS + (B_COLS / 2) - 1;	314	pos = A_FIRST * B_COLS + (B_COLS / 2) - 1;
315	nextshape = randshape();	315	nextshape = randshape();
316	curshape = randshape();	316	curshape = randshape();
317		317
318	scr_msg(key_msg, 1);	318	scr_msg(key_msg, 1);
319		319
320	while (1) {	320	while (1) {
321	place(curshape, pos, 1);	321	place(curshape, pos, 1);
322	scr_update();	322	scr_update();
323	place(curshape, pos, 0);	323	place(curshape, pos, 0);
324	c = tgetchar();	324	c = tgetchar();
325	if (c < 0) {	325	if (c < 0) {
326	/*	326	/*
327	* Timeout. Move down if possible.	327	* Timeout. Move down if possible.
328	*/	328	*/
329	if (fits_in(curshape, pos + B_COLS)) {	329	if (fits_in(curshape, pos + B_COLS)) {
330	pos += B_COLS;	330	pos += B_COLS;
331	continue;	331	continue;
332	}	332	}
333		333
334	/*	334	/*
335	* Put up the current shape `permanently',	335	* Put up the current shape `permanently',
336	* bump score, and elide any full rows.	336	* bump score, and elide any full rows.
337	*/	337	*/
338	place(curshape, pos, 1);	338	place(curshape, pos, 1);
339	score++;	339	score++;
340	elide();	340	elide();
341		341
342	/*	342	/*
343	* Choose a new shape. If it does not fit,	343	* Choose a new shape. If it does not fit,
344	* the game is over.	344	* the game is over.
345	*/	345	*/
346	curshape = nextshape;	346	curshape = nextshape;
347	nextshape = randshape();	347	nextshape = randshape();
348	pos = A_FIRST * B_COLS + (B_COLS / 2) - 1;	348	pos = A_FIRST * B_COLS + (B_COLS / 2) - 1;
349		349
350	if (!fits_in(curshape, pos))	350	if (!fits_in(curshape, pos))
351	break;	351	break;
352		352
353	continue;	353	continue;
354	}	354	}
355		355
356	/*	356	/*
357	* Handle command keys.	357	* Handle command keys.
358	*/	358	*/
359	if (c == keys[5]) {	359	if (c == keys[5]) {
360	/* quit */	360	/* quit */
361	break;	361	break;
362	}	362	}
363		363
364	if (c == keys[4]) {	364	if (c == keys[4]) {
365	static char msg[] =	365	static char msg[] =
366	"paused - press RETURN to continue";	366	"paused - press RETURN to continue";
367		367
368	place(curshape, pos, 1);	368	place(curshape, pos, 1);
369	do {	369	do {
370	scr_update();	370	scr_update();
371	scr_msg(key_msg, 0);	371	scr_msg(key_msg, 0);
372	scr_msg(msg, 1);	372	scr_msg(msg, 1);
373	(void) fflush(stdout);	373	(void) fflush(stdout);
374	} while (rwait((struct timeval *) NULL) == -1);	374	} while (rwait((struct timeval *) NULL) == -1);
375		375
376	scr_msg(msg, 0);	376	scr_msg(msg, 0);
377	scr_msg(key_msg, 1);	377	scr_msg(key_msg, 1);
378	place(curshape, pos, 0);	378	place(curshape, pos, 0);
379	continue;	379	continue;
380	}	380	}
381		381
382	if (c == keys[0]) {	382	if (c == keys[0]) {
383	/* move left */	383	/* move left */
384	if (fits_in(curshape, pos - 1))	384	if (fits_in(curshape, pos - 1))
385	pos--;	385	pos--;
386	continue;	386	continue;
387	}	387	}
388		388
389	if (c == keys[1]) {	389	if (c == keys[1]) {
390	/* turn */	390	/* turn */
391	const struct shape *new =	391	const struct shape *new =
392	&shapes[classic ? curshape->rotc : curshape->rot];	392	&shapes[classic ? curshape->rotc : curshape->rot];
393		393
394	if (fits_in(new, pos))	394	if (fits_in(new, pos))
395	curshape = new;	395	curshape = new;
396	continue;	396	continue;
397	}	397	}
398		398
399	if (c == keys[2]) {	399	if (c == keys[2]) {
400	/* move right */	400	/* move right */
401	if (fits_in(curshape, pos + 1))	401	if (fits_in(curshape, pos + 1))
402	pos++;	402	pos++;
403	continue;	403	continue;
404	}	404	}
405		405
406	if (c == keys[3]) {	406	if (c == keys[3]) {
407	/* move to bottom */	407	/* move to bottom */
408	while (fits_in(curshape, pos + B_COLS)) {	408	while (fits_in(curshape, pos + B_COLS)) {
409	pos += B_COLS;	409	pos += B_COLS;
410	score++;	410	score++;
411	}	411	}
412	continue;	412	continue;
413	}	413	}
414		414
415	if (c == '\f') {	415	if (c == '\f') {
416	scr_clear();	416	scr_clear();
417	scr_msg(key_msg, 1);	417	scr_msg(key_msg, 1);
418	}	418	}
419	}	419	}
420		420
421	scr_clear();	421	scr_clear();
422	loadscores();	422	loadscores();
423	insertscore(score, level);	423	insertscore(score, level);
424	savescores();	424	savescores();
425	score = 0;	425	score = 0;
426	}	426	}
427		427
428	scr_clear();	428	scr_clear();
429	printf("\nGame over.\n");	429	printf("\nGame over.\n");
430	scr_end();	430	scr_end();
431		431
432	return 0;	432	return 0;
433	}	433	}
434		434
435	void usage(void)	435	void usage(void)
436	{	436	{
437	fprintf(stderr, "usage: tetris [-ps] [-k keys]\n");	437	fprintf(stderr, "usage: tetris [-ps] [-k keys]\n");
438	exit(1);	438	exit(1);
439	}	439	}
440		440
441	/** @}	441	/** @}
442	*/	442	*/
443		443

Subversion Repositories HelenOS

(root)/branches/dd/uspace/app/tetris/tetris.c – Rev 4668 → 4688