二次开发问题求助

nerogerman

现在做vlisp编程，可是今天却发现一个看起来简单，我却一直弄不明白的问题。想在这里请教下各位大侠。
% ~0 X/ }% c4 V" ^6 U
# ]; d+ S" z7 c我的程序是：
1 X  g+ i0 U6 {$ c' Q; E(defun c:fddd(/ p1 p2 p3 p4)
* N) U* [6 L! n6 G(setq l1ix 66.666)
(setq l1iy 66.666)
2 X/ ?+ L; @$ M$ s! ~! |  F(setq l2ix 2066.666)
$ [- P3 _+ }, h2 s. n: Q(setq l2iy 66.666)
(setq l1pi (list l1ix l1iy))
(setq l2pi (list l2ix l2iy))
(command "line" l1pi l2pi "")
1 q. g8 i9 V' B(command "line" '(33.333 33.333) '(2033.333 33.333) "")
)


程序很简单吧，可是实际的运行效果却是在cad中画了两条重合的线，线的两个断点分别是（0,0）和（20,0）。我在调试中监测了变量12pi和12pi，分别是（66.666 66.666）和（2066.666 66.666）。太诡异了，有高手可以指点下我吗？

SunVei

(command "line" l1pi l2pi "")
1 q% \, E/ s% k% l& O9 V(command "line" '(33.333 33.333) '(2033.333 33.333) "")
% {0 \- U1 ^1 ~; R==>
(command "line" "None" l1pi "None" l2pi "")
(command "line" "None" '(33.333 33.333) "None" '(2033.333 33.333) "")

or
(setvar "OsMode" 0)
(command "line" l1pi l2pi "")
(command "line" '(33.333 33.333) '(2033.333 33.333) "")

czboy

(setvar "OsMode" 0)
osmode 是什么作用

SunVei

帮助内如是说....

woaishuijia

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