CAD tip # 5757:

Question

CAD

% platform category

How to draw a 3D arc or circle?

Planar (2D) entities can be drawn in 3D space using a temporary user coordinate system (UCS).

If you want to draw quickly an arc or circle from 3 given points in 3D, you can use the following LISP code (save it to a .LSP file and load with APPLOAD):

(defun c:3Darc (/ p1 p2 p3)
 (command "_ucs" "_w")
 (setq p1 (getpoint "Arc point #1: "))
 (setq p2 (getpoint "Arc point #2: "))
 (setq p3 (getpoint "Arc point #3: "))
 (command "_ucs" "_3p" p1 p2 p3)
 (command "_arc" (trans p1 0 1)(trans p2 0 1)(trans p3 0 1))
 (command "_ucs" "_p")
)

resp.:

(defun c:3Dcircle (/ p1 p2 p3)
 (command "_ucs" "_w")
 (setq p1 (getpoint "Circle point #1: "))
 (setq p2 (getpoint "Circle point #2: "))
 (setq p3 (getpoint "Circle point #3: "))
 (command "_ucs" "_3p" p1 p2 p3)
 (command "_circle" "_3p" (trans p1 0 1)(trans p2 0 1)(trans p3 0 1))
 (command "_ucs" "_p")
)

ACAD

*CAD

20.9.2007 39183×

Comments Tell a friend

this tip shared by ARKANCE experts applies to: AutoCAD ·

See also:
Tip 14526:	How to export geometry from AutoCAD DWGs to JSON files and import it back?
Tip 13847:	Pringles in AutoCAD - a hyperbolic paraboloid.
Tip 13767:	How to copy a DWG object to existing points?
Tip 13688:	How to select all DWG objects of a certain type in AutoCAD LT? (texts, circles...)
Tip 13495:	How to create a full diameter dimension with two arrows?

Selected tip: MDT can not find Excel 2000 Deutsch (German)version.

Back All CAD Tips

Atomic iMate failed - error in Inventor. « | » How to color or suppress all Xref layers?

Have we helped you? If you want to support the CAD Forum web service, consider buying one of our CAD applications, or our custom software development offerings, or donating via PayPal (see above). You may also add a link to your web - like this "fan" link:

Text:

FAQ

Please use these tips at your own risk.
ARKANCE is not responsible for possible problems that may occur as a result of using any of these tips.

CADforum

Tips, tricks, utilities, help, how-tos and FAQ for AutoCAD, LT, Inventor, Revit, Map, Civil 3D, Fusion, Forma, 3ds Max and other Autodesk software (community support by ARKANCE). See About CADforum.

ARKANCE CZ - Autodesk Platinum Partner & Training Center & Consulting Services Partner

CONTACT:
webmaster.cz@arkance.world | tel. +420 910 970 111



Visitors now: 5414