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