lisp 读文件数据,写入cad中

txt文件中有如下数据

100,111.1111,222.222
120,121.2222, 333.3333
……
等等一系列数据读入到cad中,然后在cad中 表格内填上(也按上数据一行三个进行写入)。麻烦用lsp语言编写,谢谢。

第1个回答  2017-06-13
直接弄到xls然后用天正的读入xls,写入cad的就是表格。

lisp 读文件数据,写入cad中
直接弄到xls然后用天正的读入xls,写入cad的就是表格。

lisp语言怎么将文件写到CAD中
(setq pt (getpoint"\\n请选择输入点:"));制定屏幕上的输入起点 (setq hh (getdist pt "\\n请输入字体高度:"));文字高度 (setq ff (open dat_file "r"));打开文件 (setq data (read-line ff));读取文件一行内容 (setq cenpt pt)(while data (setq data_list (cons data data_list))...

autolisp文件怎么加载到autocad中?
打开(acaddoc),在里面输入:(load "(lisp文件名)");lisp文件名就是你编辑的autolisp文件名,如文件名是(文字wz),那么在里面输入:(load "文字wz");这些文件要放在同一个文件夹,方便电脑搜索。打开cad,右键,选项;里面有个菜单:文件,在这个里面,有一个选项(支持文件搜索路径),一般在...

lisp语言怎么将文件写到CAD中
将语言写到txt文本保存到lsp格式即可,或者使用cad自带的lisp编辑器进行编程,命令:Vlisp

怎样用lisp编写程序控制cad
​在lisp编辑器中编写一下程序,程序的作用为计算线段总长度,并选择另存为位置,保存文件lsp文件。​使用cad加载lsp文件,选择lsp文件位置。在命令栏​点击l,用cad绘制几条线段,如下图所示。​在命令栏​输入ll,选择所有线段,则在图下计算并显示出了所有线段的总长度...

如何在lisp中实现由excel读取数据绘图至CAD介面? index x y dia 0...
用lisp读取excel没试过,建议将excel数据转换成txt格式的,每行一个数据,数据格式为001 100 100 20 其中001为标签(个人觉得可有可没有,除非将每个标签标注在园里),后面的100 100分别为横纵坐标,20为半径。这样就能用lisp的read-line函数读取每一行的数据,然后分别画圆。希望能帮到你。

autolisp 应用程序源代码怎么添加到cad中
你的autolip代码用记事本保存为扩展名为*.lsp的文件,下拉菜单找到“加载应用程序”,点击它,会弹出“加载\/卸载应用程序”对话框,在对话框里选你的文件打开。

cad中添加LSP软件,如何使用
具体以下。acad.lsp是AutoCAD软件的Lisp脚本文件,当打开AutoCAD图形dwg文件时会自动运行相同文件夹中的名为acad.lsp的脚本文件。不过现在一般是CAD病毒文件。只要将这文件放到CAD安装文件夹,或放在一个".DWG"文件的目录,打开这个目录的CAD文件,acad.lsp就能自动运行了(典型的病毒特征)。打开一份图纸,...

lisp编程 在打开的CAD图中,插入另一已画好的cad图
(setvar "cmdecho" 0)(setq file (getstring "\\n输入待输入的图形文件名:"))(if (not file)(exit)(progn (setq dwg(findfile(strcat file ".dwg")))(if(not dwg)(exit)(progn (setq pt(getpoint "\\n指定插入点:"))(if(not pt)(exit)(progn (setq sx(getreal "\\指定X比例<1>:...

求lisp程序解决cad插入图块
(while(setq pt1(read-line f))(setq rang(last(read(strcat "(" pt1 ")")))(setq pt1(read(strcat "(" pt1 ")")))(setq pt1(list (car pt1)(cadr pt1)))(command "insert" blockname pt1 "" "' rang ""))

相似回答