Skip to content

FMarker.md

Latest commit

 

History

History
108 lines (88 loc) · 2.78 KB

FMarker.md

File metadata and controls

108 lines (88 loc) · 2.78 KB
Raw

FMarker

Description

OBSOLETE for VW 2008: Use GetDefaultBeginningMarker and/or GetDefaultEndMarker instead. Procedure FMarker returns the active marker style parameters.

A complete listing of marker styles can be found in the Script Appendix.

PROCEDURE FMarker(
				VAR style : INTEGER;
				VAR size  : REAL;
				VAR ang   : INTEGER);
def vs.FMarker():
    return (style, size, ang)

Parameters

Name Type Description
style INTEGER Returns marker style.
size REAL Returns marker size in inches measured in page space.
ang INTEGER Returns marker angle (in degrees).

Remarks

OBSOLETE for VW 2008: Use GetDefaultBeginningMarker and/or GetDefaultEndMarker instead. Style is an 8 bit quantity interpreted as follows:

  • Bit 0 indicates the visibility of a marker at the start of the line.
  • Bit 1 indicates the visibility of a marker at the end of the line.
  • Bits 2 - 7 indicate the index of the marker style to be used.

Size is in page-inches. Legal values are 0.0 to 2.0.

Angle is in degrees.

The parameter Style is currently returning 0-6, 0 for solid arrow, 1 for empty arrow, etc. and not the 8 bit quantity as described above.

Actually, the Style is returning:

  • 0 for solid arrow,
  • 4 for empty arrow*
  • 8 for open arrow
  • 12 for dot, etc.

Examples

VectorScript

PROCEDURE Example;
VAR
style :INTEGER;
size  :REAL;
ang   :INTEGER;
BEGIN
FMarker(style, size, ang);
Message(style, ' ', size, ' ', ang);
END;
RUN(Example);

Python

def Example():
	style, size, ang = vs.FMarker()
	vs.Message(style, ' ', size, ' ', ang)
Example()
IF attrNum [6] THEN SetMarkerByClass (objectH)
ELSE IF option = 2 THEN FMarker (mStyle, mSize, mAngle);

{initialize variables and standard setup}
GetUnits (udummy,udummy,udummy,UPI,udummys,udummys);
fMarker(mStyle,mSize,mAng);
IF kDebug THEN
	BEGIN
	alrtdialog(concat('mStyle is ',num2str(0,mStyle),'.'));
	alrtdialog(concat('mSize is ',num2str(2,mSize),'.'));

BEGIN
	fMarker(mStyle,mSize,mAng);
	getmyunits;
	gRot := getsymrot(pluginH);
	eType := getIndex(pluginName, 'peType', peType);
	show_3D_detail := pShow_3D_detail;
import vs

# _ Procedure FMarker returns the active marker style parameters.
style, size, ang = vs.FMarker()
vs.Message('FMarker returned: ' + str((style, size, ang)))

See Also

VS Functions:

Version

FMarker is obsolete as of VectorWorks 13.0

Availability: from MiniCAD 6.0

Category