1 b855148c 2004-05-16 devnull .ds Dc black
2 b855148c 2004-05-16 devnull .ds Cc \*(Dc
3 b855148c 2004-05-16 devnull .de CL \" Color selection macro
5 b855148c 2004-05-16 devnull . \" $1=color (e.g. .CL red) or
6 b855148c 2004-05-16 devnull . \" $1=textcolor on backgroundcolor (e.g. .CL "red on blue")
7 b855148c 2004-05-16 devnull . \" $1=red green blue rgb (e.g. .CL ".2 .3 .4 rgb") or
8 b855148c 2004-05-16 devnull . \" $1=hue saturation brightness hsb (e.g. .CL ".5 .6 .7 hsb")
9 b855148c 2004-05-16 devnull . \" $2=text
11 b855148c 2004-05-16 devnull . \" If no arguments are given the default color (usually black) will be
12 b855148c 2004-05-16 devnull . \" restored. If $2 is omitted the color selected by $1 remains in effect
13 b855148c 2004-05-16 devnull . \" until another color is selected. If two arguments are given $2 will be
14 b855148c 2004-05-16 devnull . \" printed in color $1 and then the default color will be restored.
16 b855148c 2004-05-16 devnull . \" The color of the text and the background can be selected by setting $1
17 b855148c 2004-05-16 devnull . \" to "textcolor on backgroundcolor" where textcolor and backgroundcolor
18 b855148c 2004-05-16 devnull . \" can be any of the known colors. For example use .CL "white on black"
19 b855148c 2004-05-16 devnull . \" for reverse video printing. Changing color in a word can be accomplished
20 b855148c 2004-05-16 devnull . \" by preceeding the characters with a \X'SetColor:val' command, where val
21 b855148c 2004-05-16 devnull . \" is the color you wish to use. Named colors are case independent.
23 b855148c 2004-05-16 devnull . \" Implementation details are device dependent and are handled in the
24 b855148c 2004-05-16 devnull . \" appropriate post-processor. Requesting a color that's not available
25 b855148c 2004-05-16 devnull . \" (eg. not defined in /usr/lib/postscript/color.ps) results in the use
26 b855148c 2004-05-16 devnull . \" of default colors - black or white on black for reverse video mode.
28 b855148c 2004-05-16 devnull . \" All colors may not be supported on every output device, and the direct
29 b855148c 2004-05-16 devnull . \" specification of a color via an explicit rgb or hsb argument may also
30 b855148c 2004-05-16 devnull . \" be device dependent. In any case, to be safe on PostScript devices, all
31 b855148c 2004-05-16 devnull . \" numeric paramenters in the direct rgb or hsb specifications should lie
32 b855148c 2004-05-16 devnull . \" between 0 and 1 (inclusive). The names of the currently available colors
33 b855148c 2004-05-16 devnull . \" on PostScript printers are listed in file /usr/lib/postscript/color.ps.
36 b855148c 2004-05-16 devnull .if \\n(.$=0 .ds Cc \\*(Dc
37 b855148c 2004-05-16 devnull .if \\n(.$=1 .ds Cc \\$1
38 b855148c 2004-05-16 devnull .if \\n(.$<2 \\X'SetColor:\\*(Cc'
39 b855148c 2004-05-16 devnull .if \\n(.$=2 \\X'SetColor:\\$1'\\c
40 b855148c 2004-05-16 devnull .if \\n(.$=2 'sp |\\n(Ovu
41 b855148c 2004-05-16 devnull .if \\n(.$=2 \\$2
42 b855148c 2004-05-16 devnull .if \\n(.$=2 .mk Ov
43 b855148c 2004-05-16 devnull .if \\n(.$=2 \\X'SetColor:\\*(Cc'\\c
44 b855148c 2004-05-16 devnull 'sp |\\n(Ovu
