ImagerColorExtras.mesa
Copyright Ó 1992 by Xerox Corporation. All rights reserved.
Michael Plass, March 26, 1992 4:59 pm PST
Highlight
... Xerox/HighlightLinear (Color Encoding Standard)
Highlight: TYPE ~ RECORD [b, h: REAL];
b is fraction of base color (usually white)
h is fraction of highlight color
ColorFromHighlight:
PROC [highlight: Highlight, baseColor: ConstantColor ¬
NIL, highlightColor: ConstantColor ¬
NIL, appearanceHints: Structure ¬
NIL]
RETURNS [OpConstantColor];
Defaulted baseColor is interpreted as Find["Xerox/Solid/White"];
Defaulted highlightColor is interpreted as Find["Xerox/Highlight"];
HighlightFromColor:
PROC [c: ConstantColor, baseColor: ConstantColor ¬
NIL, highlightColor: ConstantColor ¬
NIL, appearanceHints: Structure ¬
NIL]
RETURNS [Highlight];
NewColorOperatorHighlight: PROC [sWhite, sBlack: REAL, map: PixelEncoding ¬ NIL, baseColor, highlightColor: ConstantColor, appearanceHints: Structure ¬ NIL] RETURNS [ColorOperator];