[求助]用lisp如何实现在执行命令时,可以插入执行其它命令?
<p>大意如下:</p><p> 我用过这样一个锁点命令,在执行LINE,MOVE,COPY等命令时,由于锁点需要,要在不结束前一个命令的前提下,点击一个图标,同时锁上几个需要锁定的点。</p><p> 如:当前OSMODE设为0,即未锁点,我执行 move 命令,选中对象后,发现自已未锁点,又不想结束 move ,此时可以点 该“锁点”按纽,会同时锁上几个自已想用的点(中点,圆心等),再正常执行 MOVE 。</p> <p>透明执行啊</p><p>命令: l LINE 指定第一点: 'osmode<br/>>>输入 OSMODE 的新值 <15359>:<br/>正在恢复执行 LINE 命令。<br/>指定第一点:<br/>指定下一点或 [放弃(U)]:<br/>指定下一点或 [放弃(U)]:</p><p></p> <p>按住Shift点右键是一样的</p> <p>可能大家还没明白我的意思</p><p> 我说的是,用LISP来实现,我当然知道右键菜单可以实现,或者在执行过程中输入(setvar "osmode" ****),但用命怎么调呀?而且,也不是就一句简单的 setvar ,我要先读一个TXT文件,再将其中的数据读出来,设定锁点。(该TXT的数据是另一个程序用VB写进去的)现在的关键问题是,如何在执行一个命令过程中,调用自已定义的命令。</p> <p>(command "_.line" "_non" POINT1 "_end" POINT2 "")</p><p>或</p><p>(command "_.line")<br/>(setvar "osmode" 0)<br/>(command POINT1)<br/>(setvar "osmode" 1000)<br/>(command POINT1 "")<br/></p>
页:
[1]