社区 › Auto Lisp › 使用RTOS或s的小数位数

MojaPana 发表于 2022-7-5 16:11:28

使用RTOS或s的小数位数

您好，我对小数点有一个小问题。
 
我写了一个小程序来写一个高度和画一个小数字。
 
例子：
当“z”值为3.0931456时。。。它变成3.093（好的，小数点后3位）
但是如果“z”值是2.0000000。。。它转换为2（不确定，小数点后0位），必须为10.000
 
使用此命令：
（setq alti（rtos alta 2 3））

Lee Mac 发表于 2022-7-5 16:41:55

参见此处：一致RTO

Aftertouch 发表于 2022-7-5 17:00:40

当Z=字符串时：

(setq alti "2.00000000") <= given value
(setq alti (strcat (substr alti 1 (vl-string-position (ascii ".") alti)) (substr alti (+ (vl-string-position (ascii ".") alti) 1) 4)))
returns: "2.000"
来自：CADPL-Pack-v1。lsp

ziele_o2k 发表于 2022-7-5 17:28:33

查看完整版本: 使用RTOS或s的小数位数