捕捉点的设置

6676221 发表于 2006-10-29 08:00:00

AutoCAD绘图时，我们在对象捕捉设置中设置了交点、中点等等的对象捕捉，可是运行一些程序后，这些设置却自动消失了，害的我们又要重新设置，这是为什么呢？原来有些程序为了运行的需要，自己按需来选择或取消捕捉设置。如果程序运行完了，而捕捉设置为空了，那么程序最后就将捕捉设置设置为无了。这些操作涉及了一个很关键的系统变量OSMODE，无捕捉设置，则系统变量OSMODE为零值，程序代码为： (setvar "osmode" 0) 
下面我们先来看看OSMODE变量帮助参考： 类型：整数 保存位置：注册表 初始值：4133
使用以下位码设置“对象捕捉”的运行模式： 
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（捕捉设置为捕捉到外观交点） 
4096 ：EXT（捕捉设置为捕捉到尺寸线） 
8192 ：PAR（捕捉设置为捕捉到平行） 
以上数值即为要设置何种捕捉类型，程序中OSMODE所需赋的位码值。如果要指定多个对象捕捉方式，则需要输入各个位码值之和。例如，输入 3 则指定“端点”(位码 1) 和“中点”(位码 2) 对象捕捉。你大可不用担心代码和会与单个代码重复，因为这些代码数值都是经过精心选择的，不信你可以加加看。 
特别需要注意，如果输入16383（以上所有单个代码和）则指定全部对象捕捉方式开。 
使用状态行的“对象捕捉”按钮关闭对象捕捉模式，除了返回 OSMODE 的普通值，还将返回位码 16384 (0x4000)。这个附加值有助于开发人员编写 AutoCAD 应用程序并将此模式与“绘图设置”对话框关闭的对象捕捉模式区别开来。设置此位码值将关闭对象捕捉。在该位码值关闭时将 OSMODE 设置为其他值可以打开对象捕捉。 
下面我们来编写一些简单的lsp程序，以充分了解OSMODE代码值在捕捉设置中的作用。 
 第一个程序，我们要实现单个捕捉设置开，比如设置为捕捉到垂足，程序如下： 
(DEFUN C:kqcz() ;设置捕捉到垂足方式 
(setvar "osmode" 16383) 
)
第二个程序，我们来实现多个捕捉设置开，比如设置为捕捉到端点，捕捉到交点和捕捉到最近点，那么代码和就是1+32+512＝545，程序如下： 
(DEFUN C:kqdjz() ;设置捕捉到端点，捕捉到交点和捕捉到最近点方式 
(setvar "osmode" 16383) 
)
第三个程序，我们要实现所有捕捉设置开，程序如下： 
(DEFUN C:kqpz() ;设置全部对象捕捉方式 
(setvar "osmode" 16383) 
)

请问一下各位大哥以上怎么编写LISP程序呀,小弟不会,还请各位大哥在百忙抽空看一下,谢谢!!!

rongyifei 发表于 2006-10-29 21:06:00

你上面不是已经给了几个实例吗?
编程时,如果osnap是打开的话,由于绘图区有其他图形的存在,经常会发生抓错点的现象,所以要把osnap关闭.

6676221 发表于 2006-11-6 19:36:00

哪位大哥说一下呀，帮帮忙！！！

rongyifei 发表于 2006-11-6 20:18:00

加载下面几句代码,在命令行中输入on!
(defun c:on()   (if (/= (getvar"osmode") 39)     (setvar"osmode"39)     )   )
可以同时选中endpoint,center,intersection,midpoint

f5612140 发表于 2006-11-6 20:40:00

楼上的,是不是39都要变为39,请问用if有何意义?

6676221 发表于 2006-11-8 20:55:00

谢谢以上楼主的回复

hooboxu 发表于 2014-9-23 22:06:36

对,有时候LISP 用了一直要丢失

shuangyihu 发表于 2015-11-3 22:20:57

http://bbs.mjtd.com/thread-108156-1-1.html
这个帖子不错，关于扑捉可以看看。

页: [1]

明经CAD社区's Archiver

捕捉点的设置