--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/graywin.c	Thu Apr 26 16:45:43 2001 +0000
@@ -0,0 +1,183 @@
+
+/* Simple program:  Fill a colormap with gray and stripe it down the screen */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <time.h>
+
+#include "SDL.h"
+
+#ifdef TEST_VGA16 /* Define this if you want to test VGA 16-color video modes */
+#define NUM_COLORS	16
+#else
+#define NUM_COLORS	256
+#endif
+
+/* Draw a randomly sized and colored box centered about (X,Y) */
+void DrawBox(SDL_Surface *screen, int X, int Y)
+{
+	static unsigned int seeded = 0;
+	SDL_Rect area;
+	Uint32 color;
+
+	/* Seed the random number generator */
+	if ( seeded == 0 ) {
+		srand(time(NULL));
+		seeded = 1;
+	}
+
+	/* Get the bounds of the rectangle */
+	area.w = (rand()%640);
+	area.h = (rand()%480);
+	area.x = X-(area.w/2);
+	area.y = Y-(area.h/2);
+	color = (rand()%NUM_COLORS);
+
+	/* Do it! */
+	SDL_FillRect(screen, &area, color);
+	SDL_UpdateRects(screen, 1, &area);
+}
+
+SDL_Surface *CreateScreen(Uint16 w, Uint16 h, Uint8 bpp, Uint32 flags)
+{
+	SDL_Surface *screen;
+	int i;
+	SDL_Color palette[NUM_COLORS];
+	Uint8 *buffer;
+
+	/* Set the video mode */
+	screen = SDL_SetVideoMode(w, h, bpp, flags);
+	if ( screen == NULL ) {
+		fprintf(stderr, "Couldn't set display mode: %s\n",
+							SDL_GetError());
+		return(NULL);
+	}
+	fprintf(stderr, "Screen is in %s mode\n",
+		(screen->flags & SDL_FULLSCREEN) ? "fullscreen" : "windowed");
+
+	/* Set a gray colormap, reverse order from white to black */
+	for ( i=0; i<NUM_COLORS; ++i ) {
+		palette[i].r = (NUM_COLORS-1)-i * (256 / NUM_COLORS);
+		palette[i].g = (NUM_COLORS-1)-i * (256 / NUM_COLORS);
+		palette[i].b = (NUM_COLORS-1)-i * (256 / NUM_COLORS);
+	}
+	SDL_SetColors(screen, palette, 0, NUM_COLORS);
+
+	/* Set the surface pixels and refresh! */
+	if ( SDL_LockSurface(screen) < 0 ) {
+		fprintf(stderr, "Couldn't lock display surface: %s\n",
+							SDL_GetError());
+		return(NULL);
+	}
+	buffer = (Uint8 *)screen->pixels;
+	for ( i=0; i<screen->h; ++i ) {
+		memset(buffer,(i*(NUM_COLORS-1))/screen->h, screen->w);
+		buffer += screen->pitch;
+	}
+	SDL_UnlockSurface(screen);
+	SDL_UpdateRect(screen, 0, 0, 0, 0);
+
+	return(screen);
+}
+
+int main(int argc, char *argv[])
+{
+	SDL_Surface *screen;
+	Uint32 videoflags;
+	int    done;
+	SDL_Event event;
+	int width, height, bpp;
+
+	/* Initialize SDL */
+	if ( SDL_Init(SDL_INIT_VIDEO) < 0 ) {
+		fprintf(stderr, "Couldn't initialize SDL: %s\n",SDL_GetError());
+		exit(1);
+	}
+
+	/* See if we try to get a hardware colormap */
+	width = 640;
+	height = 480;
+	bpp = 8;
+	videoflags = SDL_SWSURFACE;
+	while ( argc > 1 ) {
+		--argc;
+		if ( argv[argc-1] && (strcmp(argv[argc-1], "-width") == 0) ) {
+			width = atoi(argv[argc]);
+			--argc;
+		} else
+		if ( argv[argc-1] && (strcmp(argv[argc-1], "-height") == 0) ) {
+			height = atoi(argv[argc]);
+			--argc;
+		} else
+		if ( argv[argc-1] && (strcmp(argv[argc-1], "-bpp") == 0) ) {
+			bpp = atoi(argv[argc]);
+			--argc;
+		} else
+		if ( argv[argc] && (strcmp(argv[argc], "-hw") == 0) ) {
+			videoflags |= SDL_HWSURFACE;
+		} else
+		if ( argv[argc] && (strcmp(argv[argc], "-hwpalette") == 0) ) {
+			videoflags |= SDL_HWPALETTE;
+		} else
+		if ( argv[argc] && (strcmp(argv[argc], "-noframe") == 0) ) {
+			videoflags |= SDL_NOFRAME;
+		} else
+		if ( argv[argc] && (strcmp(argv[argc], "-fullscreen") == 0) ) {
+			videoflags |= SDL_FULLSCREEN;
+		} else {
+			fprintf(stderr, "Usage: %s [-warp] [-fullscreen]\n",
+								argv[0]);
+			exit(1);
+		}
+	}
+
+	/* Set a video mode */
+	screen = CreateScreen(width, height, bpp, videoflags);
+	if ( screen == NULL ) {
+		exit(2);
+	}
+		
+	/* Wait for a keystroke */
+	done = 0;
+	while ( !done && SDL_WaitEvent(&event) ) {
+		switch (event.type) {
+			case SDL_MOUSEBUTTONDOWN:
+				DrawBox(screen, event.button.x, event.button.y);
+				break;
+			case SDL_KEYDOWN:
+				/* Ignore ALT-TAB for windows */
+				if ( (event.key.keysym.sym == SDLK_LALT) ||
+				     (event.key.keysym.sym == SDLK_TAB) ) {
+					break;
+				}
+				/* Center the mouse on <SPACE> */
+				if ( event.key.keysym.sym == SDLK_SPACE ) {
+					SDL_WarpMouse(640/2, 480/2);
+					break;
+				}
+				/* Toggle fullscreen mode on <RETURN> */
+				if ( event.key.keysym.sym == SDLK_RETURN ) {
+					videoflags ^= SDL_FULLSCREEN;
+					screen = CreateScreen(
+						screen->w, screen->h,
+						screen->format->BitsPerPixel,
+								videoflags);
+					if ( screen == NULL ) {
+						fprintf(stderr,
+					"Couldn't toggle fullscreen mode\n");
+						done = 1;
+					}
+					break;
+				}
+				/* Any other key quits the application... */
+			case SDL_QUIT:
+				done = 1;
+				break;
+			default:
+				break;
+		}
+	}
+	SDL_Quit();
+	return(0);
+}