[原创]：自编的一个给圆自动编号的lisp程序，已增加输出至文件功能

aichong

最初由 sjyqzc 发布
[B]楼上,你的意思是用字母作为序号来进行编号吗?
这个程序可以用字母作前缀,但不能用字母序列.如果可以用字母编号了话,这个程序就可以更通用一些.
如果要做一个通用自动编号程序的话,应实现如下功能:
可以选择对不同... [/B]

呵呵，要是有常青藤的文本序号处理功能就好了。

yuanbing

楼主可以发一个给我吗，我的邮箱：yuanbing126@126.com

先谢谢了！

winsbol

争取下载一个看看用用

sisi

能下载，很好用，能不能请楼主再编一个程序，能给图块编号，或者给图块中的圆编号？

ji3499222

已下载，且可以使用。如果楼主能完善一下会更好的。

ji3499222

楼主能否同时把所有桩位生成坐标数据文件？那样可就更好了。

sjyqzc

生成数据文件应不难解决,不过有什么用呢?

ji3499222

SJYQZC楼主：非常感谢你的程序给我带来了很多地方便。你给我们解决了繁琐的桩位编号问题，现在桩位放线都是使用全站仪，并根据各桩位坐标来放测桩位的，如果你能把各桩位坐标形成一个数据文件，就可直接把这些坐标传输到全站仪里去，手工输入坐标，工作量是非常大的，且容易出错（一般的工程都是几百或几千棵桩）。另外坐标文件的格式是：

桩号 ，，  Y坐标，    X坐标，     H高程

1      ，， 8325.333， 2564.123，  40.325
  2      ，，  ............                                             依此类推

如果你能帮我们解决这个问题的话，能否先发到我的邮箱试用一下（JI3499222@163.COM), 谢谢！！！



我现在正在一工地上，有3500棵桩，桩位编号正好使用你的自动编号程序，可桩位坐标就得手工在电脑手工逐个查取，形成一个.DAT文件，然后再传输到仪器里去，查询坐标的工作量还是比较大的，希望你能帮助我们解决这个问题，再次表示感谢！！！

sjyqzc

用途：可用于给绘制的桩平面图自动编号,或用于钎探点自动编号,已增加输出至文件的功能
功能：在cad中选择图园,程序自动找出圆并采用当前字形对圆进行自动编号.
可设定自动编号前缀
可设定文字标注位置
可设定自动编号顺序
可在编号过程中设定编号起点号.
可设置输出文件路径及文件名，可将编号及园坐标输出至文件

使用方法：
１．加载counttofile.fas
２．在acad中为编号建一个字体样式，要有固定的字高，最好在设一个专用的图层．
３．运行count命令，按提示操作即可．

新功能：
如果要把园坐标输出至文件，运行count后，先运行file子命令，设置文件名．然后进行常规操作就可．
如果要对坐标进行单位换算，可将数据文件导入excel，进行处理．

已重新上传，我贪财，还是收个币．

ji3499222

SJYQZC朋友：首先对你表示由衷的感谢。
使用中发现以下问题：
1.自动形成的DAT文件,应该是Y列在前面，X列在后面，这是应用软件要求的格式；
2.我在CAD2007中，可以使用你的软件功能，但在CAD2004中使用时，显示错误提示：列表错误“ACDBCIRCLE"
第一种情况还烦你修改一下，第二种情况还需你指点指点，再次感谢你！！！

sjyqzc

Y,X顺序修改后重新上传．我在ＣＡＤ02，05，06中试了，没发现问题．04我没装．在这个论坛上传文件真不易，总是出错．
大家都说程序有一些问题,我用时没发现.就不再收币了，大家一起帮着改改，优化一下吧．如果能填加些功能和界面就更好了．众人拾柴火焰高．

ji3499222

刚刚从工地回来，就下载了你修改的软件，十分感谢楼主认真负责的精神，向你致意！！！
经测试完全满足我的要求，同时也把施工放线人员从繁忙的工作中解放出来，祝好人一路平安！！！

softbird

看过好多圆编号的程序，不知道这个能否自动解决不同直径的圆单独编号，或者先编大的后编小的

qgr1979

加载了用count命令不能用呀

yueboyi

56楼说出现“ACDBCIRCLE"，我在使用过程中也出现过，你把所有圆的颜色改成随层试试，我改完以后试验通过！