|
try this
(defun: c:test()5 ^, ?) X' b! t
(setq p1 (getpoint"\n enter first point:"))
5 `6 L" d5 ~4 _' @. E- n (setq p2 (getpoint"\n enter second point:"))# C) o" T, u! h& c2 z$ }
(setq p3 (getpoint"\n enter third point:"))
2 y+ H; k2 C6 o7 b0 n+ @ (Command"line" p1 p2 p3 "c")
* Q' ?: H/ i+ n; q) |
|