社区 › AutoLISP/Visual LISP 编程技术 › 标注整理v2.0源程序

皇上快溜 发表于 2016-9-9 20:48:08

楼主好，你在一楼的那个程序很好用，有点小问题，请问在哪里改？

dj0511 发表于 2016-10-22 10:54:33

强烈顶起，超级好用，佩服的五体投地

aoguoguo 发表于 2017-12-23 15:26:04

猴赛雷，确实好腻害

hnzkhyyl 发表于 2017-12-25 21:49:04

很强大啊，谢谢楼主的分享

curugi 发表于 2017-12-27 12:17:31

;;; 四舍五入函数，ent:实数，n：小数点保留位数
(defun sswr (ent n / fh)
(if (>= ent 0.0)
    (setq fh +)
    (setq fh -)
)
(setq        ent (/ (atof (itoa (fix (fh (* ent (expt 10 n)) 0.5))))
             (expt 10 n)
          )
)
ent
)                        这个有问题

16719080 发表于 2018-3-10 13:57:37

很不错的程序，支持楼主！

ml2513 发表于 2018-3-10 19:43:10

虽然用不上，不过支持下。

墨者 发表于 2018-3-23 23:35:47

先谢楼主分享

蒙娜丽莎 发表于 2018-6-16 21:47:10

大神之作啊！！！！

canon2993 发表于 2018-6-18 07:41:03

感谢楼主分享

查看完整版本: 标注整理v2.0源程序