社区 › AutoLISP/Visual LISP 编程技术 › 【函数分享】“判断点是否在屏幕内”与 “给起点、终点、数量--定数等分线段得点表”

328302216 发表于 2014-4-24 10:41:19

源码就要支持！多谢楼主

328302216 发表于 2014-4-24 11:46:43

;计算实数表中 最大 最小值
(defun t13 (plst)
    (mapcar '(lambda(a b)(apply 'mapcar (cons a b))) '(min max) (list lst lst))
)
这个好像有错哦！
如果是数字列表 直接   (list (apply 'max lst) (apply 'min lst))

查看完整版本: 【函数分享】“判断点是否在屏幕内”与 “给起点、终点、数量--定数等分线段得点表”