看这个可能更明白
使用系统自带的计算器就可以计算了，在程序员模式下
自贡黄明儒 发表于 2024-6-19 14:17
看这个可能更明白
谢谢黄大师。0010的十进制不是2吗，为什么是-14呢？ ;; 来个啰嗦的
(defun abc (ss / lst)
(setq lst (xyp-Ss2List ss)
lst (vl-remove-if-not '(lambda (x) (xyp-Etype x "*polyline")) lst)
lst (vl-remove-if-not '(lambda (x) (xyp-CurveIsClose x)) lst)
lst (vl-remove-if '(lambda (x) (/= (rem (length (xyp-Vertexs x 0)) 2) 0))lst)
)
) hubeiwdlue 发表于 2024-6-19 14:48
谢谢黄大师。0010的十进制不是2吗，为什么是-14呢？
你可以去了解一下补吗，就知道为什么是-14了 xyp1964 发表于 2024-6-19 23:02
;; 来个啰嗦的
相对于组码过滤器，是有点啰嗦了
页:
1
[2]