|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T c
Length: 888 (0x378)
Types: TextFile
Names: »colours.c«
└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
└─⟦this⟧ »EUUGD18/Sun/Tetris/colours.c«
#include "defs.h"
setup_colours(pw)
Pixrect *pw;
{
unsigned char red[NO_COLS], green[NO_COLS], blue[NO_COLS];
int i;
pw_setcmsname(pw, "TETRIS");
for (i=0; i < NO_COLS; i++)
red[i] = green[i] = blue[i] = 255;
pw_putcolormap(pw, 0, NO_COLS, red, green, blue);
red[WHITE] = 255; green[WHITE] = 255; blue[WHITE] = 255;
red[RED] = 255; green[RED] = 0; blue[RED] = 0;
red[ORANGE] = 255; green[ORANGE] = 120; blue[ORANGE] = 50;
red[YELLOW] = 245; green[YELLOW] = 245; blue[YELLOW] = 0;
red[GREEN] = 0; green[GREEN] = 255; blue[GREEN] = 0;
red[BLUE] = 0; green[BLUE] = 0; blue[BLUE] = 255;
red[CYAN] = 0; green[CYAN] = 245; blue[CYAN] = 245;
red[VIOLET] = 128; green[VIOLET] = 0; blue[VIOLET] = 178;
red[BLACK] = 0; green[BLACK] = 0; blue[BLACK] = 0;
pw_putcolormap(pw, 0, NO_COLS, red, green, blue);
}