PenLoc.md

PenLoc

Description

Returns the current coordinate location of the graphics pen.

PROCEDURE PenLoc(VAR pX,pY : REAL);

def vs.PenLoc():
    return p

Parameters

Name	Type	Description
p	REAL	The current location of the graphics pen.

Remarks

(_c_, 2022.01.22) : To clarify, PenLoc doesn't return the current user defined mouse position (see GetMouse for that), it returns the pen position during the script. Actions such as creating lines, polys etc. will cause the graphical pen internally to move. Is 2D only, In Python it returns a bidimensional tuple.

Examples

VectorScript

PROCEDURE Example;
VAR
    pt : VECTOR;
BEGIN
    MoveTo(1, 234); { penLoc = 1, 234 }
    Line(100, 0); { pen position moved by 100 }
    PenLoc(pt.x, pt.y); { penLoc = 101, 234 }
    Message( pt );
END;
Run(Example);

Python

vs.MoveTo(1, 234, 0) # penLoc = (1, 234)
vs.Line(100, 0) # pen position moved by 100
pt = vs.PenLoc() # penLoc = (101, 234)
vs.Message( str(pt) )

BEGIN
	Absolute;
	MoveTo (x3 + dx/2, y1 + textOff [3]);
	PenLoc (xt, yt);
	FOR i := 1 TO gNumZonesH DO
	BEGIN
		IF gNumbersLtoR THEN
			s := Num2Str (0, i)

Absolute;
MoveTo (-dx2/2, height/2);
Relative;
PenLoc (x, y);

LineTo(numSpaces*sLength, #0);
MoveTo(position_x, position_y);
IF gShow3D THEN BEGIN
	MoveTo(numSpaces*sLength, #0);
	PenLoc(term_x, term_y);
	Poly3D(position_x, position_y, kZ_FACTOR, term_x, term_y, kZ_FACTOR);
	MoveTo(position_x, position_y);
END;

import vs

# Returns the current coordinate location of the graphics pen.
result = vs.PenLoc()

Version

Availability: from All Versions

Category

• Command