明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1484|回复: 4

[求助]用lisp如何实现在执行命令时,可以插入执行其它命令?

[复制链接]
发表于 2008-8-19 00:01:00 | 显示全部楼层 |阅读模式

大意如下:

        我用过这样一个锁点命令,在执行LINE,MOVE,COPY等命令时,由于锁点需要,要在不结束前一个命令的前提下,点击一个图标,同时锁上几个需要锁定的点。

      如:当前OSMODE设为0,即未锁点,我执行 move 命令,选中对象后,发现自已未锁点,又不想结束 move ,此时可以点 该“锁点”按纽,会同时锁上几个自已想用的点(中点,圆心等),再正常执行 MOVE 。

发表于 2008-8-19 12:18:00 | 显示全部楼层

透明执行啊

命令: l LINE 指定第一点: 'osmode
>>输入 OSMODE 的新值 <15359>:
正在恢复执行 LINE 命令。
指定第一点:
指定下一点或 [放弃(U)]:
指定下一点或 [放弃(U)]:

发表于 2008-8-19 22:12:00 | 显示全部楼层

按住Shift点右键是一样的

 楼主| 发表于 2008-8-20 23:10:00 | 显示全部楼层

可能大家还没明白我的意思

           我说的是,用LISP来实现,我当然知道右键菜单可以实现,或者在执行过程中输入(setvar "osmode"  ****),但用命怎么调呀?而且,也不是就一句简单的 setvar ,我要先读一个TXT文件,再将其中的数据读出来,设定锁点。(该TXT的数据是另一个程序用VB写进去的)现在的关键问题是,如何在执行一个命令过程中,调用自已定义的命令。

发表于 2008-8-21 11:06:00 | 显示全部楼层

(command "_.line" "_non" POINT1 "_end" POINT2 "")

(command "_.line")
(setvar "osmode" 0)
(command POINT1)
(setvar "osmode" 1000)
(command POINT1 "")

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-8-1 13:22 , Processed in 0.182563 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表