home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 9 / FreshFishVol9-CD2.bin / bbs / gnu / unixtex-6.1b-src.lha / unixtex-6.1b / dvipsk / color.lpro < prev    next >
Encoding:
Text File  |  1992-05-11  |  7.6 KB  |  196 lines
  1. %!
  2. %% color.lpro: this sets up color macros used by dvips and defines some
  3. %%             default color parameters (if these are not already user
  4. %%             defined by another header file).
  5. %%
  6. %% This was written by J. Hafner (hafner@almaden.ibm.com) and was last
  7. %% modified on 2/14/92.  It was then rewritten by Tomas Rokicki to be
  8. %% smaller.
  9. %%
  10. %% The color names used here mostly come from the Crayola Crayon box of
  11. %% 64 colors, with some small additions and deletions.  The names match 
  12. %% those used in the color.[sty,tex] and black.[sty,tex] files. 
  13. %% The actual color parameters were set using a Tektronix Phaser
  14. %% printer.  Approximate PANTONE numbers are given for most colors.
  15. %% 
  16. %% If any of these colors don't match the reditions given by your 
  17. %% color device, then you can redefine them by adding another header file 
  18. %% to predefine the colors in userdict.  In this way you can easily 
  19. %% customize these colors to every device by adding a header entry in the
  20. %% corresponding config.PRINTER file.
  21. %%
  22. %% This header file assumes that tex.pro is already loaded (e.g., B is
  23. %% defined in that header).
  24. %%
  25. TeXDict begin
  26. %%
  27. %% This defines the currentcmykcolor and setcmykcolor in terms of rbg
  28. %% if they are not defined in the current interpreter.
  29. %%
  30. /setcmykcolor where {pop}
  31.       { /setcmykcolor
  32.           { dup 10 eq {pop setrgbcolor}
  33.                     {1 sub 4 1 roll 3
  34.                         { 3 index add neg dup 0 lt {pop 0} if 3 1 roll
  35.                         } repeat
  36.                       setrgbcolor pop
  37.                     } ifelse
  38.            } B
  39.       } ifelse
  40. /TeXcolorcmyk { setcmykcolor } def
  41. /TeXcolorrgb { setrgbcolor } def
  42. /TeXcolorgrey { setgray } def
  43. /TeXcolorgray { setgray } def
  44. /TeXcolorhsb { sethsbcolor } def
  45. /currentcmykcolor where {pop}
  46.       { /currentcmykcolor
  47.           { currentrgbcolor 10   % The 10 signals colors in rbg on stack
  48.           } B
  49.       } ifelse
  50. %%
  51. %% This is intended to set the color states by these defaults, only if
  52. %% they are not defined elsewhere, particularly in another header file.
  53. %% If defined in another header file, they must be defined in userdict to
  54. %% take effect.
  55. %%
  56. /DC { % define a color
  57.    exch dup userdict exch known { pop pop } { X } ifelse
  58. } B
  59. %% GreenYellow  Approximate PANTONE 388
  60. /GreenYellow { 0.15 0 0.69 0 setcmykcolor } DC
  61. %% Yellow  Approximate PANTONE YELLOW
  62. /Yellow { 0 0 1 0 setcmykcolor } DC
  63. %% Goldenrod  Approximate PANTONE 109
  64. /Goldenrod { 0 0.10 0.84 0 setcmykcolor } DC
  65. %% Dandelion  Approximate PANTONE 123
  66. /Dandelion { 0 0.29 0.84 0 setcmykcolor } DC
  67. %% Apricot  Approximate PANTONE 1565
  68. /Apricot { 0 0.32 0.52 0 setcmykcolor } DC
  69. %% Peach  Approximate PANTONE 164
  70. /Peach { 0 0.50 0.70 0 setcmykcolor } DC
  71. %% Melon  Approximate PANTONE 177
  72. /Melon { 0 0.46 0.50 0 setcmykcolor } DC
  73. %% YellowOrange  Approximate PANTONE 130
  74. /YellowOrange { 0 0.42 1 0 setcmykcolor } DC
  75. %% Orange  Approximate PANTONE ORANGE-021
  76. /Orange { 0 0.61 0.87 0 setcmykcolor } DC
  77. %% BurntOrange  Approximate PANTONE 388
  78. /BurntOrange { 0 0.51 1 0 setcmykcolor } DC
  79. %% Bittersweet  Approximate PANTONE 167
  80. /Bittersweet { 0 0.75 1 0.24 setcmykcolor } DC
  81. %% RedOrange  Approximate PANTONE 179
  82. /RedOrange { 0 0.77 0.87 0 setcmykcolor } DC
  83. %% Mahogany  Approximate PANTONE 484
  84. /Mahogany { 0 0.85 0.87 0.35 setcmykcolor } DC
  85. %% Maroon  Approximate PANTONE 201
  86. /Maroon { 0 0.87 0.68 0.32 setcmykcolor } DC
  87. %% BrickRed  Approximate PANTONE 1805
  88. /BrickRed { 0 0.89 0.94 0.28 setcmykcolor } DC
  89. %% Red  VERY-Approx PANTONE RED
  90. /Red { 0 1 1 0 setcmykcolor } DC
  91. %% OrangeRed  No PANTONE match
  92. /OrangeRed { 0 1 0.50 0 setcmykcolor } DC
  93. %% RubineRed  Approximate PANTONE RUBINE-RED
  94. /RubineRed { 0 1 0.13 0 setcmykcolor } DC
  95. %% WildStrawberry  Approximate PANTONE 206
  96. /WildStrawberry { 0 0.96 0.39 0 setcmykcolor } DC
  97. %% Salmon  Approximate PANTONE 183
  98. /Salmon { 0 0.53 0.38 0 setcmykcolor } DC
  99. %% CarnationPink  Approximate PANTONE 218
  100. /CarnationPink { 0 0.63 0 0 setcmykcolor } DC
  101. %% Magenta  Approximate PANTONE PROCESS-MAGENTA
  102. /Magenta { 0 1 0 0 setcmykcolor } DC
  103. %% VioletRed  Approximate PANTONE 219
  104. /VioletRed { 0 0.81 0 0 setcmykcolor } DC
  105. %% Rhodamine  Approximate PANTONE RHODAMINE-RED
  106. /Rhodamine { 0 0.82 0 0 setcmykcolor } DC
  107. %% Mulberry  Approximate PANTONE 241
  108. /Mulberry { 0.34 0.90 0 0.02 setcmykcolor } DC
  109. %% RedViolet  Approximate PANTONE 234
  110. /RedViolet { 0.07 0.90 0 0.34 setcmykcolor } DC
  111. %% Fuchsia  Approximate PANTONE 248
  112. /Fuchsia { 0.47 0.91 0 0.08 setcmykcolor } DC
  113. %% Lavender  Approximate PANTONE 223
  114. /Lavender { 0 0.48 0 0 setcmykcolor } DC
  115. %% Thistle  Approximate PANTONE 245
  116. /Thistle { 0.12 0.59 0 0 setcmykcolor } DC
  117. %% Orchid  Approximate PANTONE 252
  118. /Orchid { 0.32 0.64 0 0 setcmykcolor } DC
  119. %% DarkOrchid  No PANTONE match
  120. /DarkOrchid { 0.40 0.80 0.20 0 setcmykcolor } DC
  121. %% Purple  Approximate PANTONE PURPLE
  122. /Purple { 0.45 0.86 0 0 setcmykcolor } DC
  123. %% Plum  VERY-Approx PANTONE 518
  124. /Plum { 0.50 1 0 0 setcmykcolor } DC
  125. %% Violet  Approximate PANTONE VIOLET
  126. /Violet { 0.79 0.88 0 0 setcmykcolor } DC
  127. %% RoyalPurple  Approximate PANTONE 267
  128. /RoyalPurple { 0.75 0.90 0 0 setcmykcolor } DC
  129. %% BlueViolet  Approximate PANTONE 2755
  130. /BlueViolet { 0.86 0.91 0 0.04 setcmykcolor } DC
  131. %% Periwinkle  Approximate PANTONE 2715
  132. /Periwinkle { 0.57 0.55 0 0 setcmykcolor } DC
  133. %% CadetBlue  Approximate PANTONE (534+535)/2
  134. /CadetBlue { 0.62 0.57 0.23 0 setcmykcolor } DC
  135. %% CornflowerBlue  Approximate PANTONE 292
  136. /CornflowerBlue { 0.65 0.13 0 0 setcmykcolor } DC
  137. %% MidnightBlue  Approximate PANTONE 302
  138. /MidnightBlue { 0.98 0.13 0 0.43 setcmykcolor } DC
  139. %% NavyBlue  Approximate PANTONE 293
  140. /NavyBlue { 0.94 0.54 0 0 setcmykcolor } DC
  141. %% RoyalBlue  No PANTONE match
  142. /RoyalBlue { 1 0.50 0 0 setcmykcolor } DC
  143. %% Blue  Approximate PANTONE BLUE-072
  144. /Blue { 1 1 0 0 setcmykcolor } DC
  145. %% Cerulean  Approximate PANTONE 3005
  146. /Cerulean { 0.94 0.11 0 0 setcmykcolor } DC
  147. %% Cyan  Approximate PANTONE PROCESS-CYAN
  148. /Cyan { 1 0 0 0 setcmykcolor } DC
  149. %% ProcessBlue  Approximate PANTONE PROCESS-BLUE
  150. /ProcessBlue { 0.96 0 0 0 setcmykcolor } DC
  151. %% SkyBlue  Approximate PANTONE 2985
  152. /SkyBlue { 0.62 0 0.12 0 setcmykcolor } DC
  153. %% Turquoise  Approximate PANTONE (312+313)/2
  154. /Turquoise { 0.85 0 0.20 0 setcmykcolor } DC
  155. %% TealBlue  Approximate PANTONE 3145
  156. /TealBlue { 0.86 0 0.34 0.02 setcmykcolor } DC
  157. %% Aquamarine  Approximate PANTONE 3135
  158. /Aquamarine { 0.82 0 0.30 0 setcmykcolor } DC
  159. %% BlueGreen  Approximate PANTONE 320
  160. /BlueGreen { 0.85 0 0.33 0 setcmykcolor } DC
  161. %% Emerald  No PANTONE match
  162. /Emerald { 1 0 0.50 0 setcmykcolor } DC
  163. %% JungleGreen  Approximate PANTONE 328
  164. /JungleGreen { 0.99 0 0.52 0 setcmykcolor } DC
  165. %% SeaGreen  Approximate PANTONE 3268
  166. /SeaGreen { 0.69 0 0.50 0 setcmykcolor } DC
  167. %% Green  VERY-Approx PANTONE GREEN
  168. /Green { 1 0 1 0 setcmykcolor } DC
  169. %% ForestGreen  Approximate PANTONE 349
  170. /ForestGreen { 0.91 0 0.88 0.12 setcmykcolor } DC
  171. %% PineGreen  Approximate PANTONE 323
  172. /PineGreen { 0.92 0 0.59 0.25 setcmykcolor } DC
  173. %% LimeGreen  No PANTONE match
  174. /LimeGreen { 0.50 0 1 0 setcmykcolor } DC
  175. %% YellowGreen  Approximate PANTONE 375
  176. /YellowGreen { 0.44 0 0.74 0 setcmykcolor } DC
  177. %% SpringGreen  Approximate PANTONE 381
  178. /SpringGreen { 0.26 0 0.76 0 setcmykcolor } DC
  179. %% OliveGreen  Approximate PANTONE 582
  180. /OliveGreen { 0.64 0 0.95 0.40 setcmykcolor } DC
  181. %% RawSienna  Approximate PANTONE 154
  182. /RawSienna { 0 0.72 1 0.45 setcmykcolor } DC
  183. %% Sepia  Approximate PANTONE 161
  184. /Sepia { 0 0.83 1 0.70 setcmykcolor } DC
  185. %% Brown  Approximate PANTONE 1615
  186. /Brown { 0 0.81 1 0.60 setcmykcolor } DC
  187. %% Tan  No PANTONE match
  188. /Tan { 0.14 0.42 0.56 0 setcmykcolor } DC
  189. %% Gray  Approximate PANTONE COOL-GRAY-8
  190. /Gray { 0 0 0 0.50 setcmykcolor } DC
  191. %% Black  Approximate PANTONE PROCESS-BLACK
  192. /Black { 0 0 0 1 setcmykcolor } DC
  193. %% White  No PANTONE match
  194. /White { 0 0 0 0 setcmykcolor } DC
  195. end
  196.