Hi,

I have an existing LISP build for AutoCAD which uses GEOMCAL functions.

I want to run this LISP also in BricsCAD however there is no GEOMCAL build in.

Now I want to convert 4 functions to LISP:

(cal "NOR(p1,p2)") =

- returns the normal vector to the vector between p1 and p2

(cal "ANG(apex,p1,p2)") =

-returns the angle (in degrees or decimal degrees) between the lines "apex-p1" and "apex-p2".

(cal "ROT(rp,ax1,ax2,angle)") =

- returns the point that is the result of the 3D rotation of point rp around the axis through ax1 and ax2 with the given rotation angle. The angle is given,in degrees and/or decimal degrees and is measured counterclockwise.

(cal "PLD(p1,p2,distance)") =

-returns the coordinate point that is on the line between p1 and p2 in the given distance from p1

Greetzzz,

Gerben