[求助]：怎样在LISP中顶替F3的对象捕捉键？

张世杰

原因：我用OSMODE 这个变量，先设为0，在最后再设一个值。
每次运行完LISP程序后，还得按一下F3键，很是麻烦。
谢谢了。

zhynt

先判断(getvar "osmode")的值是否大于16384，如果大于16384就拿其值减去16384，这就相当于按下了“F3”，再有就是前面也不要将osmode设为0，将其值加上16384就行了。

lijiao

可以采用现场的保护和恢复。

xcajcj

方法：

(setq *save_osmode* (getvar "osmode"));获取“对象捕捉模式”系统变量的值
(setvar "osmode" 0);设“对象捕捉模式”系统变量的值为0
(setvar "osmode" *save_osmode*);恢复“对象捕捉模式”系统变量的值

系统变量“OSMODE”说明：

类型： 整型
保存方式： 图形
初始值： 0
本系统变量通过以下位码控制对象捕捉模式。

0        NON（无）
1        END（端点）
2        MID（中点）
4        CEN（圆心）
8        NOD（节点）
16        QUA（象限点）
32        INT（交点）
64        INS（插入点）
128        PER（垂足）
256        TAN（切点）
512        NEA（最近点）
1024        QUI（快速）
2048        APP（外观交点）
要指定多个对象捕捉方式，可以输入它们值的和。例如，输入 3 指定“端点”（位码 1）和“中点”（位码 2）对象捕捉。输入 4095 指定全部对象捕捉方式。
当使用状态行上的“对象捕捉”按钮关闭了对象捕捉模式时，除了返回 OSMODE 的普通值外，还将返回位码 16384 (0x4000)。这个附加值可以帮助开发人员在为 AutoCAD 编写应用程序时，将此模式与通过“对象捕捉设置”关闭的对象捕捉模式区别开。

dxqyz

(setvar "osnapcoord" 1)可否？

张世杰

谢谢2楼楼主zhynt，+16384或者-16384真是太好了，已经搞定。
多谢各位帮助。

leonjoy

本人是新手，不懂lisp程序，希望楼住能把已经搞好的lisp传上来共享一下吧！
呵呵！