                             COLORSET.TXT

Once initiated, this EXE file creates a tiny true color bitmap called
COLORSET.BMP, that will appear in the same directory. It is only
32 by 112 pixels, but it contains the truest test for any color printer.

All of the possible colors, between black and white, through the three
primary and secondary colors and gray scales are positioned in an order
that will obviously display the limit of your printer's ability to
accurately reproduce shades.

Also, viewing this image enlarged on your monitor will tell you something
about your video system and the differences between the modes. If you have
a true color video card, be sure to look at COLORSET.BMP in true color,
at least once, so you will know what it is supposed to look like.

Read C_PRNTRS.TXT to get a better understanding of color printing issues.
When you first try to print this file, do not use a screen matching
routine. You will need to enlarge the image when you print it. See what
happens as you print this image in several different sizes. Try using
different dot screening methods. You will see that it does makes a big
difference. Fill the whole page with it. You should see a very smooth
transition through the shades, but with some noticeable difference in each
little square (there are 14 large squares with 256 little squares in each).
What you probably will see is a lot of grouping together of consecutive
squares, many of them exactly the same, forming obvious bands. I hope your
printer does well. If you do not already have a good color printer, this is
a great test to find the best one. I would not recommend printing this file
using a color dot matrix printer (with a ribbon).

This program is a good example of the unique abilities of having direct,
programmatic control when creating bitmaps. Imagine trying to draw this
little file with a mouse. It has 3,584 pixels and 3,310 different color
values. Below is a complete listing of the program, to illustrate how
simple it is.

'***************************** COLORSET.RLZ *****************************

ReSet _All
Run "BMP_24.RLO"
ViewReport
ReportTime
DIM ColorSet As BMPfileInfo
PathName(ColorSet,"ColorSet.bmp")
MakeBMP_24(ColorSet,32,112,0,0,0)
MakePixArray_24(ColorSet,255,255,255)
Report(ColorSet)
ReportTime

For X = 0 To 15
For Y = 0 To 15
C =  X * 16 + Y
XYToPixArray_24(ColorSet,X + 16,Y,255,C,C)           ' Red      to White
XYToPixArray_24(ColorSet,X,Y,C,0,0)                  ' Red      to Black
XYToPixArray_24(ColorSet,X + 16,Y + 16,C,255,C)      ' Green    to White
XYToPixArray_24(ColorSet,X,Y + 16,0,C,0)             ' Green    to Black
XYToPixArray_24(ColorSet,X + 16,Y + 32,C,C,255)      ' Blue     to White
XYToPixArray_24(ColorSet,X,Y + 32,0,0,C)             ' Blue     to Black
XYToPixArray_24(ColorSet,X + 16,Y + 48,255,255,C)    ' Yellow   to White 
XYToPixArray_24(ColorSet,X,Y + 48,C,C,0)             ' Yellow   to Black
XYToPixArray_24(ColorSet,X + 16,Y + 64,255,C,255)    ' Magenta  to White
XYToPixArray_24(ColorSet,X,Y + 64,C,0,C)             ' Magenta  to Black
XYToPixArray_24(ColorSet,X + 16,Y + 80,C,255,255)    ' Cyan     to White
XYToPixArray_24(ColorSet,X,Y + 80,0,C,C)             ' Cyan     to Black
XYToPixArray_24(ColorSet,X + 16,Y + 96,C,C,C)        ' Black    to White   
XYToPixArray_24(ColorSet,X,Y + 96,C,C,C)             ' Black    to White
Next Y
Next X

PixArrayToDisk_24(ColorSet)
Print #1; "Done"
Print #1;
Print #1; "The file ColorSet.bmp is now in the same directory as this program."
ReportTime

ReSet _Var
ReSet _Type
ReSet _Proc

'************************************************************************