社区 › AutoLISP/Visual LISP 编程技术 › 请教很简单的问题从一组数中选一个与已知数比较

流_星 发表于 2015-11-2 10:05:26

请教很简单的问题从一组数中选一个与已知数比较

（= 5 （5，6，7））返回T如何修改谢谢大家

mmmmmm 发表于 2015-11-2 10:12:56

参考member函数

流_星 发表于 2015-11-2 10:18:09

这只是返回第一组数以后得都返回加啥命令呢

山人就是画坑的 发表于 2015-11-2 10:27:31

;;;判断item是否在列表内
;;;item 原子类型
;;;lst 列表
;;;在列表内 t，不在 nil
(defun vic-inlst (item lst / tmp)
        (if (setq tmp (car lst))
                (if (atom tmp)
                        (or (= item (car lst)) (vic-inlst item (cdr lst)))
                        (vic-inlst item tmp)
                )
        )
)

流_星 发表于 2015-11-2 10:33:27

手机上的不好复制不好意思

cable2004 发表于 2015-11-2 10:38:09

(apply 'or (mapcar ' lambda (x) (equal 5 x)) (list 5 6 7)))

流_星 发表于 2015-11-2 10:39:03

（setq dw 200）
(if （= dw (180，200，300，350)）(setq dw(+ dw 50))）

流_星 发表于 2015-11-2 23:13:21

大神们如何修改急用

查看完整版本: 请教很简单的问题从一组数中选一个与已知数比较