重新编号汽车。

marko_ribar · 发表于 2022-7-5 20:41:41

也许这个版本-通过解锁层。。。但未经测试。。。

HTH，M.R。
自动标签属性V1-0-解锁图层。lsp

pBe · 发表于 2022-7-5 20:44:42

这当然会有帮助。

我想你需要一个例程来填充缺失的数字[超过1个删除的停车位]现有值，你想通过选择来实现吗？

你想让它同时处理文本和属性吗？

编辑：想一想，也许可以根据当前顺序（从第一个空格开始）对选择集重新编号，而无需找出遗漏的内容

1，2，3，5，6，7 10将是1，2，3，4，5，6。7无论如何

Hsanon · 发表于 2022-7-5 20:48:17

哇，那太棒了。。。。
我们可以为地下室1提供B1后缀，为地下室2提供B2后缀，为第一层提供地面1的G后缀等。。。
车辆编号可以是G-1、G-2、G-3、B1-1、B1-2、B2-1、B2-2、1-1、1-2、1-3等。。。。
那真的很重要。。。
否则，您建议使用不同的块运行lisp-carG、carB、car1等将达到效果。。。。。

希望李某个时候读到这篇帖子。。。。。

pBe · 发表于 2022-7-5 20:51:27

我很确定你指的是罗布斯的帖子

FWIW，这里有一个简短的代码来演示我在上一篇文章中写的内容

copy

(defun c:bumper (/ ss i e lst start)
 (if (setq lst        nil
    ss        (ssget "_:L" '((0 . "TEXT") (1 . "*#*")))
     )
   (progn
     (repeat (setq i (sslength ss))
(setq e (vlax-ename->vla-object (ssname ss (setq i (1- i)))))
(setq lst (cons (list (atoi (vla-get-textstring e)) e) lst))
     )
     (setq start (apply 'min (mapcar 'car lst)))
     (foreach val (vl-sort lst
                    '(lambda (n m)
                       (< (car n) (car m))
                     )
           )
(vla-put-textstring (cadr val) (itoa start))
(setq start (1+ start))
     )
   )
 )
)

现在你考虑封盖，这是一场完全不同的球赛。以上演示仅适用于文本实体

eldon · 发表于 2022-7-5 20:53:58

尽管提供了许多其他解决方案，但这里是我使用的TextMath lisp。
文本数学。lsp

BIGAL · 发表于 2022-7-5 20:58:00

可能有用的评论可能没有，一些想法如果你使用围栏选项，你可以按要求的顺序选择你的隔间，并一次性自动创建停车场编号B1-B50 ie 50，等等，我建议只需重新编号所有选项，应该工作的一件事是，如果你做选择，文本或块应按创建顺序创建，唯一的打嗝可能是向后的最后一个是第一个B1需要检查。重新设置ssget“F”，您必须提供预先挑选的点。听起来使用2个街区将是最好的方式停车场和一个数字在中心，然后只是重做所有。

CIV3D有一个名为“停车场”的dwg，它的动态刚拖停车场和岛屿就出现了。

当前菜单然后编码

copy


[->CARPARKS]
            [No carparks]^C^C(load "how many carparks") carpark
            [Carpark 0]^C^C(load "simple carpark") npark90
            [Carpark 30]^C^C(load "simple carpark") npark30
            [Carpark 45]^C^C^p(load "simple carpark") npark45
            [Carpark 60]^C^C(load "simple carpark") npark60
            [<-Carpark 90]^C^C(load "simple carpark") npark90

Hsanon · 发表于 2022-7-5 21:01:43

大家好，
谢谢你的帮助。。。个人和集体。。。。
对我和我的办公室来说，汽车的重新编号一直是一件令人头痛的事。最后，我使用李的属性块和自动标记程序
我为不同级别的汽车分别制作了不同的区块——carGC（有盖底层）、carGO（开放底层）、carB1、carB2、car1FL、car2FL等，并用不同的blockno和blocktag选项更新了他的程序。
它工作得很好。。。。这是一个很大的帮助。。。
谢谢

（一个小问题：有没有办法保持文本水平……并且面朝上……已经尝试将attdef样式作为注释性样式……其水平，但面朝上）

[编程交流] 重新编号汽车。

发表回复

精选推荐