二次开发问题求助

nerogerman

现在做vlisp编程，可是今天却发现一个看起来简单，我却一直弄不明白的问题。想在这里请教下各位大侠。
2 |! w- q" O1 _$ H8 L. Z% n' A
1 u/ {2 s- Z, ^* L$ D* i我的程序是：
(defun c:fddd(/ p1 p2 p3 p4)
1 U. Y7 y) f; |0 p5 I7 Z(setq l1ix 66.666)
(setq l1iy 66.666)
' m+ [( I* ^$ B8 @2 F. I" k(setq l2ix 2066.666)
(setq l2iy 66.666)
(setq l1pi (list l1ix l1iy))
. @2 F, T+ v2 i! [* K  l$ n(setq l2pi (list l2ix l2iy))
(command "line" l1pi l2pi "")
, W) z$ }# t( L: z2 U# R, w2 z(command "line" '(33.333 33.333) '(2033.333 33.333) "")
)
# D+ r( y4 _" F# z1 t0 P! Y
( \& D5 |8 g% K8 u: g0 \+ f: K8 H
0 f+ Q5 }+ V5 M1 k# \% j; c9 a程序很简单吧，可是实际的运行效果却是在cad中画了两条重合的线，线的两个断点分别是（0,0）和（20,0）。我在调试中监测了变量12pi和12pi，分别是（66.666 66.666）和（2066.666 66.666）。太诡异了，有高手可以指点下我吗？

SunVei

(command "line" l1pi l2pi "")
: v( T5 l7 T$ \! }% K4 j  \3 a(command "line" '(33.333 33.333) '(2033.333 33.333) "")
==>
7 e# V- I1 E) a% t, y(command "line" "None" l1pi "None" l2pi "")
3 o/ h/ |+ Q& f; Z7 E( k# Y7 n(command "line" "None" '(33.333 33.333) "None" '(2033.333 33.333) "")

/ d7 p% q8 D2 h1 _& L8 tor
(setvar "OsMode" 0)
(command "line" l1pi l2pi "")
8 {0 T( i  s3 d( [9 M% v+ j(command "line" '(33.333 33.333) '(2033.333 33.333) "")

czboy

(setvar "OsMode" 0)
4 H9 B: w2 }! i9 dosmode 是什么作用

SunVei

帮助内如是说....

woaishuijia

出现这种现象的原因是对象捕捉在起作用,导致所画线的端点与附近其它现有对象的捕捉点重合了.
2楼的第一种方法是用捕捉替代临时取消了对象捕捉,第二种方法是把"OsMode"系统变量改为0,关闭了对象捕捉.