楼上的方法画线或其它可以连续输入点的命令也许能行。
如果你的EXCEL中记录的只有两列数，且是相邻的两列，那你可以将它另存为“带逗号分隔值文件”即*。csv 比如存在D盘根目录下叫point.csv 那么你可以用如下代码：
(defun c:poi()
(setq cm (getvar "cmdecho"))
(setvar "cmdecho" 0)
(setq pf (open "d:\\point.csv" "r"))
(while (setq pd (read-line pf)) (command "point" pd))
(close pf)
(setvar "cmdecho" cm)
(princ)
)
将以上代码用记事本存为poi.lsp然后加载运行poi就可以了。
如果EXCEL中记录的数只有一列且格式为 x,y那么就直接复制这些值到记事本
存为point.txt然后将上面的代码中(setq pf (open "d:\\point.csv" "r"))改为(setq pf (open "d:\\point.txt" "r"))就行了！
