3d arc

[gus1235]

Does anyone know of a routine to draw a 3d arc by start, (point on 3d line), to any point on 2d arc, then to end (point on 3d line)? I'm trying to draw a curb radius after creating 3d lines with a template.

Thanks

[kennet.sjoberg]

In the fly, try before You buy . . .


(defun c:3Darc ( / Pkt1 Pkt2 Pkt3 )
(command "._ucs" "" )
(setq Pkt1 (getpoint "Select first point : " ) )
(setq Pkt2 (getpoint "Select second point : " ) )
(setq Pkt3 (getpoint "Select third point : " ) )
(command "._ucs" "3" Pkt1 Pkt2 Pkt3 )
(command "._arc" (trans Pkt1 0 1 ) (trans Pkt2 0 1 ) (trans Pkt3 0 1 ) )
(command "._ucs" "p" )
(command "._ucs" "p" )
(princ)
)

: ) Happy Computing !

kennet