[编程申请]：在CAD中读取坐标数据，生成数据文件

hsb-hy

在工作中经常遇到将CAD中的图形中的坐标提前生成数据文件，虽然cass中可以实现，但是感觉很麻烦！不知哪位高手可以帮忙编一个lisp程序，数据格式如下：
点号，y坐标，x坐标，h高程

高程可有可无！
麻烦各位高手了！

netbee

这些程序很简单的，思路如下：
1、设置ssget的过滤器 如：(setq fitle '((0 . "circle")))
2、选择对象：(setq ss(ssget fitle))
3、循环提取坐标：(setq e(ssname ss 0))(setq pt0(cdr(assoc 10 (entget e))))
4、根据需要按格式写入文件。

hdgllj

应该好好查一下有关的参考书的！不然是编不出来的！先好好学一下吧！

hsb-hy

最初由 netbee 发布
[B]这些程序很简单的，思路如下：
1、设置ssget的过滤器 如：(setq fitle '((0 . "circle")))
2、选择对象：(setq ss(ssget fitle))
3、循环提取坐标：(setq e(ssname ss 0))(setq pt0(cdr(assoc 10 (entget e))))
... [/B]

恳请斑竹出手，帮忙编译个，我不懂lisp，多谢！我很需要这个程序，我想如果是搞测量的，很多人都需要这个的东东！
再次恳请斑竹出手——先谢了！

文件格式是 *.dat

zzqxuexicad

给我地址,我发给你.这玩意我刚编好.分享.

aichong

最初由 zzqxuexicad 发布
[B]给我地址,我发给你.这玩意我刚编好.分享. [/B]

我要：mrlm@tom.com

我现在用的是这个导入EXCEL的：http://www.xdcad.net/forum/showthread.php?s=&threadid=76624

zjyxks

发出来侃侃

huangjing20

发出来侃侃

hsb-hy

最初由 zzqxuexicad 发布
[B]给我地址,我发给你.这玩意我刚编好.分享. [/B]

先多谢你啦！
邮箱是：hsb_hy@163.com

c3a139

最初由 zzqxuexicad 发布
[B]给我地址,我发给你.这玩意我刚编好.分享. [/B]

我要谢谢c3a139@163.com

zooloo

既然是座标,就应该是点了。
    要将图上的所有的点的座标形成数据文件不难，如果以形成点的先后顺序来排点号，也不难作到。如果以标注在图上的号（TEXT）来作点号，可能就要一点一点对应输入了，当然标注的文字与点的位置有一定关系时又另当别论。但是如果点没有高程，好像没有什么意义了。
    还要知道你的图上的点是如何的才好说。

hsb-hy

最初由 zooloo 发布
[B]既然是座标,就应该是点了。
    要将图上的所有的点的座标形成数据文件不难，如果以形成点的先后顺序来排点号，也不难作到。如果以标注在图上的号（TEXT）来作点号，可能就要一点一点对应输入了，当然标注的文字与?.. [/B]

你好！多谢你！
这个主要是为了将图上的坐标采集下来，上传到全站仪内，将这些点在实地标定出来！
这个程序应该是：
1、在图上j将指定点顺序生成序号：1、2、3、4……
2、同时采集相应序号点，生成数据文件，格式：点好，Y坐标，X坐标，H坐标，生成文件的扩展名为.dat
如图
恳请各位高手帮帮忙！

hsb-hy

1

zooloo

这个问题不难解决的。但对图的作法有些要求的。
1。“X=1234.123”之类的字样，要求是一次写成。其中“X=”可以分开，但必需全图统一。
2。点号写在座标文字前（或后），可连在一起或分开，而不是写在点旁。
工作太忙，要编的话需要一定时间，如太急的话，可另请高手，我也不是很熟练的。

hsb-hy

只要可以生成数据文件即可！在图上只要求标准点号！