DCL记忆上次输入值lisp_请教用lisp调用DCL单选键值后，程序无法正常运行。

最新推荐文章于 2021-02-26 12:32:34 发布

weixin_39960920

最新推荐文章于 2021-02-26 12:32:34 发布

阅读量341

点赞数

文章标签： DCL记忆上次输入值lisp

本文链接：https://blog.csdn.net/weixin_39960920/article/details/111765315

版权

该博客作者在使用LISP调用DCL进行杆路绘制设置时遇到问题，当根据DCL中的单选按钮选择不同绘制方式后，程序无法正常运行。代码中涉及的逻辑主要为根据用户选择计算间距（按比例或固定值），但当前的while条件语句在选择后导致程序出错。作者请求帮助修改这部分代码以使程序能根据用户选择正常执行。

摘要由CSDN通过智能技术生成

一下是程序：

(defun c:aa()

(setq cmdmode (getvar "cmdecho"))

(setvar "cmdecho" 0)

(if (= (tblsearch "layer" "0_RDCAD") nil)

(command "layer" "n" "0_RDCAD" "c" "2" "0_RDCAD" "")

)

(if (= (tblsearch "layer" "1_RDCAD") nil)

(command "layer" "n" "1_RDCAD" "c" "3" "1_RDCAD" "")

)

(if (= (tblsearch "layer" "2_RDCAD") nil)

(command "layer" "n" "2_RDCAD" "c" "1" "2_RDCAD" "")

)

(if (= (tblsearch "layer" "3_RDCAD") nil)

(command "layer" "n" "3_RDCAD" "c" "4" "3_RDCAD" "")

)

(if (= (tblsearch "lay

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

关注关注