[编程申请]：初到贵地，收获多多，有一问题请教，关于坐标标注。

archlin

有时画图时喜欢将几张图拼在一起画图，既有总平面也有道路竖向图，两者都带坐标网，有可能网格做了旋转，能有个程序在两个图上都能正确标注就好了，不用UCS换来换去的。那位高人愿意出手相助。先行谢过。:3 :3 :3

szkevin

总平面可能有xy坐标和ab坐档,xy坐标可以做旋转,ab坐标其实就是为了方便,横平竖直设置.如果xy坐标做了旋转,就要提供两点供换算成ab坐标.如果有好几张图,可以通过命名多个坐标系来达到这个目的,也就是总平面图一个坐标系,画道路图时另设一个坐标系,这个坐标系保证道路图的坐标和总平面坐标一致就行了.这个可以通过acad命令就可以达到,也很简单.程序经研究后再附上.你也可以提一下你的看法,是要标xy坐标还是标ab坐标.

eachy

下面是个简单的示意图，图纸有可能是几个月前或者旧图的地图修改，也可能是别人处拷来的，旋转的坐标系是为了将建筑物转正，若果用UCS，标注的坐标的角度不好和图纸平行或垂直。
我想这样解决最好：
1. UCS定义最好由程序自己完成，用户不用计算；
2. 用户点取图中的一个定位点，比如网格交点或界限点，输入实际坐标；
3.  需要第二定位点，回车，坐标系只是平移没有旋转－>继续标注
4.  点取第二定位点，输入实际坐标
5.  点取第三定位点，输入实际坐标
6.   正确标注坐标

另外，程序还可以在开始时提供X－Y/A－B转换选项
最后一点，除了完成标注，还可以提供坐标查询选项。

各位还有好的主意吗？:1 :1

1. 
   
2. <object classid="clsid:B2BE75F3-9197-11CF-ABF4-08000996E931" id="Whip1" width="650" height="550">
   
3.   <param name="Filename" ref value="http://xdsoft.myrice.com/forum/eachy/zbbz.dwf">
   
4. </object>
   

复制代码

ll_j

我贴一个程序或许有用。程序中Idd命令就是标注坐标，以前的程序，后来只作小的修改，使用时注意：
1.当前style固定字高设为0；
2.关闭捕捉。

eachy

非常不错的标注工具，考虑的很全。

提几个改进意见：

1.提示改为：“给出测量点<退出>: ”回车后没有提示

2.增加循环选取

3.标注的坐标要能够指定角度

4.程序解决了UCS,　还没有解决图形绕任意点旋转或者坐标网和点坐标不一致的情况


文件中有个错误：

1. 
   
2. 　　　　(+ (max (caadr (textbox (list (cons 1 pt1x))))
   
3.                          (caadr (textbox (list (cons 1 pt1y))))
   
4.                     )
   
5.                     (* 0.4 h_)
   
6.                  )

复制代码

中，h_应该为h__

wuxian123

这个程序不错！收下了！

archlin

好！好！够用了，谢谢。

期待斑竹的更全面的工具！

1. 
   
2. @* .☆ / ＊/　.　/ * . ☆/ ＊。
   
3.    ◢◣。       ◢◣。
   
4.   ◢★◣。     ◢★◣。
   
5. ◢■■◣。   ◢■■◣。
   
6. ◢■■■◣。 ◢■■■◣。
   
7. ︸︸||︸︸ !!︸︸||︸︸
   
8. 愿您有快乐的每一天 ^_^!!

复制代码