|
|
try this
(defun: c:test(); \. f( S( N4 E8 L+ C: s
(setq p1 (getpoint"\n enter first point:"))
, @/ G8 P% G$ p# b (setq p2 (getpoint"\n enter second point:"))2 L- M. ]: C+ Y
(setq p3 (getpoint"\n enter third point:"))2 y- X( a1 @. i" {, A
(Command"line" p1 p2 p3 "c")0 s# K' w6 o8 B0 P; g, q
) |
|