为何缺少参数呢？

hwt99

小弟弄不明白这个，请各位给点意见了！

efan2000

1、应该使用内部参数。
2、逻辑比较时有错误，多了70。
(defun c:isclosed( / en el flag)
(setq en (car (entsel "\n选择查询的对象："))
       el (entget en)
       flag (cdr (assoc 70 el))
        )
  (if ( = (logand flag 1) 1)
     (print "多段线闭合")
     )
  (princ)
  )