(defun c:lrg_xwj(/ data_list dat_file pt cenpt hh ff data mm )
(setq data_list '())
(setq dat_file (getfiled "写文件练习" "c:\\LSPTOOLS\\note1" "txt" 2));指定目录
(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))
(command "text" "m" cenpt hh 0 (foreach mm data_list (command mm))) ;写文件内容
(setq data (read-line ff))
(setq cenpt (polar cenpt (* pi 1.5) (* hh 2)))
)
;(setq data_list (reverse data_list)) ;可以尝试将字符串顺序颠倒玩一下先
(close ff)
(princ)
)
(prompt "\n写出文件练习！c:lrg_xwj 作者：road_g")
(princ)
参考资料：个人经验
lisp语言怎么将文件写到CAD中
将语言写到txt文本保存到lsp格式即可，或者使用cad自带的lisp编辑器进行编程，命令：Vlisp
autolisp在autocad里面怎么加?
打开acaddoc文件，在内输入：(load "（lisp文件名）")。这里的指的是你编辑的autolisp文件名，如文件名为文字wz，则输入：(load "文字wz")。确保所有文件位于同一文件夹内，便于电脑搜索。打开CAD，右键点击“选项”。在弹出的菜单中，选择“文件”，找到并点击“支持文件搜索路径”选项，通常位于第一...
lisp语言怎么将文件写到CAD中
(defun c:lrg_xwj(\/ data_list dat_file pt cenpt hh ff data mm )(setq data_list '())(setq dat_file (getfiled "写文件练习" "c:\\\\LSPTOOLS\\\\note1" "txt" 2));指定目录 (setq pt (getpoint"\\n请选择输入点:"));制定屏幕上的输入起点 (setq hh (getdist pt "\\n请输入字...
autolisp 应用程序源代码怎么添加到cad中
你的autolip代码用记事本保存为扩展名为*.lsp的文件，下拉菜单找到“加载应用程序”，点击它，会弹出“加载\/卸载应用程序”对话框，在对话框里选你的文件打开。
autolisp文件怎么加载到autocad中?
打开（acaddoc），在里面输入：(load "（lisp文件名）")；lisp文件名就是你编辑的autolisp文件名，如文件名是（文字wz），那么在里面输入：(load "文字wz")；这些文件要放在同一个文件夹，方便电脑搜索。打开cad，右键，选项；里面有个菜单：文件，在这个里面，有一个选项（支持文件搜索路径），一般在...
cad中添加LSP软件,如何使用
具体以下。acad.lsp是AutoCAD软件的Lisp脚本文件，当打开AutoCAD图形dwg文件时会自动运行相同文件夹中的名为acad.lsp的脚本文件。不过现在一般是CAD病毒文件。只要将这文件放到CAD安装文件夹，或放在一个".DWG"文件的目录，打开这个目录的CAD文件，acad.lsp就能自动运行了（典型的病毒特征）。打开一份图纸，...
怎样用lisp编写程序控制cad
在lisp编辑器中编写一下程序，程序的作用为计算线段总长度，并选择另存为位置，保存文件lsp文件。使用cad加载lsp文件，选择lsp文件位置。在命令栏点击l，用cad绘制几条线段，如下图所示。在命令栏输入ll，选择所有线段，则在图下计算并显示出了所有线段的总长度...
cad怎么用lisp怎么在启动CAD时自动加载Lisp插件
方法1：添加到启动组 方法2：在启动的lisp文件加入LOAD语句。目录网上有很多非常有用的CAD插件，能给绘图带来很多便利。这些工具手动加载后就可以执行，但每次用的时候都要加载挺麻烦的，能不能在启动软件的时候把自己常用的插件加载进来？当然可以，而且方法还不止一种。方法1：添加到启动组CAD的工具插件...
cad中lisp怎样用
加载应用程序---加载你的lisp文件 同时，有用的lisp程序可以设置为自动加载：加载应用程序---启动组---添加你的lisp文件 这样，新打开的cad窗口都会加载这些lisp ！
lisp 读文件数据,写入cad中
直接弄到xls然后用天正的读入xls，写入cad的就是表格。
