为什么读取txt文件里的坐标然后连线，但cad一开始就显示点无效

iamzhangxs

请教各位达人问题如题，为什么会显示点无效？怎么解决读取点坐标在连线？代码如下：

2. 
   
3. (defun C:cop()
   
4.   (setq datafile (getfiled "选取文件" "" "txt" 2 ))
   
5.   (setq ff (open datafile "r"))
   
6.   (setq data (read-line ff))
   
7.   (command "pline")
   
8.   (while data
   
9.     (command data)
   
10.     (setq data (read-line ff))
    
11.   )
    
12.   (command "")
    
13.   (close ff)
    
14.   (prin1)
    
15. )
    
16. (prompt "\n**********************<<C:cop>>*********************")
    
17. (prin1)

<br /> (defun C:cop()<br />   (setq datafile (getfiled "选取文件" "" "txt" 2 ))<br />   (setq ff (open datafile "r"))<br />   (setq data (read-line ff))<br />   (command "pline")<br />   (while data <br />     (command data)<br />     (setq data (read-line ff))<br />   )<br />   (command "")<br />   (close ff)<br />   (prin1)<br /> )<br /> (prompt "\n**********************<<C:cop>>*********************")<br /> (prin1)

hbwr123

2. (defun C:cop()
   
3.   (setq datafile (getfiled "选取文件" "" "txt" 2 ))
   
4.   (setq ff (open datafile "r"))
   
5.   (setq data (read-line ff));;data为字符串类型
   
6.   (command "pline")
   
7.   (while data
   
8.     (command data);;这里的data应该需要为list类型，切符合点定义
   
9.     (setq data (read-line ff))
   
10.   )
    
11.   (command "")
    
12.   (close ff)
    
13.   (prin1)
    
14. )
    
15. (prompt "\n**********************<<C:cop>>*********************")
    
16. (prin1)
    

(defun C:cop()<br />   (setq datafile (getfiled "选取文件" "" "txt" 2 ))<br />   (setq ff (open datafile "r"))<br />   (setq data (read-line ff));;data为字符串类型<br />   (command "pline")<br />   (while data <br />     (command data);;这里的data应该需要为list类型，切符合点定义<br />     (setq data (read-line ff))<br />   )<br />   (command "")<br />   (close ff)<br />   (prin1)<br /> )<br /> (prompt "\n**********************<<C:cop>>*********************")<br /> (prin1)<br />

看上面的注释