showcolor.c

操作系统SunOS 4.1.3版本的源码

/*	@(#)showcolor.c 1.1 92/07/30 SMI	*/
/*
 *                      showcolor.c
 *    Draw a grey ramp that graphically shows the colormap
 *    segment activity of the environment when the cursor
 *    is NOT in the canvas of this tool.
 */

#include <suntool/sunview.h>
#include <suntool/canvas.h>

#define	CMS_SIZE	256
#define	CAN_HEIGHT	10

main(argc, argv)
	char	**argv;
{
    Frame		frame;
    Canvas		canvas;
    register Pixwin	*pw;
    register int	i;
    u_char		red[CMS_SIZE],
			green[CMS_SIZE],
			blue[CMS_SIZE];

    /* Create frame and canvas */
    frame = window_create(0, FRAME,
                          FRAME_LABEL, argv[0],
                          FRAME_ARGS,  argc, argv,
                          0);
    canvas = window_create(frame, CANVAS,
                           WIN_HEIGHT, CAN_HEIGHT,
                           WIN_WIDTH,  2 * CMS_SIZE,
                           0);
    window_fit(frame);
    pw = canvas_pixwin(canvas);

    /* Initialize colormap to grey ramp */
    for (i = 0; i < CMS_SIZE; i++)
        red[i] = green[i] = blue[i] = i;
    pw_setcmsname(pw, "showcolor");
    pw_putcolormap(pw, 0, CMS_SIZE, red, green, blue);

    /* Draw ramp of colors */
    for (i = 0; i < CMS_SIZE; i++)
        pw_rop(pw, i*2, 0, 2, CAN_HEIGHT,
               PIX_SRC | PIX_COLOR(i), (Pixrect *)0, 0, 0);
    window_main_loop(frame);
    exit(0);
	/* NOTREACHED */
}