收藏 分享(赏)

(施工经验)提取cad点坐标生成表格并至excel.doc

上传人:weiwoduzun 文档编号:3203480 上传时间:2018-10-07 格式:DOC 页数:1 大小:25.50KB
下载 相关 举报
(施工经验)提取cad点坐标生成表格并至excel.doc_第1页
第1页 / 共1页
亲,该文档总共1页,全部预览完了,如果喜欢就下载吧!
资源描述

1、提取 cad 点坐标生成表格并至 excelCAD 坐标数据批量导出小工具(defun c:md()(setvar “cmdecho“ 0) (COMMAND “.UNDO“ “BE“)(command “-units“ “2“ “3“ “2“ “3“ “ “)(setq fp (open “d:/放样坐标值.xls“ “a“) s (getvar “cmdecho“) n (getint “n 请输入总放样坐标点数目! “)(princ “放样坐标点“ fp)(princ “t“ fp)(princ “X 坐标值 “ fp)(princ “t“ fp)(princ “Y 坐标值 “ fp)(

2、princ “n“ fp)(repeat n (setq k (getstring “n 输入放样坐标点编号(如:K1)!“)p (getpoint “n 选取节点! “)x (strcat “X=“ (rtos (nth 0 p)y (strcat “Y=“ (rtos (nth 1 p)(princ k fp)(princ “t“ fp)(princ x fp)(princ “t“ fp)(princ y fp)(princ “n“ fp) (close fp)(setvar “cmdecho“ s)(princ “n 提示:输入 MD 命令来运行本程序! “)(princ)1、 打开记事

3、本,粘贴以上代码,然后保存成 md.lsp2、 打开 CAD 并加载这个小程序(在命令行输入 appload,选择加载 md.lsp程序),将 md.lsp 复制在 support 文件夹下后可自动加载。3、 输入 md 运行命令,输入桩数,再输入桩号,再选择点,完成后,保存CAD 文件,关闭 CAD,打开 D 盘你就会看到生成一个文件“桩号坐标值.xls” 的Excel 文件,打开,如下格式桩号 X 坐标值 Y 坐标值k1 X=1073.205 Y=1028.341k2 X=2193.676 Y=922.327k3 X=1752.278 Y=595.802桩号 X 坐标值 Y 坐标值1 X=877.972 Y=1257.3332 X=2360.883 Y=1257.3333 X=1578.266 Y=281.999

展开阅读全文
相关资源
猜你喜欢
相关搜索
资源标签

当前位置:首页 > 机械制造 > CAD/CAE/CAM

本站链接:文库   一言   我酷   合作


客服QQ:2549714901微博号:道客多多官方知乎号:道客多多

经营许可证编号: 粤ICP备2021046453号世界地图

道客多多©版权所有2020-2025营业执照举报