AutoCAD自动画很多线

Question

就是我在txt文本里有很多点坐标来画线，每次复制粘贴到AutoCAD的命令行太麻烦了，有没有什么方法让cad自动运行这个文件？
另外，我的AutoCAD2007为什么在画多段线的时候只能画14个点的，点多了，我复制粘贴到命令行就没有反应了？

Answer 1

(defun c:plinept()
(command "PLINE" "1,3" "3,3" "5,2" "")
)

中间那些数字就是.txt里的坐标了。
存成.lsp文件，然后用appload加载，运行plinept。这个名称也是自己起的，在c:后写啥就是啥了。

Answer 2

假如我们有一个txt文件保存线坐标 路径如下"F:\\1.txt"
保存格式严格遵守如下：
1 1
2 4
3 9
4 16 
5 25
6 36
7 49
8 64
9 81
左边为x轴坐标 右边为y轴坐标 中间含有一个空格 。然后从cad中加载如下lisp代码，

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun c:lli()
   ;;coded by 焚琴居主人
  (setq f1  (open "F:\\1.txt" "r"))
  (setq  n 0)
  (repeat 6
    (setq n (+ n 1))
    (set (read (strcat "A" (itoa n))) (read-line f1))
  )
  (close f1)
 (setq biao1 (read (strcat "(" (eval (read "A1")) ")")))  ;展开成表
 (setq biao2 (read (strcat "(" (eval (read "A2")) ")")))  ;
(command "line"  biao1
         biao2
     )
  (setq n 2)
  (repeat 4
    (setq n(+ 1 n))
    (setq biao3 (read (strcat "(" (eval (read (strcat "A" (itoa n)))) ")")))  ;
  (command biao3)
  )
    
  (command "")
  (princ)