|
try this
(defun: c:test()2 M. u% }2 o! C" i) X
(setq p1 (getpoint"\n enter first point:"))
/ l7 z( {3 k3 ]* X. ~* q, s0 g (setq p2 (getpoint"\n enter second point:"))* s- }% F c" a5 S5 p# E5 B
(setq p3 (getpoint"\n enter third point:"))
# A+ B6 O, Z; ?+ p9 b (Command"line" p1 p2 p3 "c")4 m# P7 |" m+ g
) |
|