|
try this
(defun: c:test()
4 t: V# d: X" g: g (setq p1 (getpoint"\n enter first point:"))- |$ M* l3 T$ r1 K1 \6 ?: X
(setq p2 (getpoint"\n enter second point:"))% ]( l( I4 W8 s0 v8 n# z/ G' N
(setq p3 (getpoint"\n enter third point:"))* \- e. E5 V$ {7 w
(Command"line" p1 p2 p3 "c")
) ~1 Y& Q8 b* k5 x' j% f) |
|