CAD拼图程序lisp程序

CAD拼图程序lisp程序(defun c: pintu (s1 s2 (pt1 pt2 in na.) (setvar "blipmode") (setvar "cmdecho") (get _ r