阅读下一篇
高手帮忙看看这个数字递增复制程序怎么不行啊?(terpri)(setq jd 2)(prompt "\n当前精度0.00,设置精度,请退出后输入jdsz进行设置")(DEFUN C:jdsz () (initget 1 "0 1 2 3 4 5 6 7 8 9") (setq jd (getint "\n 请输入精度位数[整数(0)/1位(1)/2位(2)/3位(3)/4位(4)]:")) )(defun c:nadd (/ E ENEW NV nv1 nv2 P2 p1 S)
回帖成功
经验值 +10
全部回复(3 )
只看楼主 我来说两句-
chanel2002
沙发
本人搜集了一些CAD字库,超过500个,希望能给大家有所帮助 本人搜集了一些CAD字库,超过500个,希望能给大家有所帮助
2008-05-02 02:39:02
赞同0
-
xuxun876
板凳
CAD字库3
-
b348fa5c0e648d8b4e25.rar
文件大小 8.6 MB
2008-01-06 21:50:06
赞同0
加载更多回复 举报
回复 举报