明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2048|回复: 6

[基础] 求助,如何把这个LISP 输出的结果保留1位小数

[复制链接]
发表于 2011-5-3 10:06:02 | 显示全部楼层 |阅读模式
本帖最后由 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)  
)

 楼主| 发表于 2011-5-3 10:09:17 | 显示全部楼层
本帖最后由 zdzzhen 于 2011-5-3 10:12 编辑

另外顺问一下,2010版本的LISP编程是否不如2004好用啊?
发表于 2011-5-3 10:16:16 | 显示全部楼层
回复 zdzzhen 的帖子

(SETQ ZLL (RTOS ZL 2 0))
這一段  0 為小數點的位數
1 就是保留一位
2 就是保留二位
依此類推
 楼主| 发表于 2011-5-3 21:29:42 | 显示全部楼层
回复 lincctw_ccl 的帖子

多谢,成功解决
发表于 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.
 楼主| 发表于 2011-5-24 19:37:09 | 显示全部楼层
回复 Andyhon 的帖子

这是什么意思啊
发表于 2011-5-24 22:52:16 | 显示全部楼层
系统变量DIMZIN会影响实数转换为字符串的结果
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-6-12 07:18 , Processed in 0.166330 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表