求助使CAD的位数增加
我用VLISP语言编写的程序输出的数只能是569847.0这么多位,可没有精确到毫米,不能满足我的需求,请教怎样才能使位数增加, Length→LUPRECAngular→AUPREC <TABLE class=tablebody2 style="TABLE-LAYOUT: fixed; WORD-BREAK: break-all" width="90%" border=0>
<TBODY>
<TR>
<TD style="FONT-SIZE: 9pt; LINE-HEIGHT: 12pt" width="100%"><IMG alt=发贴心情 src="http://mjtd.com/bbs/skins/default/topicface/face1.gif" border=0> 急切<B>求助使CAD的位数增加</B><BR>我用VLISP语言编写的程序输出的数只能是569847.0这么多位,可没有精确到毫米,不能满足我的需求,请教怎样才能使位数增加,</TD></TR></TBODY></TABLE> (defun c:ws()<BR> (setq x 3.2123457 y 1.23547458)<BR> (setq z (* x y))<BR> (print "z=")(princ (rtos z 2 8))(princ)<BR>)
页:
[1]