下载首页 | 资讯中心 | 文章分类 | 最近更新 | 排 行 榜 |
文章搜索: 分类 关键字
您的位置:首页软件教程AutoCADAutoCAD资料教程 → 为AUTOLISP建立缺省输入函数
为AUTOLISP建立缺省输入函数
日期:2007-10-23 16:02:40 人气:54     [ ]
上一页 [1] 下一页

使用LISP编程时,常常需要用户回答一些参数,为了提高工作效率,希望能用回车代替某个特定输入即缺省值。此时,在程序中增加一个判断可使变量得到缺省回答。

(setqwidth(getreal″inputwidth:″))

(if(nullwidth)(setqwidth0.3));回车置width的值为0.3。

有时需要依上一次的输入值为本次的缺省输入(如宽度、角度、距离等),这时就需要用全局变量保存上一次输入值提供缺省输入。例如,若欲将上次输入的宽度值作为缺省输入可使用下述函数

(if(notwidth)
(setqwidth0.3);第一次依03为缺省值)
(princ″\inputwidth:″)
(princ″\n
(princwidth)
(princ″:″);显示提示信息
(setqw1(getrea1))
(if(notw1)
(setqw1width)
(setqwidthw1);用全局变量保存当前输入值
(princw1)
)

函数的执行结果是第一次执行时依宽度03为缺省值,提示信息为inputwidth:,给定新的输入值后如05,下一次依宽度05为缺省提示值,提示信息为inputwidth:。

在一般情况下,还可通过建立缺省处理函数,加快程序处理速度,减少编码。如

(defundefal(strval)
(setqglobaval)
(princ(strcatstr″
(princgloba)
(princ″″)
(setqvar(getreal))
(if(notvar)
(setqvargloba);用缺省值作为输入
)
(princvar)
)

这是一个有参函数,它将输入的实数作为返回值。当按(defal″inputwidth″0.5)调用时提示信息为inputwidth:。该函数能按str的提示缺省输入实数(由val给定)类值(如角度、距离等),加入到ACADLSP文件中即可像LISP标准函数一样供其它函数调用。

上一页 [1] 下一页
我有问题,我要进入论坛
出处:本站原创 作者:佚名
 热点文章
·如何定制自己的个性化..
·proe超级技巧
·怎样学好PRO/E软件?
·PRO/E COFNIG文件设置..
·PROE将默认英制转换成..
·PRO/E分模经验总结
·Pro/E 各种曲线方程集..
·Pro/E 各种曲线方程集..
·Pro/E 各种曲线方程集..
·Pro/E 各种曲线方程集..
·Pro/E 各种曲线方程集..
·旧版ProE如何读取野火..
·Pro/E如何做两条c2(曲..
·Pro/E 2001下一个阵列..
·一款钣金产品的结构设..
 推荐文章
·翻砂铸造的特点及其工..
·整编SolidWorks应用技..
·模具选材原则
·如何解决中文Pro/E工程..
·Pro/ENGINEER 中的文本..
·Pro/ENGINEER Wildfir..
·模型从proe->ansys..
·用行为建模优化设计的..
·簡單的Top-Down設計實..
·适合初学者的基础练习..
·ProE不传之秘笈(高级技..
·PRO/E 关于零件精度的..
·Pro/E的scan-tools工具..
·关系式的世界
·关系式教程