DataMuseum.dk

top - metrics - download

    Length: 1088 (0x440)
    Types: TextFile
    Names: »suntetris.h«

└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
    └─⟦this⟧ »EUUGD18/Sun/Suntetris/suntetris.h« 

TextFile

/* @(#)suntetris.h	1.9 3/22/89 */
/*
 *  Copyright 1989, Rick Iwamoto iwamoto@sun.com
 *  Permission is given to copy and distribute for non-profit purposes. 
 */

#define MAXLEVEL 9
#define BOARDWIDTH 10
#define BOARDHEIGHT 20
#define BOARD_X 200
#define BOARD_Y 50
#define BLOCKSIZE 16
#define SCREENDEPTH 8
#define SCORE_Y BOARD_Y+50
#define LINES_Y BOARD_Y+100
#define LEVEL_Y BOARD_Y+150
#define TETRISCMSSIZE 16

#define	BLACK	0
#define	RED	1
#define	YELLOW	2
#define	LTGREEN	3
#define	GREEN	4
#define	BLUE	5
#define	VIOLET	6
#define	CYAN	7
#define	WHITE	15

#define	tetris_cms(r,g,b) \
	(r)[BLACK] = 0;		(g)[BLACK] = 0;		(b)[BLACK] = 0; \
	(r)[RED] = 255;		(g)[RED] = 0;		(b)[RED] = 0; \
	(r)[YELLOW] = 255;	(g)[YELLOW] = 255;	(b)[YELLOW] = 0; \
	(r)[LTGREEN] = 180;	(g)[LTGREEN] = 255;	(b)[LTGREEN] = 180; \
	(r)[GREEN] = 0;		(g)[GREEN] = 255;	(b)[GREEN] = 0; \
	(r)[BLUE] = 0;		(g)[BLUE] = 0;		(b)[BLUE] = 255; \
	(r)[VIOLET] = 255;	(g)[VIOLET] = 0;	(b)[VIOLET] = 255; \
	(r)[CYAN] = 0;		(g)[CYAN] = 255;	(b)[CYAN] = 255; \
	(r)[WHITE] = 255;	(g)[WHITE] = 255;	(b)[WHITE] = 255;