永发信息网

AutoLisp,怎么实现重复执行命令

答案:2  悬赏:10  手机版
解决时间 2021-02-15 07:17
  • 提问者网友:临风不自傲
  • 2021-02-14 11:48
如题,要在Lisp里加上什么语句,才会自动重复呢?比如标注,完成了一个尺寸的标注要怎么样才能实现标注命令的自动载入?

可能说得不是太清楚,主要想表达的意思是,怎么才能实现标完一个尺寸后,程序仍处在标注命令下没有退出,而是呈现选择待标注对象的状态。按下ESC或者空格或者回车才会退出标注命令。
最佳答案
  • 五星知识达人网友:毛毛
  • 2021-02-14 12:36
不知道你具体想做什么,就编了一小段,大概可以实现你说的功能,在Vlisp控制台运行。提示选择一点后,判断是否有效,有效则作为标注的第一点,否则退出循环。

(setq a 0)
(while (/= a nil)
(progn
(setq a (getpoint "选择标注的第一点:"))
(if (/= a nil)
(command "_dimlinear" a pause pause)
)
)
)
全部回答
  • 1楼网友:長槍戰八方
  • 2021-02-14 13:17
你好! 假设你的定义是RRV (defun c:RRV () (---------) (--------) (c:rrv) ) 这样就行了 我的回答你还满意吗~~
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯