TAStyle.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
written by Beach, June 27, 1982 12:36 pm
Beach, February 9, 1985 5:28:17 pm PST
DIRECTORY
NodeStyle USING [PathType, Ref];
TAStyle: CEDAR DEFINITIONS = {
PenStyle: TYPE = {Round, Square, Rectangular, Italic, Elliptical};
ShadowType: TYPE = {Drop, Offset, None};
ShadowDirection: TYPE = {UpLeft, UpRight, DownLeft, DownRight};
CaptionFormatting: TYPE = {FlushLeft, FlushRight, Centered};
CaptionAlignment: TYPE = {FlushTop, FlushBottom, Baseline, Centered};
GetLineWeight: PUBLIC PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the width of the line in points
GetPenStyle: PROCEDURE[s: NodeStyle.Ref] RETURNS[PenStyle];
determine the pen style from the style applicable to this node
GetPenSlant: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
determine the rotation in degrees from vertical; positive is clockwise
GetPenWidth: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the width of the pen in points
GetPenHeight: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the height of the pen in points
GetShadowType: PROCEDURE[s: NodeStyle.Ref] RETURNS[ShadowType];
return the type of shadow to apply
GetShadowDirection: PROCEDURE[s: NodeStyle.Ref] RETURNS[ShadowDirection];
return the direction of the shadow from the original path
GetShadowAngle: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the angle of the shadow from the original path
GetShadowWeight: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the weight of the shadow outline
GetShadowOffsetAmount: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the distance the shadow is offset from the original path
GetShadowPathType: PROCEDURE[s: NodeStyle.Ref] RETURNS[NodeStyle.PathType];
return the kind of path to use to draw the shadow
GetShadowAreaHue: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the hue[0-255] of the shadow area
GetShadowAreaSaturation: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the saturation[0-255] of the shadow area
GetShadowAreaBrightness: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the brightness[0-255] of the shadow area
GetShadowOutlineHue: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the hue[0-255] of the shadow outline
GetShadowOutlineSaturation: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the saturation[0-255] of the shadow outline
GetShadowOutlineBrightness: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL];
return the brightness[0-255] of the shadow outline
GetCaptionFormatting: PROCEDURE[s: NodeStyle.Ref] RETURNS[CaptionFormatting];
return the horizontal justification for the text caption
GetCaptionAlignment: PROCEDURE[s: NodeStyle.Ref] RETURNS[CaptionAlignment];
return the vertical justification for the text caption
}.
Rick Beach, November 26, 1982, add caption styles