|
try this
(defun: c:test()
; x6 w9 [& E% i( f1 o (setq p1 (getpoint"\n enter first point:"))% M! R, B+ t% D* k7 m# _
(setq p2 (getpoint"\n enter second point:")) G1 S6 G# K7 M* _0 q+ z
(setq p3 (getpoint"\n enter third point:")), K! u" Q! y! B* k; X2 F" B, p
(Command"line" p1 p2 p3 "c")
- p; V# l8 P& r0 I4 V) |
|