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