土地论坛|土地社区

快捷导航
查看: 1428|回复: 4
收起左侧

拐点图怎么转化成txt格式的坐标?求大侠指点

[复制链接]

2

主题

83

种子

14

帖子

村委员

Rank: 2

积分
25
发表于 2012-12-4 09:57:06 | 显示全部楼层 |阅读模式

注册土地论坛,感受交流乐趣!

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
像这种,具体怎么操作,急 。

这样的

这样的
将本帖分享到:

1

主题

1269

种子

34

帖子

土地学员

Rank: 12Rank: 12Rank: 12

积分
40
QQ
发表于 2013-8-8 14:45:27 | 显示全部楼层
选取需要拐点坐标的多段线-list
回复 支持 反对

使用道具 举报

1

主题

1269

种子

34

帖子

土地学员

Rank: 12Rank: 12Rank: 12

积分
40
QQ
发表于 2013-8-8 14:47:42 | 显示全部楼层
选取多段线-list
回复 支持 反对

使用道具 举报

11

主题

1988

种子

362

帖子

村支书

Rank: 4

积分
498
QQ
发表于 2013-8-21 07:40:19 | 显示全部楼层
多段线LIST会有重复点坐标的情况,地信论坛里面有cadlsp导出坐标文本的文件,可以直接生成序号的,你再用word和excel编辑就好了的
回复 支持 反对

使用道具 举报

4

主题

6975

种子

539

帖子

副镇长

Rank: 5Rank: 5

积分
628
发表于 2013-8-28 00:40:39 | 显示全部楼层
1、连接多段线-list,这是一个好方法2、快速选择,后用cad导出也是一种好办法,需要2010以上版本3、快速选择后直接保存为dxf,用txt打开,也可以4、一段简单的代码也许可以帮你(这是框选版的lsp代码)(defun C:zbsc ()
(setq ss2 (ssget '((0 . "MTEXT"))))
  (setq n 0)                      ;;;;将索引号初始为0.
(setq shitigeshu (sslength ss2)) ;;;返加选择集中实体个数。
(repeat shitigeshu
(setq stb (entget (ssname ss2 n))) ;;;返回选择集中指定索引号的列表
(setq mc (assoc 1 stb)) ;;;;在列表中找与关键字相同的元素,点对表,文字内容
(setq nr (cdr mc)) ;;;反回点对表中的第二个元素,文字内容。
(setq zblb (assoc 10 stb)) ;;;返回坐标列表。
(setq xzb (nth 1 zblb)) ;;;;返回X坐标。
(setq xzbzh (rtos xzb)) ;;;将X坐标转换为字符串。
(setq yzb (nth 2 zblb)) ;;;;返回y坐标
(setq yzbzh (rtos yzb)) ;;;;;将y坐标转换为字符串。
(setq zzb (nth 3 zblb)) ;;;;;返回z坐标。
(setq zzbzh (rtos zzb)) ;;;;;;将z坐标转换为字符串。
(setq hecheng (strcat nr " "  xzbzh " " yzbzh " " zzbzh))
(setq wj (open "e:/new.txt" "a"))
(write-line hecheng wj)
(setq n (+ 1 n))
)
  (close wj)
)5、cass可以直接输出
回复 支持 反对

使用道具 举报

土地论坛 ( 湘ICP备14003170号-2  

湘公网安备 43010302000309号

GMT+8, 2018-7-23 20:00

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表