zdzzhen 发表于 2011-5-3 10:06:02

求助，如何把这个LISP 输出的结果保留1位小数

本帖最后由 zdzzhen 于 2011-5-3 21:30 编辑

求论坛的朋友帮忙修改一下 下面这个LISP，，输出结果保留1位小数，
         (SETQ ZLL (RTOS ZL 2 0))
         (SETQ S3 (SSNAME S 2))
(SETQ S3V (ENTGET S3))
         (SETQ TEMP
      (SUBST (CONS 1 ZLL) (ASSOC 1 S3V) S3V)
      )
         (ENTMOD TEMP)
         (ENTUPD SN)
)

zdzzhen 发表于 2011-5-3 10:09:17

本帖最后由 zdzzhen 于 2011-5-3 10:12 编辑

另外顺问一下，2010版本的LISP编程是否不如2004好用啊？

lincctw_ccl 发表于 2011-5-3 10:16:16

回复 zdzzhen 的帖子

(SETQ ZLL (RTOS ZL 2 0))
這一段0 為小數點的位數
1 就是保留一位
2 就是保留二位
依此類推

zdzzhen 发表于 2011-5-3 21:29:42

回复 lincctw_ccl 的帖子

多谢，成功解决

Andyhon 发表于 2011-5-3 22:11:05

you might pay attention to
DIMZIN System Variable

DIMZIN also affects real-to-string conversions
performed by the AutoLISP rtos and angtos functions.

zdzzhen 发表于 2011-5-24 19:37:09

回复 Andyhon 的帖子

这是什么意思啊

yshf 发表于 2011-5-24 22:52:16

系统变量DIMZIN会影响实数转换为字符串的结果
页: [1]
查看完整版本: 求助，如何把这个LISP 输出的结果保留1位小数