二次开发问题求助

nerogerman

现在做vlisp编程，可是今天却发现一个看起来简单，我却一直弄不明白的问题。想在这里请教下各位大侠。

我的程序是：
(defun c:fddd(/ p1 p2 p3 p4)
(setq l1ix 66.666)
(setq l1iy 66.666)
(setq l2ix 2066.666)
(setq l2iy 66.666)
(setq l1pi (list l1ix l1iy))
(setq l2pi (list l2ix l2iy))
(command "line" l1pi l2pi "")
(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）。太诡异了，有高手可以指点下我吗？