WZBH既有文字重新编号程序jun353835273于2023-11-8明经升级版

寒潮大冬瓜

WZBH既有文字重新编号程序jun353835273于2023-11-8明经升级版
                        (princ "SS94=")(princ SS94)(terpri);回行显示下一项屏显
                        ;(terpri);回行显示下一项屏显
                        (setq SS95 (* SS94 add))
                        (princ "SS95=")(princ SS95)(terpri);回行显示下一项屏显
                        (setq SS96 (+ (atoi StartNOdata) SS95)) ;最大编号序号转为字符串
原版地址：文字自动编号程序
http://bbs.mjtd.com/forum.php?mo ... 8704&fromuid=418631
(出处: 明经CAD社区)
休息前终于搞定新编号集体转到新建图层，该图层可以随时全选后删除，最后不影响其他图元的操作！

p-3-ianlcc

谢谢楼主的分享！
下载来更新使用

moshouhot

升级版升级了啥？

寒潮大冬瓜

moshouhot 发表于 2024-12-26 10:16
升级版升级了啥？

自动补齐0→看图片→对比原版！

言戲無軍

非常厉害，期望增加一种按照原有数字序号大小重新编号的 排序方式，比如，C-1，C-3，C-5，C-10，.....重新从1开始编号，A1（对应C-1），A2（对应C-3），A3（对应C-5），A4（对应C-10）。类似这种

寒潮大冬瓜

言戲無軍 发表于 2024-12-26 15:09
非常厉害，期望增加一种按照原有数字序号大小重新编号的 排序方式，比如，C-1，C-3，C-5，C-10，.....重新 ...

遇到没什么规律的时候→可以采取"FIND'命令替换A字符为C字符的方式！
C-1，C-3，C-5，C-10→A1（对应C-1），A2（对应C-3），A3（对应C-5），A4（对应C-10）→应该是用二维多段线连起来→然后通过‘顶点编号’来实现你的理想！→到这个网址下载“DFB二三维顶点编号自动字高自动补齐位数00格式自动图层名嵌套波总指导升级版.lsp”能顺利实现编号→再加前缀就行了！
求助，给多段线节点编号并输出对应的坐标表
http://bbs.mjtd.com/forum.php?mo ... 0572&fromuid=418631
(出处: 明经CAD社区)
DFB二三维顶点编号自动字高自动补齐位数00格式自动图层名嵌套波总指导升级版.lsp
6.28 KB, 下载次数: 7
售价: 3 个明经币  [记录]

寒潮大冬瓜

我还在尝试把重新编号的图元转到新建的图层里，可惜搞不成功！

AUTOLISP如何把选择集里的对象移动到某一图层
http://bbs.mjtd.com/forum.php?mo ... &fromuid=418631
(出处: 明经CAD社区)

在Bao_lai于2022-2-25 20:25:18 |这里学习了“(command "change" (SSGET) "" "properties" "layer" "图层名" "" )”