if多条件判断 or and 假如,或者,如果,lisp源码例子

  • A+
所属分类:CAD二次开发

在其他的编程里面有多条件判断语句,如果一个变量的值不确定,或者有多个,就需要多条件判断,如果等于什么,或者等于什么,只要满足一个添加,公式就成立的。但在lsp里面大概和别的的判断差不多,,只需把函数扩起来就可以了,

下面可以试着换个数试试,测试小例子

(defun c:roo()
(setq a1 -3
;a1 3
a2 4
)

(if (or
(and (>= a1 0) (<= a1 5) (>= a2 4) (<= a2 3))
(and (>= a1 10) (<= a1 -2) (>= a2 2) (<= a2 30)))
(alert "da")
(alert "x")
)
)

复制

 

发表评论

:?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen: