autolisp 有可以将带小数点的某数变为带%的函数吗?
在实际工作中,有时需要将计算得到的如0.8523变为85.23%,我想编一个lisp,可以在CAD中直接选取0.8523就可以直接变成85.23%。另一个功能就是可以返过来,比如求150*85.23%,可以达到150*0.8523同样的结果?可以自己做个通用的函数呀lisp本身没这样的函数吧 提供一个转换函数给你吧
;转换数值型小数为百分数文本形式
;ex: (zh 0.0273)-->"2.73%"
;----------------------------------
(defun zh(x)
(strcat (rtos (* x 100) 2 2) "%")
) 回复 cdma2546 的帖子
谢谢CDMA回答这个菜鸟级白痴问题。我刚接触lisp,以为有可以直接转换的函数。。。
页:
[1]