LISP 相关话题

app开发 (defun c:pilpy ()湖南管理系统开发  (setq n (getint "\n输入偏移加多量："))    (if (setq ss (ssget ":S" '((0 . "Arc,Circle,Ellipse,*Line"))))     (progn       (vlax-for obj (vla-get-activ

(defun c:pilpy ()软件开发公司  (setq n (getint "\n输入偏移增多量："))    (if (setq ss (ssget ":S" '((0 . "Arc,Circle,Ellipse,*Line")))) 龙头分析：上期龙头开出1区号码05，与前期比对点位上升，本期关注龙头点位下降，推荐03。     (progn