-- TAStyle.mesa
-- written by Beach, June 27, 1982 12:36 pm
-- modified by Beach, November 26, 1982 12:50 pm

DIRECTORY
 NodeStyle USING [PathType, Ref];

TAStyle: 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