德哥 发表于 2005-3-3 14:13:00

cad默认值

lisp默认值怎么搞得 <BR>比如说就像offset一样<BR>输入之后下次就记住这个值了 <BR>我现在需要输入一段距离<BR>做了操作之后<BR>想让他下次记住这个值


而且要像offset一样有个提示，以便检查正误！


这东西困惑我很久了！谢谢各位！

德哥 发表于 2005-3-3 14:15:00

对了，我用的是get函数，也就是每次输入可以直接回车，也可以get函数获取！

CADghost 发表于 2005-3-3 14:16:00

你可以把这个值写入到外部文件中去~


等到下一次运行的时候,就读这个文件不就行了

德哥 发表于 2005-3-3 14:19:00

可以阿，我是搞得全局变量，可是不能提示！

德哥 发表于 2005-3-3 14:22:00

(if (setq hmbz6 (getreal "输入半径&lt;米&gt;:")) "" (setq hmbz6 hmbz5))


不能提示，不便检查之歌默认值的正误！

meflying 发表于 2005-3-3 15:01:00

(if hmbz6<BR>       (setq hmbz6t (getreal (strcat "输入半径(米)&lt;" (rtos hmbz6) "&gt;:")))<BR>       (setq hmbz6t (getreal "输入半径(米):"))<BR>)<BR>(if hmbz6t (setq hmbz6 hmbz6t))

德哥 发表于 2005-3-4 08:39:00

我也是这样解决的，不过这样用起来好麻烦哦。


而且对三维点更难。看我的三维点


       (setq hmbz1 (strcat "点取圆弧上一点:(" (rtos (car hmbz)) " " (rtos (cadr hmbz)) " " (rtos (caddr hmbz)) ")"))


另外请各位提出写程序的基础习惯，不如说变量命名。。。，我现在还是初学比较容易改。<BR>

ljpnb 发表于 2005-3-4 09:19:00

如果单单只需要记住一个实数值，可以用系统的USERR1、USERR2、USERR3、USERR4 和 USERR5 用于实数值的存储和提取，这个在R2004版以上有，2004版以下的我不知道有没有


（setvar "userr1" 实数值）

oyxx1023 发表于 2005-3-4 10:21:00

好像14以上都有这几个变量吧。

wdb 发表于 2005-3-5 20:52:00

2000肯定有
页: [1]
查看完整版本: cad默认值